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для тех, кто использует ком- 
пьютеры семейства "7Х-5ресфгат" в 
школьных УЧрехдениях, мы подгото- 
види сегодня программу "МОЗАИКА". 
|Интересным, на наш взгляд, в ней 
|является то, что это программа 
Ицвойного назначения. Ее можно 
применять на уроках информатики 
как в старших классах, таки в 
младших. 

Более опытные ученики смогут 
пнабрать текст этой программы и 
отладить ее, а для младших школь- 
| ников она явится замечательным 
Гпервым шагом в конпьютеризацию, 
| поскольку поножет легко наладить 
| процесс общения с конпьютерон и 
сделать его радостным. 

У нас есть положительный опыт 
работы с этой программой шести- 
летних детей, которые без труда 
освоили всю необходимую технику 
пуправления. й 
Не лимним также будет отметить 
и тот Факт, что применима эта 
программа не только в школе, но и 
|конечно дома. В этом случае она 
доставит много приятных минут и 
детям и их родителям. Не пожалей- 
|те несколько утренних часов. Ваш 


|вят этот воскресный день. 

| Дополнительный интерес В этой 
программе представляет и то, что 
при ее наборе Вам предстоит оз- 
накомиться со многими профессио- 
нальными приенами, например с 
|подгрузкой своего знакогенерато- 
ра, с организацией перехода по 
ошибкам ОН ЕБЕОВ СО ТО, с работой 
шестнадцатиричного загрузчика, с 
организацией в програнме нулевой 
СТРОКИ, с заполнением этой строки 
блоком кодов ВЕ РИ... с адапта- 
|цией программы под БЕТА-ДИСК-ин- 
|терфейс и т.д. и т.п. Все эти 
вопросы здесь последовательно 
разобраны, но Вам ногут (если Вы 


сын или дочь на всю жизнь Запом- 


за прошлые годы. 

"ИНФОРКОН" предоставляет Вам 
возможность заказать и получить 
по почте сборники "7Х-РЕБЮ-91" и 
*2Х-РЕВЮ-92", ‘выполненные в виде 
аккуратных книжек 
формата. Нам адрес Вам известен. 

те, кто не хочет связываться с 
почтой, смогут приобрести их лич- 
но на нашен корпункте по адресу: 
г. Москва, ул. Новый Арбат (бывший 
ПРОСП. Калинина), д.2, о/с Г-19. 
на первом этаже Вы найдете нас по 
вывеске "7х-РЕВЮ". 


ПРОГРАММА "НОЗА Не 


В магазинах игрушек продается 
игра под названием ”МОЗАЯКА". Кто 
в детстве не играл в нее? В па- 
`нель с отверстиями вставляются 
разноцветные Фишки, которые обра- 
зУЮТ рисунок. Сегодня вниманию 
читателей предлагается компьютер- 
ный вариант этой игры. Програнма 
нохет использоваться не только в 
младших классах школы, но паже в 
дошкольных учрехдениях. 

По существу это простейший в 
управлении графический редактор. 
освоить профессиональный граФи- 
ческий редактор, такой. как. нап- 
ример “"АВТТ5Т” или “АВТЗТООТО", 
ребенок не в состоянии, а прог- 
ранна “НОЗАИКА" поможет: ему при- 
общиться к "компьютерной графи- 
ке". В то же время, эта программа 
ПРИУЧИТ ребенка пользоваться 
Функциональнынми клавишами перек- 
лючения цвета чернил, бумаги, ре- 
жима работы “графика - текст“ и 
т.в., то есть будет пройден "курс 
подготовки” перед освоенмен в 67- 
душен более сложных програнн. 

для того, чтобы в деталях по- 
нять нногие ноненты, исподьзуеные 
в этой программе, следует обра- 
титься к циклу ряда статей, опуб- 
ликсванных под рубрикой “Профес- 
сиональный подход” в 1Х-РЕВЮ в 
1992 году (см. стр. 113-116, 193- 
202, 241-248). Однако, если у Вас 
нет возможности ознакомиться с 
этини натериалани, или нет хела- 
ния вдаваться в`подробности рабо- 
ты програмны, Вы можете получить 
готовую програнну, если будете 
строго придерживаться указаний по 


ставдартного * 


` для желаеного рисунка. 


набору Бейсик-программы и блоков 
кодов, 

Теперь несколько слов о том, 
что хе может эта програнна. Дия 
простоты пользования в программе 
не применяется полностью графи- 
ческий режин, при поноши которого 
нолно рисовать линии, о: оСти! 
ит.д. Применяется только / псев- 
дографика, позволяющая печатать 
какой-либо символ в то знакоместо 
экрана, гие находится курсор. 
Синвольный вабор же сделан такой, 
что при нажатии буквенных клавиш, 
печатаются всевозможные символы: 
кружочки (это прежде всего, как в 
обычной игре "Мозаика"), а также 
квадратики, треугольнички, крес- 
тики и т.д., (насколько хватает 
Фантазии) по количеству буквенных 
клавии. 

Изображение строится, 
мер. из кружочков, как в игре 
“Нозаика“ из круглых Фишек, но в 
отличие от прототипа, ножно ис- 
пользовать "Фишки" разной Формы и 
к тому же не беспокоиться о том, 
что фишек нужного цвета не хватит 


Символьный Набор для ИГРЫ 
построен таким образом, что не- 
реключивяись в режим САР5 1.0СК, 
можно печатать буквы русского ал- 
фавита. Этот режин нужен не для 
того, чтобы использовать програн- 
му в качестве текстового редакто- 
ра. а для того, чтобы можно было 
подписать рисунок. 

дая перемешения курсора по эк- 
рану используются Функциональные 
каавиши перемемения курсора, а 
при помощи других функциональных 
клавиш производится переключение 
цвета чернил, бумаги, бораюра, 
включение и выключение режимов 
повышенной яркости и инверсии. 
При распределении этих Функций 
Между клавишами, ориентир был 
сделан на ‘удобство пользования 
вля клавиатуры “5РЕСТВОН+" или 
что то же самое, отечественного 
компьютера "ДЕЛЬТА-С”. (Хотя это 
Распределение Вы можете изменить 
на свой вкус. } 

Краткая инструкция но пользо- 
ванию программой всегда находится 
в памяти компьютера и в любой но- 
мент ножет быть вызвана на экран 
ИРИ нажатии ВКЕАК, при этом изоб- 
ражение с экрана залонивается и 
после ПРОСНОтТРа ИНСТРУКЦИИ ВОЗВ- 
рашается обратно на экран, 

В программе предусиотрена воз- 
ножность сохранения рисунка на 
внешнем носителе (магнитная лен- 
та, дискета) и загрузки рисунка с 
внешнего носителя. Предусмотрена 
также возможность оперативного 
сохранения рисунка в специальном 
буфере в памяти компьютера. С 
этим буферон можно производить 
следующие манипуляции: переслать 
рисунок с экрана В буфер, вызвать 
рисунок из буфера на экран, а 
также обменять содержимое экрана 
и буфера между собой. 

Носле того, как работа’ над ри- 
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|сунком закончена, можно насла- 
Лдиться результатани своего труда 
под музыкальное сопровождение 
компьютера, нажав. ЕЧТЕК, 

Для дальнейшей работы, при не- 
Побходиности, ножет быть произве- 
|дена очистка экрана. 


| Теперь, когда мы кратко озна- 
пконились с возможностями програн- 
НМЫ "МОЗАИКА", можно переходить к 
подробному описанию программы. 
Она набрана на Бейсике, ‚но в ней 
используются Фрагиенты в. нашинных 


кодах. в частности те, о которых 
говорилось в “7Х-РЕВЮ", см. выше. 
Учитывая тот Факт, что у нно- 


пгих пользователей инеется "БЕ- 
ИтА-диск интерфейс”, ° програмна 
построена таким образон, что 


адаптация ее под "БЕТА-ДИСК” сво- 
Пдится к минимуму. 06 этом будет 
подробный разговор в = конце 
Истатьи. 

| Кроме Бейсик-Ффайла и Файла в 
машинных кодах лля работы прог- 
раммы необходимо подготовить нап- 
Ример, при помоши "АВТЗТУОТО”, 
заставку-картинку, на которой 6у- 
|дет содержаться краткая инструк- 
1щия по клавишам управления прог- 
рамной. Форма, цвет, › размер 
шрифта, окрухающее оформление - 
произвольное, пусть его Вам подс- 
кажет Ваша Фантазия. Но тан кроме 
названия программы должна быть 
следующая информация: 


КЛАВИШИ УПРАВЛЕНИЯ: 


ГВВЕАЕ 1 -Вызов инструклии 
ГЕ. НОГЕ] -Снева пвета чернил 
(СРАРН }-Изменение яркости 
[ЕДТГ )-Смена цвета бумаги 
(ТНУ. У, )-Инверсия вкл. /выкл. 
(ТВ. У.)-Смена цвета бордюра 
ТГРЕГЕТЕ) -Забой символа 
ГЕНТЕК 1-ПРоСНОоТР рисунка 

‹ (С. ВОСК] -Режин граФика/текст 


|Буквенные клавиши-гра$. синволы 
(С$1+буквенные клавиши а также 
1155] +2, 0, У, Ц, р - русские буквы 


ЗТОР [55$1+А - Очистка экрана 

<: [551+ -`Запонинание экрана 

>= 155}*+Е - Экран из буфера 

<> [551+\ - Обмен экран/буфер 
[55] +Т - Загрузка экрана 
[$551+5 - Запись экрана 


Подготовив Файл с этой картин- 
кой-инструкцией, запишите его на 
пнагнитоФон под именем “тота1к $" 
| СООЕ 16384, 6912. 

Кроме этого’ надо подготовить 
еше один кожовый Файл для работы 
ПРОоГРамны, Это будет "пюза1к” 
СОБЕ 63824, 1684. ‘Сюда входят сле- 
дуюагие коды: 

\ Во-первых, это символьный на- 
бор, содержаший русские буквы и 
Графические образы. Причем кодам 
с 54 но 95 (заглавные латинские 
буквы) соответствуют русские бук- 
вы, а кодан с 96 по 127 (строчные 
латинские буквы) соответствуют 


графические синволь. Русские бук- 
вы в символьном наборе следует 
расположить в соответствии с тем, 
как подписана Ваша клавиатура. 
Ножно, например, в соответствии с 
кодани КОИ-Т; "ЯВЕРТЫ,..", а мож- 
но в соответствии с клавиатурой 
пишущей машинки:  “ИЦУЕЕН. ..”. 
Поскольку программа не претендует 
‚на стыковку с принтером в литер- 
ном режиме, то возможен любой ва- 
риант. Из-за того, что на "Спект- 
румё” меньше клавишей чем на 
пишущей машинке, часто применяет- 
ся вариант со смешенным верхнин 
рядон "ЦУКЕНГ...". В общем, как 
Вам нравится, так и делайте. для 
принера ниже приведен символьный 
набор в кодах КОЙ-Т (имеется в 
виду только соответствие заглав- 
ным латинскин буквам, так как на 
месте  строчных букв находятся 
графические символы "МОЗАИКИ". 

` Переставить русские буквы в 
соответствии с тем, как отнмарки- 
рованы клавиши. Вашего конпьютера 
очень просто при поноши программы 
*АВТ5ТООТО”. В ней для этого пре- 
дуснотрена специальная возмох- 
НОСТЬ. Надо загрузить предлагае- 
ный Символьный набор в 
“АЕТБТУОТО", затем в текстовом 
режиме, начиная из левого верхне- 
го угла, напечатать 32 русские 
буквы в соответствии с требуеным 
НОВЫМ `ПОРЯДКОН расположения, а 
затен, задав окно вокруг этих на- 
печатанных букв скопировать их с 
экрана в символьный набор, начи- 
ная с символа "®", пользуясь опе- 
рацией САРТИУКЕ РОНТ меню РОНТ 
ЕРТТОК. 

Сразу же за символьным набором 
следует блок '90С-графики. Правда, 
используется в программе всего 
лишь один символ ‘006 - "А", одна- 
ко нет гарантии, что в дальнейшем 
программа не будет усовершенство- 
ваться, поэтому  зарезервирован 
понный объем У0б-блока, 168 байт. 

Кроме символьного набора и С 
-блока в кодовом Файле расположен 
блок кодов "ОН ЕВКОЕ СО ТО" (см. 
*7Х-РЕВЮ" Н 5-6 за 1992 г. атр. 
113). Затен идут два небольших 
блока, длиной по 32 байта каждый. 
воспроизводяшие звуковые эффекты, 
(сн. "7х-РЕВЮ” Н 11-12 за, 1992 г. 
стр. 241). 

Далее расположено 
блоков кодов, осуществляющих пе- 
реброску из экрана в панять или 
из памяти ва экран. Для простой 
переброски используется команда 
Т018, и тогда процедура переброс- 
ки будет выглядеть следующин об- 
разом: 


несколько 


102 Н., 16584 адрес экрана 
р вс, 5942 длина кодов 
2 Е, 50000 адрес буфера 
ГртЕ 
ВЕТ 


Такой блок кодов имеет длину 
12 байт и ножет быть загружен в 
любое место паняти. Разумеется. 
при переброске экрана в буфер, 
содержимое последнего будет унич- 


`пля контроля при переходе к внем- 


тожено. как и содержиное экрана 
будет уничтожено при переброске 
буФера на экран. Для того, чтобы 
обменять содержиное экрана и бу- 
Фера без уничтожения обоих, при- 
меняется другая процедура. она, 
взята из программы “"5ОРЕЮСОПЕ" 
(нат); ` 

гр ПЕ, #С350 

тр н., #4000 


(1) 


а: 9: (2) 
РИЗН ВС (3) 
гр  в,#00 (4) 
12 А, (НЫ) {5} 
РОЗН АЕ 
12. А, (ПЕ) (5) 
10 (НГ), А {7} 
РОР АЕ (8) 
го (РЕ), А 
тяС нь (9) 
тс ПЕ 
РУНЕ ЗАВОВ (10) 
РОР ВС {11) 
РУНА %АВО8 {12) 
ЕТ ь 
Блок кодов имеет ДЛИНУ 25 


байт. Его можно загружать в любое 
место памяти. Адрес загрузки яв- 
ляется адресоц старта. Адрес на- 
чала дисилейного Файла экрана за- 
дан в регистре Н, а начало 
буфера - в регистре ПЕ (1). Осно- 
ву блока составляет процедура об- 
мена содержимого одной пары ячеек 
экрана и буфера (5)-(9). Сначала 
в аккумулятор загружается содер- 
жимое ячейки экрана (5) и отправ- 
ляется для хранения на стек. За- 
тем в аккумулятор загружается 
содержиное соответствующей ячейки 
буфера (6) и‘из него пёрегружает- 
ся в ячейку экрана (7). После 
этого в аккумулятор со стека счи- 
тывается запомненное значение эк- 
ранной ячейки (8) и записывается 
в буфер, После завершения обнена 
ячеек содержимое регистров НМ, и 
РЕ увеличиваются на единицу (9) 
для перекода к следующей паре 
ячеек. 

Для полной переброски дисплей- 
ного Файла вместе с атрибутами 
надо зту последовательность дейс- 
твий повторить 6912 раз. Это осу- 
шествляется двумя циклани (один 
ВНУТРИ ДРУГОГО). Внутренний цикл! 
(4) -(10) организован с максималь- 
но возможным числом повторений (в 
счетчик цикла - регистр В записы- 


вается 0, что соответствует 255] 
повторениям). Внешний цикл должен!’ 
. содержать, таким образом 6912/256 


21 (или #1В) повторений. Внешний 
цикл - 42)-(12). Так каки во 
внутреннем и во внешнем циклах 
счетчиком числа повторений явля- 
ется регистр В. то для того, что- 
бы значение регистра В не теря- 
лось при переходе от внешнего 
цикла ко внутреннену, оно запоми- 
нается на стеке {3} и снинается 


нему циклу (11). 
Далее - возврат в вызывающую 
програмну. * 
Перед первым запуском этого 
блока кодов необходимо позабо- 
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титься о том, чтобы в буфере на- 
ходились атрибуты белого экрава, 
иначе, если 5уФер содерхал, нап- 
ример, нули, то после переброски 
экран станет черным. 

При однократном выполнении 
Этого блока кодов происходит сме- 
на изображения экрана и буфера. 
При ‘следующен выполнении восста- 
навливаются прежние изображения. 
Это используется, например, для 
вызова на экран инструкции и сох- 
ранения при этом рисунка. 
для организации разнообразных 
юбменов ‘нежду экраном и буферани 
есть два варианта. Первый: иметь 
Юдин блок кодов пля простой пе- 
Реброски и один баок кодов для 
обмена экрана и буфера. А перед 
выполнением требуемой переброски 
подставлять в нужные ячейки паня- 
ти (при помоши Бейсика) соответс- 
твующие числа, задавая параметры 
Н, и БЕ Но учитывая небольшую 
длину кодовых блоков, ИХ НОЖНО 
заготовить такое количество, ка- 
кое потребуется для’ всевозможных 
перебросок (подготовка исходных 
параметров при помоши Бейсика 
съест больше памяти). Поэтому в. 
програнме используются несколько 
блоков для переброски. 

Еще в кодовом файле‘ "поза1к”" 

СОРЕ находится нашиннокодовый ну- 
зыкальный Фрагмент, воспроизводя- 
ший знакомую мелодию. Он подго- 
товлен при помоши музыкального 
редактора “МНАН“. 
Дия того, чтобы Вы могли пол- 
ностью воспроизвести у себя прог- 
Ранму "ВОЗАИКА". ниже приведены 
все используемые в програнме бло- 
ки. кодов. 


‹Расснотрим распределение памя- 


Буфер, зарезервированный 50000 
для запоминания экрана 
6912 байт 
Буфер, зарезервированный 56912 
для ‘хранения титульной заставки 
{инстТрУКЦИИ) 
6912 байт 
Синвольный набор 63824 
768 байт 
Блок И0б-графики 64592 
168 байт 
Блок ОН ЕКРОЕ 60 ТО 64760 
* 73. байта 
Звук 50080. 1 54833 
32 байта 
Звук $50085 а 64865 
За байта 
Процедура для переброски 
экрана в ‘буфер 64897 


12 байт 


Процедура для переброски 
буфера на экран 
12 байт 


Процедура для обмена 


экрана и буфера 53921 
25 байт 

Процедура для переброски 

инструкции (заставки} 64946 


‘из памяти на экран 
12 байт 


525 байт 


Теперь, когда мы разобрались в 
обтих чертах с кодами, можно при- 
ступить к описанию Бейсиковского 
Файла програнны “НОЗАИКА“. Текс- 


`товые сообщения на русском языке 


в листинге програнны напечатаны 
по-русски, хотя так на самом деле 
‘не выглядят. Это сделано только 


для удобочитаемости программы. 
По-русски они будут выглядеть 
после переключения синвольного 


набора при работе програнны. 


5 ото 100 
2 ВОКРЕК 7: РАРЕВ Т: ТНК О: С 
ТЕАВ 49999: РОКЕ 23739, 111: ТОАБ 
"пюзха1к $”СООЕ 16384 
3 ГОАР ”вота1К"СОШЕ 63824 
4 ВАНГОНТРЕ 955 64946: С0 З0В 
Т: 60 $98 20: С1.5 : РАНРОНТ2Е Ц 
5Е 64897: КОМ 
5 ЗАУЕ "МОХАТК" 1ЛНЕ 2: ЗАУЕ 
°шота1к $"СОБЕ 56912, 6912: ЗАУЕ 
*пога!1К”СОРЕ 63824, 1588 
65 УЕВТЕУ “"МОДАТК": УЕРТЕУ "ПЮ 
2а1к $”СОРЕ : УЕВТЕУ "поза1к"Сор 
Е : 60 то 9999 * 

Т РОКЕ 23615,80: РОКЕ 23616, 2 
52: ВЕТОУЮН : ВЕН паз 
8 РОКЕ 23606, 80: 
48: ВЕТОБН : ВЕМ гиз 

9 РОКЕ 23606, 0: РОКЕ 23607, 60 
: ВЕТОЕН : БЕН 1а%& 

10 РОКЕ 64812, РЕЕК 23670: РОКЕ 
64813, РЕЕК 23611: КАНПОНТОЕ 058 
64760: ВЕТОЕН : БЕН егг 


РОКЕ 23607, 2 


20 60 508 8: РЕТИТ АТ 1,0; ТЕ 
Т; РАРЕЮ 1; ВЕТСНТ 1; ЕЪАЗН 1: ^ 
ы нажмите любую кла 


вишу ь 

22 . 1,26: ВЕЕР .1,г0 

24 ВАНПОНТЕЕ 29: СО 508 10: РА 
5Е 0 


29 КЕТОЕН 
30 ВОЕРЕЕ Т: 1ИРОТ ;: РЮТНТ РА 
РЕЮ 1; ТМУЕЮЗЕ О; АТ 0,0; 


39 ВЕТОЕН 

40 {Е х>51 ТНЕК ТЕТ х-0: 1ЕТ 
У=У+1 

42 ТР х<0 ТНЕМН ТЕТ х-31: 
У=У-1 ь 

44 ШЕ у>21 ТНЕН ТЕТ у=1 

46 ТЕ уУ<1 ТНЕН ТЕТ у-21 

49 БЕТОЕН 

50 Со $08 30 у 


БЕТ 


‚ 52 РЕТЧТ АТ 0,0;" введите имя 
(макс. 10 символов) “ к 
5860 558 9: ТИРОТ ЛЕ +3: 1 
Е 1%-"”" ТНЕК БЕТ 4$-"$" 
56 60 508 30 
59 КЕТИЕН 
60 60 508 8: 
Т; РАРЕК 2; 


РЕТНТ АТ 0,0; 
ВЕТЕНТ 1; 
ошибка ! 
РАЦЗЕ 0 


Ты 
ЕЪАЗН 1;" 


*: ВЕЕР 1.0: 

69 БЕТОЕН 
- 10 БАМПОМТТЕ 60: 60 ЗВ 10: 10 
АО +$СОРЕ 16384 

79 ВЕТОВЕ 

80 БАНПОНТ2Е 60: 60 508 10: 5А 
УЕ +%СОРЕ 16384, 6912 

89 БЕТОЕН 

100 ВЕТ 7-20: ЦЕТ #=3: ВЕТ Ъ5=3 
: БЕТ РЕТ: [ЕТ 1=2: БЕТ Ь-1: ЕТ 
#=0: ЕЕТ 9:0 
1000 РАНРОНТТЕ 1000: 60 508 10: 
ВОКРЕЕ ЬЬ: 1ЫРИТ ;: 60 508 8 
1010 РЕТЕТ РАРЕВ 7; 1НЕ 0; ВВС 
НТ 0; ТНУЕРЗЕ О:АТ 0,0; чернил 
а- яркость- бунага- же: 
1020 РЕТИТ ТИК 1; РАРЕВ р; ВЕС 
НТ Ь; ТНУЕВЗЕ У;АТ 0, 10; СНЕЗ 143 
АТ 0,29; * *; ТНК Т.АТ 0,20; ТНУ 
ЕИЗЕ 1;°"; 
1100 60 50В 40 ь 
1110 РЫТИТ ОУЕВ 1; РАРЕК 8; ТИК 
8: ВРЛСНТ 8; ЕЫАЗН #; 
ЗАТ У, ж; "А"; СНВ® 8;: БЕН А-СВАРИ 
1200 РАНООНТТЕ 2000: 60 508 10: 
РАОЗЕ 0: ВЕТ 1$-1НКЕТ $ 
1210 РЕТЫТ ОЧЕР 1; РАРЕЮ 8; ТИК 
8; БЕТСНТ 8; РЫАБН 0; ТНУЕЮЗЕ У 
;"А"; СНЕ® 8;: ВЕМ А-СКАРН 
1300 ВАНРОМТТЕ 1000: СО $0 10 
1310 ТР СОБЕ ТНКЕЯ$-8 ТНЕН ТЕТ 
х-к-1: 60 ТО 1100 
1320 ТЕ СОБЕ ТНКЕЗ$-9 ТНЕН ТЕТ 
х-х+1: 60 ТО 1100 | 
1330 ТЕ СОРЕ ГНКЕЯЗ-10 ТНЕН ЦЕТ 
7:7+1: 60 ТО 1100 
1340 ТЕ СОРЕ ТНКЕТ$-11 ТНЕН ТЕТ 
7:7-1: 60 ТО 1100 
1350 ТЕ СОБЕ ТНКЕУЗ-12 ТНЕЯ ТЕТ 
Х-К-Е: 60 508 40: РРТНТ АТ У, х; 
* *: РАНРОНТТЕ 05Р 64865: 60 ТО 
1100 
1360 ТР ТНКЕУ$-" " ТНЕН РЕШИТ А 
Туя; " ": КАБООНТЕЕ 058 64833: 
БЕТ х-х+1: 60 ТО 1100 
1365 ТР 1НКЕТ$-"!" АНО р+1=0 ТНЕ 
Н 60 то 9999 
1370 1Е 13=" АНО " ТНЕН ТЕТ 13= 
"Г”: КЕМ ТОКЕЯ 
1380 ТЕ 1%-" ЗТЕР " ТНЕН ЕТ 1% 
="\": ВЕН ТОКЕН 
1390 ТР 1%:" ОЕ * ТНЕН ЦЕТ 13-* 
}": ВЕМ ТОКЕН 
1800 ТР 1$>=" " АЫЮ 1$<-"2" ТНЕМ 

РЕТЫТ РАРЕЮ р; ТНК 1; ВЕТСНТ 
Ъ; ТШУЕЕБЕ 9;1$;: ВАНРОНТЕЕ 058 
64833: ГЕТ х-к+#: 60 ТО 1100 
1410 ТЕ 1%=” НОТ " ТНЕН С0 508 5 
0: 60 508 80: КЕМ ТОКЕЕ 
1420 ТР 1%-" АТ * ТНЕН 60 508 50 
: 60 $08 10: ВЕН ТОКЕН 
1430 ТЕ 1$-"<-" ТНЕН 60 $08 30: 
РАНРОНТ2Е 056 64897: РЕТНТ АТ О 
ОА экран в памяти 

в 0.1,26: РАОЗЕ 50 

1440 ТЕ 1$:">-" ТНЕН 60 508 30: 
БАНРОНТТЕ 05Е 64909: ВЕЕР 0. 1,20 
1450 ТЕ 1%="<>" ТНЕН С0 ЗВ 30: 


з 


ТНУЕЮЗЕ У] ° 


о 
й изо сок 1$=6 ТНЕМ ПЕТ Е-Е= 


р ВАНПОНТАЕ 058 64921; 
6: ВЕЕР 0. 1:20' 
160 "ТР И9 =" 5ТОР` * ТНЕН, 15 


ВЕЕР 0.1, а 


т ти <орЕ ри а ты ТЕТ Ь=Ь 


завочР. ‚сое {43- 5 НЕК ЦЕТ У=У= 


0: РОЖЕ 23658/8*(2-#) 

1500'1Р СОБЕ’1$-44 ТНЕН БЕТ 1-1 
41) (157) 7 

1510 ТЕ СОБЕ 1%-Т ТНЕН ШЕТ р- (р 


НГ (РТ) 


1520 12 СОБЕ`1$=4 ТНЕН \ЕТ ЪЬ-( 
5+1) а ЪБ<Т) 

1530 ТЕ СОРЕ 13-13 ТНЕН 60 5065 
: : ШЕХТ с; ВАКОО 


2010 КАНРОНТ2Е 058 64958: ВЕЕР. 


1,26: ВЕЕР .1,20 
2020 ВАНГОМТ2Е 2030: ©0 З0В 10: 
|РАЦОЗЕ 0 


2030 КАНГОНТ2Е 95Е 64958: ВЕЕР. 
1,26: ВЕЕР. 1,20 
2040 ВОЕОЕХ ЬЬ: 
200 

9999 СО 55В 9: ВОВОЕЕ Т: ны 23 


ТЫРОТ ;: 60 101 


1658, 16 


переменные, применяеные в 
программе: 
у - вертикальная координата 


курсора (строка) 
х - горизонтальная координата 
курсора ‹колонка) 
ЪЬ - цвет бордюра 
Р - цвет бумаги (РАРЕК) 
1 - цвет чернил (ТНК) 
Ъ - яркость (ВВТСНТ) 
+ - мигание (ЕЪАЗН) 
7 инверсия (Т1НУЕБ5Е) 
1% - важатая клавиша 


АВТОСТарт ПРОГРАММЫ ПРОИСХОДИТ 
со строки 2. Здесь задаются ивета 
экрана и резервируется место для 
Работы. блока кодов програмны. 
Кроме этого, при помощи РОКЕ от- 
меняется вывод ва экрая сообщений 
‘тица: ."Вуфез:" при загрузке бло- 
ков . кодов. Первый загружаемый 
блок - это заставка-инструкция, и 
благодаря этому РОКЕ при загрузке 
следующего  колового Файла (в 
строке 3} экран не будет испор- 
чен. Этот приен уже был описан на 
страницая "РЕВЮ". 

В строке 4 заставка-инструклия 
при поноши блока матинных кодов 
{СНОТРИ распределение памяти вы- 
перебрасывается в буфер для 
хранения инструклии (в адрес 


Т производит переключение блока 
1%: на загрухенные коды. Выполня- 
ется подпрограмна Со $508 20, вы- 
воляшая на экран табличку *нажни- 
те любую клавишу" (место для вы- 
вода таблички назначьте такое, 
чтобы она не уничтохала информа- 
кии на экране). Звуковой сигнал 
говорит о том, что загрузка нрог- 
раныы завершена и она ядет конан- 
цы начала работн. Програмна оста- 
навливается на РАОЗЕ О в строке 


Далее ‘подпрогранна 60 508, 


24, а непосредственно перед пау+ 
ЗОЙ КОНСТРУКЦИЯ: КАНРОНТУЕ 29: 60 


58 10’задает параметр. дня работы. 


кодового' блока’ "ОН ЕКРОВ: 60 ТО”, 
что ‘означает. переход ‘в’ случае 
ошибки (нажатии ВЕЕАК} на. строку 
с номером 29; То есть при нажатии 
любой клавиши, в тон числе и 


ВЕЕАЕ, ‘буцет выполнен возврат на 
СТРОКУ 4. При ‘этом проискодит 
следующее. Очишается экран ‘и в 


этот момент содержимое этого. чис- 
того экрана засылается в’ буфер 


экрана (в адрес 50000), подготав- 
ливая таким образом атрибуты 
изображения в буфере в случае 


последующего обмена экрана и 6у- 
Фера, чтобы экран после‘ обмена нё 
выглядел черным. Теперь подготов- 
ка завершена и происходиг старт 
программы точно так же, как Вы 
будете это делать после остановки 
програмиы - командой КОН. 

по команде РОН происходит 
старт программы с первой строки, 
которая  переадресует на строку 
100. В строках до’100 расположены 
различные подпрограммы; их назна- 
чение будет рассмотрено в процес- 
се описания. В строке 100 присва- 
иваются. первоначальные значения 


переменным, используемым в прог- 
рамные. После этого начинается 
собственно выпоанение основной 


части програнмы, 

Строка 1000 является базовой, 
на нее может быть сделан переход 
ИЗ различных мест програмны, поэ- 
тому в`начале этой строки задает- 
ся переход ва нее же в случае 
ошибки, которая может возникнуть 
при работе программы. далее зада- 
ется цвет бордюра и происходит 
окрашивание в цвет бордюра двух 
системных строк экрана. Они для 
создания рисунка недоступны. 
Подпрограмма 60 508 8 производит 
переключение символьного набора 


на тот, который загружен, с гра- 
Фическики образами и русскини 
буквами. 


Строки 1010 и 1020 выволят в 
верхней части экрана индикаторвую 
СТРОКУ, В КОТОРОЙ отображается 
текушее состояние цветов чернил и 
бумаги, а также значение яркости. 
Индикаторная строка также недос- 
тунна для создания. рисунка. 

Строка 1100 также является ба- 
зовой. На нее также происходят 
переходы из различных мест прог- 
ранны. На нее замыкается малый 
цикл опроса клавишей в который 
ВХОДИТ Опрос ‘КУрсорных клавишей, 
клавиши забоя, пробела и буквен- 
вых клавишей. Поскольку быстро- 
действие Бейсика невелико, такой 
приен позволил реализовать вполне 
приемлимое быстродействие при не- 
ренешении курсора и  печатании 
символов. 

Подпрограмма 60 $08 40 - это 
контроль положения курсора. При 
перемешений курсора, при достиже- 
ним правого края экрана происхо- 
пит переход на левый край но на 
следующей строке экрана (строка 


40 программы). При достижении ле- 
вого края - курсор перескакивает 
на ‘‘вравый край на  предндушую 
СТРОКУ экрана’ (строка. 42). 
вертикальных перемешениях. курсора 
изменения номера колонки не. РОС 
ИСХОДИТ (СТРОКИ 44, 46). ; 

Строка 1110 выводит на. энран 
курсор. Его изображение ‘закрепае- 
но’ за символом “А”. У0С-графики. 
цвет курсора определяется” теми 
атрибутани, 
для’ этого `знакоместа. 
ничего еше ве нарисовано, то это 
белая бумага и черные чернила. 
Однако, если в этом ‘зйакоместе 
уже напечатан какой-либо синвой, 
то цвет курсора будет зависеть от 
атрибутов этого знакоместа. Кроме 
того, Курсор печатается в режиме 
СУЕК 1, поэтому сн накладывается 
на символ. ‘находящийся ‘в этом 
знакоместе. Вид курсора будет мет 
няться в зависиности от  включен- 
ного режима инверсии, а также от 
паранетра мигания: Забегая вие- 
ред. скажу, что мигание курсора 
свидетельствует о переключении из 
режима "графика" в режим "текст", 
или иными словами, это ен 
режина САРЗ ЁОСК, 

В строке 1200 происходит охи- 
дание нажатия клавиши. Так как 
это может быть клавива ВЕЕЛК, то 
на этот случай задается переход 
на строку 2000,’ где происходит 
вывод на экран инструкции. Это 
делается так. В строке 2000 уста- 
навливается белый цвет ‘бордюра и 
ДВУХ НИХНЫХ СТРОК экрана, затем 
{2010) при помоши кодового блока 
проискодит ‘обмен содержиного эк- 
рана и буфера инструкции, затем 
звуковой сигнал и пауза для ожи- 
дания нажатия любой клавиши 
(2020). ’Но непосредственно перед 
паузой - установка блока ОН ЕКВОК 
С0 ТО на следующую после паузы 
СТРОКУ. Теперь при нажатии на лю- 
бую клавишу, в том чисне и на 
клавишу ВКЕАК, произойдет переход 
на строку 2030, то есть будет 
продолжено выполнение программы. 
Еше раз происходит обрашение к 
кодовомУ блоку, в результате чего 
ПРОИСХОДИТ ВОССТановление рисунка 


на экране, а инструкция ‘отправля- 
ется`назад в свой буфер. далее - 
звуковой сигнал, восстановление 


пвета бордюра и двух нижних строк 
экрана. Затем возврат в то место 
програмны,. откуца был сделан пе- 
реход на 2000-ю строку, то есть 
на строку 1290. 


вылолнение программы со СТРОКИ 
1210. Здесь еше раз происходит 
печать курсора в режиме ОУ 1, в 
результате чего восстанавливается 
Прежнее изображение в этом знако- 
несте. 

Со СТРОКИ 1300 начинается оп- 
ределение действий в зависимости 
от нахатой клавиши. Строки 
1310-1340 определяют перемешение 
курсора. 


Строка. 1356 - удаление символа 
в: текушем  знаконесте, ‘Причен в 
зависиности от того, во каком ре- 
‘жиме находится программа; в гра- 
Фическом или в текстовом, ‘забой 
нействует по-разнону. В графичес- 
|ком режиме удаляется. символ ‘в по- 
зипии курсора, а. в текстовон - 
“1символ слева от курсора, так при- 
вычнее при печати текста. Текущий 
Ирежим “графика” или "текст" опре- 
деляется по миганию курсора. Если 
|показатель мигания. #=0, то режим 
|“графика", ‘а если #-1, то режин 
"текст". В зависимости от этого 
проискодит ‘или нет изменение те- 
кушей координаты “х" курсора. 
Удаление символа происходит путем 
печати пробела в позиции с теку- 
шини координатани, что сопровох- 
дается соответствующим, звукон, 
| Строка 1360 реагирует на нахжа- 
|гие пробела. В этом случае, каки 
|при удалении синвола, происходит 
печать пробела’ в энакоместе с те- 
|кушини координатами, что. также 
| приводит к удалению прежнего сим- 
вола, однако независимо от режима 
(мигающий курсор или нет) проис- 
| ходит увеличение на единицу гори- 
зонтальной координаты курсора. 
Это ножет оказаться ‘полезно при 
"расчистке". небольших участков 
рисунка в режине "графика", а в 
режиме “текст” привычно печатает- 
1ся пробел. (Если Вы считаете, что 
|это слишком запутанно, то просто 
удалите строку 1360. } 
Строка 1365 является 


"жучком", 
программу 
изненений 
остановки 
(5УНВОЕ 


для внесения каких-либо 
|в процессе отладки. Для 
надо ввести. символ ”!" 
ЭШЕТ (+ 1). Чтобы остановка не 
|происходила самопроизвольно в 
процессе работы при попытке напе- 
|чатать этот символ, для остановки 


ное условие: чтобы перененвые, 
[определяющие цвета чернил и бума- 
ги имели нулевые, значения (черные 
чернила и черная бумага - то есть 
ситуация, бессмысленная при обыч- 
ной работе). В случае соблюпения 
| этих условий програмна переходит 
|на строку 9999, в которой проис- 
ходит перекаючение на символьный 
[набор ПЗУ Снектрума, установка 
Гбелого бордюра, а также принуди- 
йтельное отключение регистра САРЗ 
1.0СК для удобства редактирования. 
| Строки 1310-1390 нужны для то- 
|го, Чтобы ножно было печатать 
|символы, которые обычно можно на- 
печатать в расширеннон режиме 


|ЕХТЕНР НОЕ. В символьном наборе 
|КОИ-7Т русские’ буквы "М" и "Щ* 
прасположены на месте "[" и "1", а; 


последние набираются в режиме 
ЕХТ. НООЕ. Поэтому используется 
позволяющий вводить эти 


"АНО" и "ОЕ" соответствен- 
Аналогично вводится "Э”" вмес- 
"ЗТЕР",. так как эта буква на- 
символа “\”. 
позаинство- 
.) Если же Вы 


программы требуется дополнитель-‘ 


будете использовать символьный 
набор с. КРУГИН расположением 
РУССКИХ букв, ТО пПРОДУНайте‘ воп- 
Рос набора тех букв, которне ‘не 
помешартся на: клавишах с 26-ю ла- 
тинскими буквами. 

Строка 1406 выполняет печать 
графических символов и русских 
букв. Печать. сопровождается спе- 
циФфическим звуком, ВОСПРОИЗВОДИ- 
мым блоком в кодах. В том случае, 
если программа находится в режиме 
"текст", то очевидно, что после 
печати очередного синвола, Курсор 
должен переместиться на следующее 
знакоместо. При построении рисун- 
ка по-видимону такого перемешения 
не должно быть, так как заранее 
не известно, в какую сторону дол- 
хен быть сдвинут курсор для пост- 
роения рисунка {может быть. вверх 
или вниз). Поэтому в режиме "гра- 
Фика" перемещения курсора не про- 


исходит. Режим определяется по 
миганию курсора (параметр $). 
Вопрос © том, должен пи курсор 


перемещаться или нег является в 
сбщен-то спорным, поэтому, если 
Вы хотите, чтобы КУРСОР всегда 
после печати перенещался на одну 
позицию вправо, то в строке 1400 
вместо; х-х+{ подставьте: х-х+1. 

Строки, связанные с нажатием 
клавишей, с 1300 по 1400 заканчи- 
ваются все одинаково: зациклива- 
нием на строку 1100. Это, так`на- 
зываемый, налый цикл опроса 
клавишей. Это, как уже говори- 
лось, сделано для ускорения реа- 
гирования программы на нажатие 


-основных клавишей. Со строки 1410 


начинается расширенный дикл опро- 
са. В конце этих строк нет пере- 


хода на базовую строку. Переход 
ПРОИСХОДИТ в самом конце расши- 
ренного цикла: в строке 1999 


програнма зацикливается на. строку 
1000. 

Строка 1410 ‘обеспечивает за- 
пись экрана на  нагнитную ленту 
при нажатии $УМВОТ, ЗНТЕТ+"5" (на 
клавише ключевое слово 5АУЕ). 
Вначале производится ввод имени 
Файла (60 598 50). Вы нохжете не 
задавать никакого имени, а просто 
нажать ЕНТЕК. тогда Файл будет 
записан с именем “$”. Ножно отме- 
нить ввод имени и Вернуться к ра- 
боте программы, если при вводе 
имени нажать "КУРСОР ВНИЗ". (В 
обычной Бейсик-програнне в таком 
случае происходит остановка прог- 
ранмы по ошибке, но В програнме с 
блоком ОН ЕВКОЕ СО ТО происходит 
переход на заданную строку. Стро+ 
ка для перехода по ошибке была 
задана последний раз в строке 
1300, то есть произойдет переход 
На СТРОКУ 1000.) После ввода име- 
ни выполняется подпрогранма запи- 
си 60 5В 80. В этой подпрограмие 
блок ОН ЕВКОК СО ТО устанавлива- 
ется на строку 60. Это позволит 
Ван прервать в случае необходи- 
мости запись и вернуться к работе 
через подпрогранму с адреса 60. 
Это вывод на экран таблички 
ОШИБКА” и звуковой — сигнал. 


РЕТОКН в конце. этой подпрограммы 


вернет на строку 1420.. 


Строка 1420 обеспечивает заг-! 
рУзку экрана“ <“ магвитной ‘ленты! 


при нахатии ЗУНВОГ 5НЛЕТ + "1" 
(ключевое слово 1РОТ}. Привыч- 
нее, наверное, 
клавишей "1", › или ".* 
слово 1.0А0), однако эти варианты 
соответствуют символам. печатае- 
ным в текстовом  рехиме: 
"-". Если все же Вы считаете, 
клавиша “1” неудобна, 
попробовать конпромиссный вари- 
ант. Вместо 1120 надо будет новую 
СТроку расположить. внутри налого 
цикла опроса клавишей: 


1395 ТР, 1$="=" АБО #20 ТНЕНМ 60 54 
В 50: 60 508 70: 60 ТО 1000 


При этом, правда, 
дет возможна только в режиме 
"графика". 
сохранится возможность печатать) 
“-". Выбирайте, что удобиее. 

Строка 1430. позволяет  сохра- 
нать 
{с адреса 50000). Переброска про- 
изводится при помоши нашиннокодо- 
вого блока. В пропессе работы над 
рисунком полезно периодически де- 
лать запоминание экрана. ‘Строка 
1446 производит противоположное 
действие - вызсв экрана из 
ти. Например, 
ненений в  тисунке, захочется 
восстановить‘ предыдущий вариант. 
Строка 1450 производит обмен  эк- 
Рана и буфера без потери изобра- 
жения обоих. Есть ‘возножность 


‘сравнить ‘два варианта рисунка и 


выбрать лучший. 


Строка 1460 выполняет очистку! 
экрана при нажатии 5УНВОГ, 5НТАТ +1 


"А" (ключевое слово ТОР). 


СТРОКИ 1410-1520. позволяют из- | 


менять яркость, инверсию, ‘пврек- 
лючать режим "графика" - “текст”, 
изненять вет чернил, 
бордюра. Для наглядности выраже- 
ние типа Ъ-Ь=0 можно было бы за- 


писать так: `Ъ= (Ъ:0). То, что сто-| 
ит в скобках, является логическими 
выражением, оно равно ‘единице, 


если Ь-0. Таким способом достига- | 


ется переключательный эффект из- 
менения яркости, инверсии и режи- 
ма "графика" - "текст* при нажа- 
тии соответствующих клавиш. ‘При 
переключении цвета чернил, ‘бумаги 


и бордюра ситуация похожа. При! 
ивет {напри-| 
1) изменяется от 6 


нажатии на клавишу, 
мер чернил - 
до 7, а при следующем нажатии 
{1=8) логическое выражение (1<7) 
станет равно 0, 
‘торение цикла изненения цвета, 
начиная с 1=0. 

Строка 1550 воспроизводит “ну- 
зыкальное сопровождение". 
ческое проигрывание мелодии про- 
исходит до тех пор, пока не будет 
нажата какая-нибудь клавища. Поз- 
тому, если чуть-чуть 
руку на клавише ЕЧТЕЕ, то мелодия 
прервется на первом же звуке, 
устранения этого недостатка вве- 


был бы вариант с | 
(ключевое | 


ти! 
что} 
то ножно]} 


загрузка 6у-| 


Зато в режиме “текст"| 


экран в специальном буфере] 


паня- | 
после каких-то из-| 


бунаги и| 


что вызывает пов- | 


задержать || 


для 


5 


| 


те 


ЕХТ (в отличие от РАЦЗЕ, 
в данном случае не поножет, так 
как прекрашается как раз при на- 
хатии клавиши). 

| Строка 1999 завершает цикл оп- 
Роса клавишей, передавая `управле- 
ние на. базовую строку 1000. @ 
этого момента работа программы 
повторяется. 


Теперь. когда мы покончили с 
Бейсиком, можно  перекодить к 
конкретным действиям по набору 
программы. Все коды, которые тре- 
буются для работы "МОЗАИКИ", то 
есть то; что расположено с адреса 
63824 и входит в Файл "пота1к”" 
|СОрЕ). приведены ‘ниже. Число в 


зия - это‘'контрольная сумма стро- 
ки. Она поможет Вам при наборе 


которая` 


у 
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| _ ДлЯ набора кодового Файла 
|"поза1кК”" СОБЕ 63824. 1684 можно 
использовать июбую програмну-мо- 
нитор, Которая есть’ под рукой. 
однако ‘для того, чтобы избежать 
ошибок, которые обязательно воз- 
ИНИКНУТ ПРИ Такон количестве наби- 
раемыЕ цифр, удобно будет вос- 
| программой для 
опубликованной в "2Х-РЕВЮ 
1991 г. на стр, 59 в 
"7Х-МОБЕН", оФорнив число- 
"вые данные в виде строк АТА. 
|Учитывая То, 
пвозножность ознакомиться с. этой 
|статьей, мы рекомендуем Вам вос- 
пользоваться несколько измененным 
вариантом программы для ввода. ко- 
|дов. В приведенном ниже варианте 
данные вводятся непосредственно 
|1при поноши ТЫРУТ, (возможно, так 
удобнее). Кронё того, периодичес- 
вводя °5”, Вы имеете вознох- 
ность’ сохранить на ‘ленте то, что 


да еше с разделителями 
| Это сделано для удобочитае- 
мости данных. Вам при наборе надо 
будет вводить Их подряд, например 
для первой строки: 
Е950000000000000000049 ГЕМТЕК1 
Никаких пробелов о или’ двоеточий 
вводить не надо. Ошибки, допушен- 
|ные при вводе, будут отмечены 
Извуковым сигналом, после чего Ван 
|будет предложено повторить ввод. 


1 60 ТО 100 
2 ТОАГ "шоза1к”"СорЕ 
4 60 то 
5 ЗАУЕ "ТЫРОТ” БТНЕ 2: 5ТОР , 
| 100 ВОБКРЕВ 7: РАРЕВ 1; ТНК 0: С 
ТЕЛЕ 29999 
110 91 а(10) 
120 ПЕР ЕН А(д$) = (СОРЕ а$(1)-48. 


2) -48-(7Т АВО ‘а$(2)>"9")) 
[1000 РОКЕ 23658, 8: 1МРИТ 
"; МЕ №3 

ТР В$-="5" ТНЕК С0 ТО 2000 
БЕТ а$-н$ 

БЕТ $10=0 

КОВ 1-1 ТОа 

БЕТ Ъ$-а$(2*1-1 ТО _2и1) 
ТЕТ а(1)ЭЕН А(Ъ3) 

НЕТ ` 

БЕТ ааа-а(1)*256+а(2) 

БЕТ зши-а{1)+а(2) 


”РАТА: 


что не все имеют ^ 


1100 РОВ 1-3 ТО 10 

1110 ТЕТ. Ъ$:53 (21-1 ТО 21) 
1120 ВЕР а -=РМ А{Ъ$) 

1130 БЕТ. зил зша+а (1) 

1140 РОКЕ ааа, а!) 

1150 ЦЕТ. ад4-ааа+1 

1160 ВЕХТ 1 С 

1110 ТЕТ Ъ$-5$ (21 ТО) 

1180 БЕТ. С5=РН Аз) 

1190 ТЕТ с51:защ-е56и ТНТ (ашв/25 
5) 

1200 ТР с$<>с51 ТНЕН РЕТНТ а3; 
ТНУЕЮЗЕ :;" ЕРЮОЕ ! "”; ВЕЕР 1.0: 
СЕТ ааа-ава-8: со ТО 1000. , 
1210 РЕТНТ а${ ТО. 4); 60 ТО 1000 
2009 ЗАУЕ "пота1К"СОРЕ 63824, 168 
4 

2010 УЕВТЕУ "пога1В“СОрЕ 


2020 С1.5 : РЕТНТ аз( то 4): СОТ 
о 1000 
Набрав. эту Бейсик-программу, 


сделайте кН 5 дая записи ее на 
магнитную ленту (автостарт со 2-й 
строки обеспечит в дальнейшем ав- 
томатическую подгрузку уже час- 
тично набранного кодового файла). 
После этого запустите программу: 
КОН и начинайте ввод кодового 
Файла "поюза1К” СОрЕ. При переры- 
вах в работе сохраняйте его на 
ут ленте, вводя "5". 


Теперь последовательность, в 
которой следует набирать всю 
программу "МОЗАИКА". Сначала надо 
заготовить картинку-заставку` при 
помоши ‹ графического редактора. 
Затен набрать‘ приведенный выше 
кодовый Файл. Теперь можно прис- 
тупить к набору Бейсик-Ффайла. На- 
бирзя 10 СТРОКУ,  подставьте в ее 
начало КЕТОЕН: это отключит пока 
блок кодов ОН ЕВКОЮ С0 ТО, блоки- 
`рующий остановку програмны. В 
строке 30.в кавычках набрано 32 
пробела. Набирая текст на русском 
языке, учитывайте, какой русский 
символьный набор будет приненять- 
ся в Вашей программе. Ножно реко- 
мендовать такой подход. Загрузите 


уже набранный кодовый Файл 
"шога1кК”" СОрЕ.. затем. непосредс- 
твенно перед набором русского 


текста, переключите  символьный 
набор командой со 508 8, теперь 
Вы будете видеть набираемый текст 
такии, ‘каким’ он будет на экране. 
Обратное переключение символьного 
набора - 60 508 9. Обратите вни- 
мание: в строках `1110 и 1210 в 
кавычках вводится символ ”А", . ис- 
пользуя ‘графический ‘регистр. (В 
строках 1370-1390 а также 
1410-1460 в кавычках вводятся то- 
кены ключевых слов. ‚ 
После того, как набор Бейсик- 
Файла будет закончен, сделайте 
ЮУК 2 и загрузите заготовленные 
заранее кодовые Файлы. После это- 
го программа начнет работать. 
После`того, как Вы убедитесь, что 
ошибок нет или устраните имеютие- 
ся, можно убрать ВЕТОВН из строки 
10. Запустите программу: ВО и 
поснотрите, как она будет вести 
себя при нажатии клавиши ВЕЕАК. 
Для остановки програнмы исполь- 
зуйте “жучок” 


говорилось выше, если установить 


«загрузкой И вВЫГрузкой 


В СТРОКе 1365: как. 


черный цвет чернил, и "черный п ет й 
бумаги, , то. программу  кожно, оста“ 
новить, ‚введя, . восидица’ ы 
знак (ЗУНВ. $НТРТе11. | Зать 
ВЫГРУЗИТЬ полностью готовую, прог- 
рамму на. нагнитную! ленту, ВыНол- | 
нив РОВ. 5. у 


Теперь пришло время ‘несколько! 
слов сказать о том, как адаптиро- || 
вать програнну цод “БЕТА-ДИСК ин- 
терФейс”. Прежде всего. надо из-! 
менить строки 2 и 3 Бейсик-Файла, | 
добавив перед ключевым словом 
"1ТОАО” префикс: 


ВАНБОМТ2Е 058 15619: ВЕК: 


Кроме того, ‘надо будет изме- | 

нить подпрогранмы, связанные с] 
экранов, || 

начинающиеся со строк 10 и 80. | 
БЕТА-вВариант этих подпрогранн; 

10 ГЕТ егг: 95 15619 : ВЕМ : 1. 
ОАБ. Е$СОБЕ 16384 \ 

12, ТЕ егг<>0 ТНЕН 60 508 60 

79 ВЕТОЕН 

80 КАНООМТ2Е 05Е 15619: ВЕМ : 
ЕКАЗЕ +$СОБЕ 

82 1ШЕТ егг-05Е 15619: ВЕМ : ЗА 
УЕ 1$СОРЕ 16384, 6912 

84 ТР егг<>0 ТНЕН 60 508 60 

89 КЕТОЕН 


В подпрограмме записи Файла 
сначала производится удаление 
предыдущей версии Файла на диске 
с тем именем, которое было зада-! 
но, а затен происходит запись эк- 
рана в новый Файл с таким. именем. | 
В. случае ошибки  чтения-записи| 
Происходит вызов подпрограммы 601 
ЗВ 60, которая выводит предупре- 
дительную табличку. Для простоты) 
програнмы не предусмотрена ‚ вери- 
Фикация. Вы ножете сами организо- 
вать ее, если захотите. Кроме то- 
го, если прецварительное стирание 
Файла с заданным именем Вас. не 


устраивает, то просто исключите) 
СТРОКУ 80. В результате, в тон! 
случае. если на диске уже имеется! 


Файл с таким именем, 


подПРОГРамн„еой СО 508. 60. ы ! 
В строке 52 вместо, “макс. 10] 


символов” подставьте: "макс. ‚8 
символов”. В строке 54 удалите 
все, начиная с 1... до конца 


строки. , у у 
На этом адаптацию под диск 
ножно считать законченной. 


А теперь дополнительная инФор- 
мация для тех, кто занят творчес- 


и поиском, а не просто УИТЕт 
овую программу. 


Нам почему-то гораздо симца-| 
тичнее. вариант, когда все блоки 
кодов, используемые в програнмах, 
находятся в нулевой строке, в об- 
ласти за' оператором РЕН. В част-| 
ности, тогда полностьр исключает- 
ся несанкционированная остановка! 
программы, так как блок кодов ОН 
ЕВКОВ СО ТО, располагаясь внутри! 
Бейсик-программы, может быть ини- 
циирован сразу зе после старта! 


програнны. Это ‹ обстоятельство, 
дополненное грамотно продунанными 
приемами `эашиты, создаст больше 
хлопот для Валоншиков. Програмна 
"НОЗАИКА", конечно. не претендует 
|на такую серьезную зашиту, но 
Пречь сейчас о том, ‹ие методы 
Ивы ножете использовать‘ В своих 
Разработкая, которые, ° возможно, 
как раз пстребуют хорошей‘ заиты. 
Еше одно обстоятельство в пользу 
кодов” в нулевой строке, Такая 
програмна гораздо быстрее загру- 
жается (это относится’ как к наг- 
нитоФоннонУ, так и к. дисковому 
вариантам). А это уже сушествен- 
Иное преимущество для пользовате- 
пля. Все определяется только тем, 
"стоит ли овчинка выделки“, то 
есть какими трудами это дается 
|програмисту. Попробуен показать, 
что в нашен случае эти дополни- 
|тельные эти труды совсен незначи- 
тельны: 

. ПРИ разработке "НОЗАНКИ” ны ис- 
что программа 


[решения этой проблемы уже. говори- 
лось в “"7Х-РЕВЮ” Н 9-10 за 1992г. 
|г. СТРх 197. Но тан была ситуа- 
когда все блоки кодов в ну- 
`Й левой строке были неремешаемыми в 
памяти. Проблема была только в 
том, 
обрашение 
программе 


к ним из Бейсика. В 
"НОЗАИКА” используется 
восп- 


в нулевой строке 
нагнитоФонного‘ варианта, тогда 
| при ‘адаптации под *БЕТА-ДИСК" он 
окажется смешенным на 112 байт и 
|не будет работать. : 
‹Для универсальности програмны 
приненяется следующий прием. Пос- 
|ле загрузки программы все рабочие 
|блоки кодов из нулевой строки пе- 
|ребрасываются в отведенное дия 
них место (с адреса 63824) и ра- 
|ботают уже там. (Программа "МОЗА- 
1ИКА" небольшая, с количеством 
свободной памяти проблем нет. ) 
й В начале нулевой Бейсик-строки 
|находится процедура, осушествляю- 
'шая переброску кодового блока за- 
|данной длины, следующего непос- 
|редственно за этой процедурой, на 
|заданный адрес... Этот с10с0б Вы 
| можете использовать и В других 
своих програмнах. Независимо от 
Итого, где располагается сана про- 
‘адрес, откуда будет про- 
|изведена переброска, 


рется следующим за концон 
процедуры. Вот она: 
5600 ^С07б00 САМ, +007С (1) 
5С03 ЗВ ОЕС 5Р (2) 
5С04 ЗВ ПЕС 5Р 
15605 Е! РОР Н. 
5606 011000 пр 55,#0010 (3) 
5609 09 АРО НВС 
5СРА, 115029 р РЕ, #7950 (4) 
5С0р 019605 ‚ Ш ВС, #0696 
5СЕО ЕШВО Бот {5) 
5сЕё с9 ВЕТ 


.:.- Перебрасываемый массив. 


@ путяхо 


чтобы обеспечить правильное ° 


"МНАМ" (для. 


всегда 6е-, 


Продедура имеет длину 19 байт 
и расположена в начале вулевой 
СТРОКИ Сразу же за ВЕМ, адрес в 
случае  нагнитофонного варианта 
равен 23760 (#500). Но с одина- 
ковым успехом она будет работать 
и В любом другом месте. Кодовый 
нассив.  подлежаший переброске, 
располагается сразу же за проце- 
дДУРОЙ. Аля определения этого ад- 
реса ‘используется такой приен. 
Сначала выполняется подпрогранна 
из ПЗУ (1). Пю адресу.#007С в ПЗУ 
находится только одна команда 
ВЕТ. Но ПРИ выполнении инструкции 
СМЛ, на стек залисывается адрес 
команды, следующей за СМЛ, то 
есть в данном случае #503. для 
того. чтобы осуществить привязку 
к адресам, это значение возврама- 
ется (2) в регистр Н.. Далее это 
значение ‘увеличивается на величи- 
ну смешения, заданного в регистре 
ВС (3). 
35С03 + #0010 = #5СЕЗ; Затем за- 
даются остальные паранетры для 
выполнения команды ГОТ (4). ВШЕ 
- адрес места ‘назначения перебра- 
сываемого блока: 63824, а в ВС - 
его длина: 1684 байта. (Конкрёт- 
ные значения подставлены те, ко- 
торые используются. в программе 
"НОЗАИКА". ) Теперь. выполняется 
команла 1018 4+5) ‘и. происходит 
возврат в вызывающую програнну. 


В нулевой строке ‹ “НОЗАИКИ" 
расположены следующие блоки ко- 
дов: 

1. Пооцедура, осушествляющая 


переброску ‘рабочих кодов в’ адрес 
63824.. Длина - 19 байт. у 

2. Рабочие коды (перебрасывае- 
мые в адрес 63824). Длина -`1684 
байта. 


Суннарная длина кодов, ‘распо- 
лагаеных в нулевой строке, равна: 
19+1684-1703 байта. 

При создании нулевой СТРОКИ с 


большин объемом памяти после ВЕН, 
Вы ножете воспользоваться про- 
Грамной ВЕН ЕПЛ., ранее опублико- 
ванной в "72Х-РЕВЮ" М 9-10 за 1992 
г. на Стр. 194-196. Сегодня же 
предложим новую версию этой прог- 
раныы. Она называется “ЕН 2"; 
кодовый блок этой версии имеет 
длину всего 62 байта. Это оказа- 
лось возможным осуществить благс- 
даря использованию ‘подпрограммы 
из ПЗУ, расположенной по адресу 
5717, которая позволяет. зарезер- 
вирОвать заданный объем памяти, 
раздвинуть текст Бейсик-строк и 
перерасчитать все системные пере- 
менные. Она используется процеду- 
рани редактора Спектруна при до- 
бавлении НОВЫХ СТРОК В НРОГРамму. 
(0 ней, в частности, упоминалось 
в "7Х-РЕВЮ" Н 5-6 в статье Пашю- 
рина В. И. на стр. 112.) Програмна 
“РЕН 2" состоит. только из Бейсик- 
файла (кодовый блок Форнируется 
после старта Бейсик-програнмы) :; 

1 БЕМ 

10 ТЕТ пз23296: БЕТ $=0 

20 ЕОЕ х-п ТО `0+61 

30 БЕАР у: РОКЕ х, 7: ТЕТ $=3*У 

46 НЕХТ х 

50 ТЕ 8<>6108 ТНЕМ РЕШИТ РБА 


Теперь в. Н. получилось: ° 


- 110 определяет код заполнения до- 
 полнительной области. 


5Н 1; "ЕЮКОВ ТН ГТМЕ РАТА”: 5ТОР. 

60 ТНРОТ "Но оё ежга Бу4ез: " 
:п 

70 ВАМПОНТРЕ п 

80 РОКЕ 23312, РЕЕК 23670: РОКЕ 
23313, РЕЕК 23671 

100 РАТА : 
042, 083, 092, 229, 054, 000, 035, 054, 
000, 035, 094, 035, 086, 213, 025, 001, 
008, 000, 197, 205, 085, 022, 035, 229; 
209, 019, 054 

110 ВАТА \ 
000, 193, 197, 011, 237, 176, 209, 225; 
025, 235,225, 035, 035, 115,035, 114 
120 РАТА 
000, 033, 001, 000, 205, 110, 025,229, 
033, 016, 039, 205, 110, 025, 209, 205, 
229, 025, г01 

200. СЬЕАВ ; КАНООНТЕЕ 05Е 23296 

Подробно принцип работы этой 
ПроГгРамны бый изложен в указанной 
выше статье в "РЕВЮ" Н 9-10. Поэ- 
тону, чтобы не повторяться скажем 
только. что после старта програн- 
на запрашивает число дополнитель- 
НЫХ байтов, которые будут встав- 
лены нежцу последним символом 
текста начальной строки и симво- 
лон <ЕНТЕК>, завершающим эту 
СТРОКУ. ° После, ввода этого пара- 
метра происходит старт кодового 
блока. После сообщения 0: ОК, об- 
ласть за ВЕН в 1-й строке будет 
расширева на число добавочных 
байт и обнулена, номер этой стро- 
ки станет 0, а все остальные Бей- 
Сик-СТРОКИ будут уничтожены. Те- 
петрь в полученную . РЕН-область 
ножно загрузить коды. 
Первое значение БРАТА в строке 


Если в 
строке 120 первое значение РАТА 
заменить на 20), то уничтожения 
остальных Бейсик-строк не будет. 
Зкспериментируя с указанными зна- 
чениями, удалите строку 50. кото- 
рая проверяет контрольную сунмУу 
значений РАТА, защищая от ошибок 
при наборе програнны. 

Теперь возврашаенся к “НОЗАИ- 
КЕ". На вопрос о числе добавочных 
байтов ответьте: 1703. После то- 
го, как нулевая строка с областью 
заданной длины после ВЕМ будет 
сформирована, можете загружать в 
нее коды и объединить ее при по- 
ноши НЕВСЕ с Бейсик-Файлом "МОЗА- 
ИКИ". Если Вы используете БЕ- 
ТА-ДИСК, то на всякий случай 
загляните в статью о Т8-00$ в 
этон выпуске "РЕВЮ". Тан автор 
УПОМЯНУЛ 06 особенностях загрузки: 
кодов в нулевую строку в отличие 
от нагнитоФонного варианта. 

Теперь осталось изменить стро- 
ки ги $ Бейсик-Файла "МОЗАИКА": 

2 ВОКОЕЕ Т: РАРЕВ 7: ТК О: С 
ТЕАЮ 49999: РОКЕ 23139, 111: ВАНО 
ОНТ7Е 05Е (РЕЕК 23635+256*РЕЕК 2 
3636+5) 

3 НАНООНТЕЕ 4; СО ЗВ 10: ТОА 
Р "шо2а1к $”СОРЕ 16384 


В заключение же хочется поже- 


лать всем ЮныН пользователям 
"Спектруна” приятной работы с 
программой "МОЗАИКА". 


&з 


ска р и ыкомс 


о евеаиы 


ттеретжолл о ангинс того: 


ПРИМЕНЕНИЕ ОССЕМБЛЕРЯ длЯ. создания 
БЫСТРОРАБОТАЮЩИХ ПРОГРАМЫ. 


Изжорщмын вм. 


ПРЕДИСЛОВИЕ. 


известные книги, справочники и 
руководства по ‘машинному языку 
процессора 2-80 используемого в 
"7х-бресимиа" в основ- 


ствий всех команд процессора и 
порядком применения этих команд 
на простейших примерах програни.в 
машинных кодах, В лучшем случае 
приводятся программы для сложения 
чисел или им подобные. у 

Практика показывает, что кон- 
кретному пользователю, желающему 
начать освоение машинного кода 
нужен немного другой полход. Нуж- 
ва книга, которая поможет ему 
немедлеяно, сразу взяться за дело 
и почунствовать игновённую отдачя 
от Своих ‘УСИЛИЙ. Одним словом, 
нУхна простейшая практика и живая 
заинтересованность. 

Как нам кажется, в основу этой 
книги положена весьна плодотвор- 
вая идея - опереться на звание 
пользователен БЕЙСИКа и постелен- 
но развивать эти знания в направ- 
пении машинного кода, 
гом показывая как алгоритмы БЕИ- 


шаг за иша-. 


третий год на страницах "7Х-РЕВЮ" 
и в ПРОЧИХ своих книгах. 

Нам также показалась очень 
привлекательной идея книги дать 
широкое пренставление конкретному 
программисту. о возможности ис- 
пользования ‘процедур, ‚"зашитых” в 
ПЗУ для своей повседневной рабо- 
ты. Это ножет заинтересовать и 
тех. кто достаточно хорошо знает 
АССЕМБЛЕР, но не имеет ‘доступной 
информации об использовании про- 
цедур ПЗУ в свохх програмнах. 

Мы ГОРЯЧе благодарим натего 
постоянного соавтора из г. Балашо- 
ва Саратовской обл. В. Пашорина за 
прекрасный перевод этой нужной 
книги и, ‘главное, за достойный 
выбор саной книги для перевода. 

К сожалению, мы не ногли бы 
сказать, что оригинал написан 
ПРОСТЫМ ДОСТУПНЫМ ЯЗЫКОМ,  пОонят- 
ным кахдому неспециалисту: Но мы 
очень хорошо потрудились над ее 
адаптацией. оставив по сути 6ез 
изменения сСтрУКТУРУ книги и ее 
Фактическое содержание, мы пол- 
ностью переработали всю `метоцику 
подачи материала и надеенся, что 
сделали ее ‘доступной для непод- 


` винном? кодирования» 


ки не ` яваяется ‚УЧЕБНИКОМ. во ‘иа- 
а. ‚„слухит 
практическии. пособнен для тех, 


кто пошел ло ЭТОМУ . ПУТИ, оны: 


должны напоинить Вам о . пелесооб-)о 


разности приобретения нашего. из- 
дания “Программирование в машин- 
яых кодая. 
КУН. Справочник”. По этой книге 
ухе обучились тысячи пользовате- 
лей и она пока ‹ продолжает оста- 
ваться лучшим из всего. что было 
написано на данную тену. 


для тех наших читателей, кото- 
рые сейчас решают вполне естест- 
венный вопрос о. пелесообразности 
приобретения всего комнлекта. 
"7Х-РЕВЮ-93", мы даем содержание 
книги, которая войдет в "РЕВР-93" 
Полностью: 
‘1. Вывод на экран. 
„г. Команды РЬОТ, ПКАМ, СТЕСИЕ. 
3. Счет очков в програмнах. 
4.’ Случайные числа. 
5. Опрос клавиатуры. 
6. Перемешение объектов. 
Т. Нузыкальвые и звуковые 
эффекты, 
8. Команды АТТЕ, $08 


$, РОТНТ, 


ПРОГРАНМ 
1. ВЫВОД НА ЭКРАН 


Создание програмн в машинных 
кодах, выполняющих вывод информа- 
ции на экран - утомительная зада- 
ча, требующая значительных затрат 
рабочего времени, Тем не менее, 
это одна из наиболее важных за- 
дач. Даже очень хорошие програмны 
проиграют многое. если информа- 
ция, выводиная на экран при их 
выполнении, не вполне понятна 
иди, хухе того, допускает неодно- 
значную трактовку. Перед создани- 
ем любой програмны необжодиио по- 
дунать о ‘том, чтобы наглядность 
выводиной на экран информации бы- 
па обеспечена на должном уровиё. 
На компьютере  "7Х_ЗРЕСТВОН" 
можно создать 21 графический эле- 
мент, Форна которых полностью он- 
ределяется пользователем. Это так 


зователя (зег Пеё1паЪ1е сгарь1сз 
= 3). Необхолимо как можно 
полнее использовать эти символы в 
своих програинах при выводе ин- 
Формации на экран. Например, при 


называемые символы графики поль-` 


изображения экрана можно исполь- 
зовать те ле синволы, что исполь- 
зуются для создания самих “завое- 
вателей“ или других объектов. 

Для вывода информации на экран 
пелесообразно использовать конт- 
растные ‚цвета; Не рекомендуется 
использовать вместе красный и ро- 
зовый. желтый и белый и т. п. Бла- 
горазумно в програниах  использо- 
вать только черный н белый цвета, 
так как не все ‘пользователи имеют. 
пветные нониторы или цветные те- 
левизорРы. # 

Так как выводить ‘инфорнацию ва 
экран необходимо при работе прак- 
тически любой программы, то ны 
начнем нашу книгу с того, что 
расснотрим в этой главе ‘способы 
перевода конанды БЕИСИКа РЕШИТ 
в нашинный код. 

Обычно БЕЙСИК-программа начи- 
нается с -того. что определяются 
основные цветовые атрибуты, на- 


пример: 
10 РАРЕВ 3: ТНК 1: ВОЮРЕЕ 5 
Затем эти атрибуты устанавли- С 
ваются в систенных переменных 


компьютера и становятся’ действу- 
юшими. Делают это командой С1.5. 


простой будет операция установие- 
ния цвета бордюра. Она займет 
всего лишь 6 байтов в оперативной! 
пачяти. 


Сначала в регистр А процессора | 


заносится число 5 (оно означает 
зеленый цвет бордюра} О а. затем 
вызывается процедура ПЗУ, которая 
выполнит изненение этогф цвета, 
данная процедура вазывается! 


Первые маги. . Практи-|. 


Сика переносятся на язык АССЕМБ-  готовленного читателя, впрочем о 9. работа с принтером, 
МЕРа. Эта концепция очень хорошо том, как это удалось, судить 6у- 10. Разбор конкретного принера 
укладывается в тот стиль работы,  дете Вы сами. перевода игровой программы из 
который “ИНФОРКОН” ведет уже Поскольку сама книга Фактичес- БЕЙСИКА в машинный кок. 
создании игровой программы типа 20 С1.5 
ПРИНЕНЕНИЕ АССЕМБЛЕРА ДЛЯ *коснических ‘завоевателей’ для давайте попробуем сделать то 
СОЗДАНИЯ БЫСТРОРАБОТАЮЩИХ получения отдельных  Фрагментов же саное в машинном коде. самой|. 


ВОКРЕЕ и находится она в ПЗУ по’ 


адресу 229ВН (8859 ПЕС), 

Процедура не только установит 
необходимый цвет окантовки экра> 
на.’ но и передаст значение нонера 
цвета в системную переменную 
ВОЕОЕЕ (23624 ПЕС - 5С4ВН). Дия 
хранения нонера цвета бордюра в 
этой системной переменной отве- 
дены 3 бита (с третьего по пятый) | 
и, | таким образом, всего могут 
быть установлены ‘до 8 различных 
цветов. Оставшиеся биты в этой 
системной переменной используются 
для хранения цветовых атрибутов 
нижней части экрана (системного 
окна). Системное окно занимает 
как правило (не всегда) две ниж- 
ние строки экрана, в которых Вы 
выполняете ТНРОТ или редактиро- 


м 


ие ПРОГРраммы. Биты 0...3 опре- 
|леляют номер цвета 14К в систем- 
ном окне, бит 6 отвечает за пара- 
"метр ВЕТСНТ, а бит Т - за пара- 
метр ЕТГАЗН. 

Итак, программа в. машинных ко- 
дах, ‘эквивалентная: команде БЕИСИ- 
\ка ВОБРЕЕ 5: будет. выглядеть так, 
как показано на листинге» 11 
| (Предполагается, что машинный код 
начинается с адреса, заданного 
Директивой АССЕМБЛЕРа ОЮС). 


число от 0 до 65535. Работа ком- 
пьютера "7х-5рес4гые" организова- 
на таким образом, что после вклю- 
чения его в сеть в этой регистро- 


‹ вой паре’ устанавливается число 


23610 [Это адрес систенной` пере- 
ненвой ЕКК_НК). И этим активно 
пользуются на практике. Есть нео- 
Фициальная договоренность, что 
для работы с системными перемен- 
ными используется эта регистровая 
пара. При этом ве надо) указывать 


АДРЕС МАШ, КОД АССЕМБЛЕР 
Окс 23760 
23760 ЗЕ 05 1 А, 5 
23162 ср 9в 22 САЫ, 8859 
23765 с9 КЕТ 


Листинг 1. 1 
КОМНЕНТАРИЙЯ 


Установили в аккмуляторе число 
; "5" - код зеленого цвета. 
Вызов процедуры. ПЗУ "ВОВОЕЕ”. 

; ВЫХОД. 


| Выполнить установку цветов 1НК 
и РАРЕЕ немного сложнее и соот- 
ветствующая программа в машинных 
|кодах у нас займет уже не 6, а 13 
байтов (она приведена на листин- 
вле 1.2). 

За установку цветов РАРЕК и 


ТНК в основной части экрана от- 
вечает систенная переменная 
АТТЕ-Р (23693 БЕС = 5680 Н). 


|Поэтому установка этих цветов из 
нашинного кода сводится к пере- 
ключению битов в данной систем- 
|ной переменной, а раскладка этих 
битов такова: 


"ЕЕ 
й Г о] 
цвет ФАРЕЮ и 


Параметр ВЕТСНТ 
— Параметр РЬАЗН 


Если ны хотим из машинного ко- 


адрес нужной Вам системной пере- 
ненной а достаточно указать 
"смешение", т.е. величину, на коз 
ТоРУЮ ОТСТОоИиТ НУЖНЫЙ Вам адрес от 
заранее установленного в регистре 
ТУ. Тогда вместо 11) (23593), 25 
можно записать команду: 
10 (1У+83), 25 

Эта запись выглядит понятнее 
уже хотя бы потому, что все, кто 
программируют на “Спектруме" в 
сразу игновенно 
Раз используется 1%, 


понимают: 
значит здесь загружают какую-то 


системную перененную. А какую 
именно, они быстро определят, от- 
КРЫВ таблицу системных перемен- 
НЫЕ, 

Вернемся к нашену примеру, см. 
Листинг 1.2. Итак, в первой стро- 


. шинного  коба, 
“ этого не 


› ное. 


чке ны установили  необкодимые 
цвета РАРЕЕВ и ТНК. 

Теперь мы должны дать команду 
С1,5. Это тоже сделает за нас’ про- 
цедура, записанная в машинном ко- 
де ПЗУ. данная процедура таки 
называется - 615 и находится по 
адресу ОБбВН - 3835 ПЕС. 

вместе с тем, Вы по-видимому 
обратили внимание на то, что пе- 
ред вызовом этой процедуры  вызы- 
вается еше одна процедура #3У по 
адресу 5633 (1601Н). Это весьма 
важная процедура, она называется 
СНАН_ОРЕН, и мы будем еше не раз 
использовать ее при изучении ма- 
териалов данной главы. Вызовом 
этой процедуры открывается канал 
вывода данных на экран - это ка- 
нал под номерби 2 и потому перед 
вызовом процедуры в регистр А за- 
гружается число г. Когла Вы рабо- 
тали в БЕЙСИКе, то ногли не ду- 
мать о назначении каналов. Если 
хе Вы выдаете информацию из на- 
то никто за Вас 
сделает, а сделать это 
необходимо, иначе компьютер не 
поймет, куда надо выдавать инфор- 
мацию. 

Теперь Вы, 
должны уметь 


уважаемые читатели, 

устанавливать в 
машинном коде атрибуты экрана и 
ВЫПОЛНЯТЬ ОЧИСТКУ экрана. Давайте 
посмотрим как же нам напечатать 
на экране что-нибудь содержатель- 
Проще всего напечатать на 
экране какой-либо символ. В Лис- 
тинге 1.3 показан пример програм- 
ны, которая напечатает символ "А” 
(символ имеет номер 65 ОЕС) в ле- 


АДРЕС НАШ. КОД АССЕМБЛЕР. 


ОВС 23760 


Листинг 1.2 
КОММЕНТАРИЙ 


| 


и храниться какое-либо целое 


да дать команду, о аналогичную 23160 РБ 36 53 19 1 (1У+83),25 ;Установили в системной перенен- 
|РАРЕК 3: ТМК 1, то нам надо вклю- ой ВОКРЕК значения 1НК и РАРЕК. 
|чить биты в системной переменной 23164 ‚ЗЕ 02 ГО А, 02 окготовка к открытию канала 2. 
ПАТТЕ_Р следующим образом: 23766 Ср 01 16 САГЛ, 5653 ‚Открываем канал а. 
2376$ Ср 6В 00 СА, 3435 Вызов процедуры С15, 
16: = == азтта с9 ВЕТ ; ВЫХОД, 
НОНО Ы 
нло 25 Листияг 1.3 
АДРЕС ‘ НАШ. КОД АССЕНБЛЕР КОНМЕНТАРИИ 
Т.е. Фактически нан надо было 08С 23760 
16ы в ячейку памяти с адресон 23160 ЗЕ 02 Гр А, 2 ; Подготовка к открыванию канала. 
123693 заслать число 25, например 2зт6е Св 01 16 САМ, 5633 Открываем канал экрана. 
| так: ТР А, 65 ©д синвола "А". 
| ЬО (23693), 25 Ю5Т 16 ;Вызов процелуры печати символа, 
Но такой команды, которая поз- ВЕТ ; Выход. 
"воляла бы заслать ‘произвольное ы ат м — А 
Тзисло В ПРОИЗВОЛЬНУЮ ЯЧеЙКУ Паня ыы 
ти компьютера У процессора 7-80 листинг 1.4 
нет, Приходится ненного комбини- АДРЕС НАМ. КОД АССЕНБЛЕР КОННЕНТАРИЯ 
ровать. ОВ 25760 
Сейчас у нас есть возможность 23160 ЗЕ 02 р д.2 Подготовка к открыванию канала. 
познакомиться с интересвым спосо- 23162 Ср 0! 16 САМ. 5633 Открываен канал экрана. 
бом адресации в процессоре 2-80, 23165 ЗЕ 48 ГР А. Т2 Код символа “Н”. 
который называется индексной ад- 23167 7 Е5Т 16 : Вызов процедуры печати синвола: 
|ресацией. дело в том, что в про- 23768 ЗЕ 45 12 А, 69 ;Код символа "Е". 
1щессоре есть шестнадцатиразряиная 23770 07 Ю5Т 16 :Вызов процедуры печати символа. 
регистровая пара 1, в которой 23168 с9 ВЕТ ; Выход. 


о 


вом верхнем углу экрана с коорди- 
натами позиции печати о (0,0). 
Именно такие‘ координаты текущей 
позидии устанавливаются после то- 
го, как отработает процедура С15, 

Если Вы хотите распечатать на 
экране какой-либо символ, то его 
код предварительно должен быть 
заслан в регистр А процессора, 
После чего должна быть выдана ко- 
манда Е5Т 16, что Вы и видите на 
листинге 1.3. По команде Ю5Т 16 
прошессор запустит процедуру ПЗУ 
РЕТИТ_А_2, находящуюся по адресу 
15Р2Н = 5618 БЕС. Символ, код 
которого находится в аккумуляторе 
будет напечатан и осуществится 
переход к следующей позиции печа- 
ги. 


ЕСЛИ с этин Вам все понятно, 
то Вы без ‘Труда пойнете работу 
програнмы 1.4, которая напечата- 
ет целое слово - "НЕ", поочередно 
засылая символы в аккумулятор и 
выдавая их командой Р5Т 16. 
Хорото, что слово "НЕ" имеет 
только цва символа, а как быть, 
если нужно напечатать длинное 
предложение? Понятно ведь, что 
кодировать печать длинной Фразы 
по символам дело очень утомитель- 
ное, к тому же необходим большой 
расход оперативной ламяти - он в 
два раза больше, чен длина Вашего 
сообщения, поскольку на каждый 
символ еще нужна команда Ю5Т 16, 
занимающая байт. } 

для решения этой проблемы су- 
шествуют как минимум три пути. 
Главная идея состоит в тон, 
чтобы записать все символы выво- 
димого сообщения в некоторый банк 
данных и считывать их оттуда по 
одному до тех пор, пока весь банк 
не будет исчерпан. Этот приен по- 
казан. в Листинге 1.5 (версия 1). 


< двумя новыми регистровыни пара- 
ми.- ВС`и БЕ, Как правило; пара 
ВС используется  програнмистами 
для организации в ней разкого ро- 
да счетчиков, а пара’ ГЕ -. для 
указания на какой-либо адрес в 
памяти компьютера. Регистры В.С, 0 
и Е не обязательно должны  ис- 
пользоваться парами, как это было 
с регистром 17. Они ногут исполь- 
зоваться и как одиночвые восьми- 
битные РЕГИСТРЫ для хранения це- 
лых чисел от 0 до 255. 
Обратите внимание на пару опе- 
раций 

10 А, В 

- й 
Это очень быстрый, экономичный 
и к Тому же ‘общепринятый способ 
проверки БС ва ноль. Поскольку в 
регистре А у нас загружено содер- 
жимое регистра В, то результат 
операции ОК С будет нулевын в тон 
и только в том случае, если и Ви 
С равны нулю. 
Обратите также внимание на то, 
что мы записали наше сообщение, 


В этом Листинге Вы знаконитесь . 


АДРЕС МАШ. КОД АССЕМБЛЕР 
сб 2зт5о 
23760 ЗЕ 02 10 д, а 
гзт62 Ср 0! 16 САМ, 5633 
23765 11 Её 5С, 12 ОЕ, ВАТА 
23768. 01 от 00 1 вс, т 
ГООР 
2з7т1 т8 10 А.В 
23772 в\ ов с у 
23773 с8 КЕТ 2 
23774 1А 1 А, ФЕ) 
23775 рт Е5Т 16 
23776 13 ТНС ПЕ 
23777 ов БЕС ВС 
23778 18 РТ ЗЕ 100р 
АТА | 
2зтт9 } Т2 69 16 в0 за 71 69 


Листинг 1.5 (Версия 1}; 
КОННЕНТАРИИ й 


; Подготовка к открыванию канала. 
‚Открываем канал ‘экрана; 

В регистровую пару ПЕ загрузили 
адрес; в котором кранится наше 
текстовое сообмение. 
регистровой паре ВС’ организо- 
‚вали счетчик на Т символов. 


;Проверка не обнупился ли счет- 
чик символов в ВС? 

Выход, если он обнулиася. 
Взяли в аккумулятор текущий 
;символ из списка РАТА. 
;Напечатали его на экране. 

; Перешли к очередному символу. 
‚уменьшили счетчик символов на 1. 
;Перешли на метку 1.00Р для, оче- 
‚редной` проверки не закончился 
‚пи список печатаемых символов. 


‚Начиная с адреса 23719 мы храним 
сообщение "НЕГР НЕ”. 


Листинг 1.5 (Версия 2›. 
КОННЕНТАРИИ 


Подготовка к открыванию канала. 
; Сткрываен канал экрана. 

Адрес сообщения. 

: Алина сообщения - Т символов. 

; Вызов процедуры ПЗУ РЕ_5ТК1НС. 
; Выход. 


Сообщение "НЕЁБР НЕ". 


НАШ. КОД АССЕМБЛЕР. 
ОЕС 25750 
ЗЕ 02, 10 А, 2 
Ср 01 16 `САШ, 5633 
11 0 5С 10 ОЕ, РАТА 
01 07 00 10 вс,т 
Ср 3с 20 СА, 8252 
су ВЕР 
12 69 76 80 з2 тт 69 
начиная с адреса 23119. Но это 
совсен не обязательно. Нохете 


хранить свои тексты где хотите, в 
лювых адресах, удобных Ван. Важно 
только, чтобы в строке 1 БЕ, РАТА 
в регистровую пару БЕ был заслан 
ИСТИННЫЙ адрес'начала Вашего со- 
общения от 0 до 65535. 


Второй вариант этой программы 
выглядит немного более простым. 
Если Вы заранее установили в Ре- 
гистровой паре ГЕ адрес. с кото- 
рого начинается Ваме сообщение, а 
в ВС - длину этого сообщения, то 
больше можно вообще ничего не де- 
лать, а вызвать процедуру ПЗУ под 
названием РЕ_СТЕТНС. которая сама 
напечатает за Вас это длинное со- 
общение. Процедура РЕ_5ТЕ1ЫС на- 
ходится по адресу 8252 ПЕС 
20ЗСН. Пример см. в Листинге 
(версия 2), 


1.5 


Третий способ - самый мошный. 
ЕГО применяют в тех случаях, ког- 
ца у Вас заготовлено не одно со- 
общение, а много, т.е. Вы имеете 
целую таблицу сообщений, но зара- 
нее не знаете, какое когда при- 
дется печатать. В этом случае Вам 
хотелось бы выдавать на экран 
нужное сообщение указав только 
его номер. именно так и поступают 


в абсолютном большинстве  прРо- 
грамм, написанных в маминных ко- 
пах. Иненно так организовано и 
само ПЗУ, которое, как Вы знаете, 
хранит в себе много разных с0об- 
шений типа ”54аг4ф фаре апа ргезз 
кет...“ и выдает вам’ всякий раз 
именно то, которое надо. 

Чтобы программа знала, где 
кончается одно сообшение и начи- 
нается другое, применяют специ- 
альный приен - к коду последнего 
символа сообщения прибавляют чис- 
ло 127, т.е. Фактически в послед- 
нем символе каждого сообщения 
принудительно включают старший 
(7-ой) бит. Таким образом,  сим- 
вол, код которого > 121 является 
наркером конца сообщения. Теперь 
нетрудно создать програмну для 
печати Н-го сообщения. Она про- 
смотрит тексты. начиная с адреса, 
установленного в ПЕ, отсчитает 
Н-1 маркер и начнет печатать. то, 
что найдет после него. Символы 
будут печататься по одному до тех 
пор. пока не будет найден Н-ый 
наркер. Для печати последнего 
придется предварительно отнять от 
его значения число 127, 

В листинге 1.5 приведен пример 
такой работы, но пля простоты там 
ПРИНЯТО, ЧТо У Вас есть не табли- 
ца, а только одно сообщение, за- 


11 


канчивающееся инвертированным 
символом (к коду синвола прибав- 
лево число 127). 

кстати, ‘обратите внимание на 
то, что если числа, большие чем 
121. являются маркерами конца со- 
‚Побщения, то очевидно нельзя до- 
пускать, чтобы в Ваших текстах 


121, т.е. символы блочной графики 
(колы от 128 до 143) и символы 
графики пользователя (коды от 144 
до 154) воспроизводить такин’ ме- 
тодом нельзя. : 
`Покохая на эту, но более слох- 
ная процедура вывода на экран 
значений клавишных слов и сообще- 
ний 05 общибках используется в 
ПЗУ компьютера. Стартовый адрес 
этой процедуры - 3082 ЕС = 
'ОАН. 

Вы можете и сами выдавать из 


водстве пользователя компьютера 
Так.. они могут быть легко вы- 
ведены на экран с. помошью команды 
У5Т 8. Байт, следующий за этой 
командой, определяет какой вид 
сообщения необходино вывести. На- 
пример, ‘если необходимо вывести 
на ‹ экран сообщение “К 1пуа!1а 
сотоиг", которое в перечне сооб- 
шений об ошибках является  двал- 
пать первым по счету, то‘ необхо- 
дино записать: 7 
Р5Т 8 
ТЕРВ 19 
(номер сообщения нинус 2) 
’Причен нет необходимости да- 
зать команду ВЕТ после’ этого, так 
как сразу, же посае вывода на эк- 
[ран сообщения об ошибке осушест- 
зляется возврат в ВАЗТС-систему. 


Теперь мы ножен приступить к 


строк в задаяную позицию на экра- 
не. В ВА51С-поограммах это’ выпол- 
няется с помошью оператора РЕШИТ 
АТ, мосае которого записывается 
‚номер столбца и, 
которое 


для этого используются так на- 
зываеные управляющие ‘коды. Если 


„ начиная с 32 РЕС (это Символ 
“пробел“, А коды с 0 до 31 явля- 
(т.е. 


например. в 
труме” коды с 0 по зи с 23 по 31 
вообще не используются, ас б по 
23 - служат в качестве. управляю- 
ших. (В компьртерая других систем 
это. может быть и не так). 

за координаты позипии печати 
отвечает код га, он является ана- 
погом БЕИСИКОВСКОГО оператора АТ: 


"х“ и “У” координаты, задающие 
РЕТЯТ-позицию для вывода сообще- 
ния на экран. Програмна 1.6 де- 
монстрирует использование после- 


былнссимролы, КодокотоРыЕ больше, 


АДРЕС НАШ. КОД АССЕМБЛЕР 


ОРС 23760 
25750 ЗЕ 02 ГРА, а 
2зт6г. ср 01 16 САМ, 5633 
23705 11 Е5 52 12 РЕ, БАТА 
ЪООР 
23768. ИА Б.А, (РЕ) 
23769 СВ ТЕ ‚ВТ Т.А 
23111 20 04 К Н2, ЕН 
гзттз 7 К5Т 16 
2377413 ТНС ПЕ 
23715 18 ЕТ а 100Р. 
ЕО у 
237тТ. СВ ВЕ ВЕ Т.А 
гзт1т9 пт ВТ 16 
237180 С9 ВЕТ 


71269 16 80 з2 тт 197 


’; Выход 


листинг 1.5 (Версия 3). 
КОННЕНТАРИИ 


Подготовка к открыванию канала. 
: Открываем канал экрана. 
;Адрес начала сообщения. 


Взяли текуший символ. 

Проверяем его старший бит. 

сли он не нулевой, то это пос- 
‚ледний символ и мы перёходин на 
; метку ЕН. 

‚Иначе печатаем его на экране. 
:;Перешли к очередному синволу. ` 
;Возврат на метку 1.00Р. 


;Выключили старший бит последнего 
; символа. 
;Напечатали последний синвол. 


; Сообщение “НЕГР НЕ”: 


ЗЕ 02 ЪВ А, 2 

ср 01 165 САМ, 5633 
16 ОР 5С Ьр РЕ, РАТА 
01 0 00 р вс, 12 
СО 5С 20 СА, 8252 
с КЕТ 


22 ГЕЕВ 22 
03 ТЕЕВ 3 
05 РЕРВ 5 
84 7265 `78 4В 


79 85 


АДРЕС ВАШ. КОД АССЕМБЛЕР 
ОБб 23750 
23750 ЗЕ 02 [0 А, 2 
23752 СР 01 16 САБ, 5633 
237165 `` 11 Е? 5С 10, 2Е, РАТА 
23158 О: 2 00 ШУ ВС, 36 
23771 ` Ср 35 20 смыл, ваба 
23714 Ср р бр САЫ, 3405 
ВЕТ 


ге 04 07 17 02 
23783 16 04 18 01 19 
23788 0121 01 20 01 
23793 67 65 18 32 89 
23798 79 85 32`82 69’ 
23805 65 68 32 84: 72 
23808 73 83 21 00.20 


листинг 1.6 


КОНМЕНТАРИЯ 


; Юдготовка к отьрыванию канала. 
Открываем канал экрана. 

‚Адрес начала сообщения. 

‚дрина сообщения с ‘учетом ен 
ляющик кодов. 

:Вызов процедуры ПЗУ РВ_ тете 
ВЫХОД 


;Код управления позицией печати 
;Боордината. “у-35" 

;Координата' “Х:5" 

; Текст сообщения “ТНАНК 700” 


Листииг 1.7 


КОММЕНТАРИИ 


;Подготовка к открыванию канада. 
; Открываем канал экрака. 

Адрес начала сообщения. 

длина сообщения с учетом управ- 
ющих ‘кодов. 

Вызов процедуры ПЗУ РВ. 5ТЕТИС 
©пирование АТТК-Р в АТТЬ-Т. 

; Выход. 


; Сообщение САН 900 ВЕАР ТН!$ с 
‚имплантированными в нем кодами 
‚управления координатой позиции 
‚печати и кодани управления 

; цветовыми атрибутаии. 


; 


ПБЕРВ 3 


как аналог оператора 
РЕН АТ 3,5. 

Совершенно так же можно прине- 
‘нять коды 23 и. 13 как аналоги 
операторов ТАВ и ЕНТЕК.  соответ- 
ственно. 

С поношью управляющих кодов 
можно ие только задавать коорди- 
наты позиции печати, но и цвета и 
прочие атрибуты печатаеных симво- 
лов. Для этого есть свои управля- 
ютие коды. 

тк - код 16 
РАРЕЕ - Код `1Т 
РЪАБН - код. 18 
ВЕТСНТ - 19 


ТНУЕВЗЕ - го я 


ОУЕК - код 21 


Програмна \1.Т показывает как 
используются ‘управляющие коды, 
соответствующие РАРЕК, тих, 
ВЕТЕНТ и т.д. 

После использовавия временных 
цветов для вывода на экран `с0о06- 
мения необходино вернуться к по- 


легко выполняется, так как ко- 
нанда В5т 36 легко распознает их 
управляющие коды. Для изменения 
РАРЕК. ТИК, ВЕ!ТСНТ и ЕТАЗН, не- 
обходимо нызвать из ПЗУ процедуру 
{адрес 3405). которая копирует 
содержимое системной переменной 
АТТВ-Р (23693) в системную пере- 
ненную АТТЮ-Т(23695). 
{Продолжение следует! 
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михамжмненко В. 


с. , 


тУровыч А. к. 


защита ПРОГРЯАмым : 

Ны продолжаем публикацию ИнФормапию о количестве циклов МЕТКА АССЕМБЛЕР 
материалов, посвященных ° защите по каждой конанде процессора Вы 1 10-ЕБбЕ-2 САМ, Т.Ь-ЕЛСЕ 1 
программного обеспечения от про-’ можете получить из справочника 2 ВЕТ НС 
смотра и копирования. Непосред-` "ИНФОРКОМа" по  никропронессору 3 10-ЕБСЕ-1 ТА, #16 
|ственная тема сесодняшней статьи 7-80, см. книгу "Програннирование 8 1-БЕГАУ БЕС А 
Исрязана с подробным разбором в машинных кодах. Первые шаги 5 В М7, ГО-РЕБАУ 
стандартных процедур ПЗУ,  о0су- Практикум. Справочник”. 5 АБР А ь 
шествляющих загрузку данных с Процедура, выполняющая загруз- ; 
магнитофона. ку информации с  магнитоФона, как_Вы уже заметили, 10-ЕрбЕ-2! 


{ ПРОДОЛЖЕНИЕ } 


Начало см.» в "72Х-РЕВЮ-92": 


н1,2 26. 916 

Н. 3,4 - <. 53-60 

Х 5,65 2. 971104 
кт, 8 ее а-я 
но, 10 16. 185-194 
1 с. 230-е5с 


.} Процедуры в машинных кодах, 
‚реализующие загрузку про- 
грамм с нагнитоФона. 


| ° Мы с Вами рассмотрели систему 
кодирования информации на нагнит- 
ной ленте. Теперь приступим к 
рассмотрению процедур ПЗУ, реали- 
зующих ввод програны ”Спектруна" 
с магнитофона. 
Для того, чтобы точно оценить 
временные карактеристики опера- 
ций, реализующих необходимые за-. 
'дерхки ‘в цикле загрузки, необхо- 
димо знать время исполнения от- 
инструкций процессора 
Как Ван уже вероятно из- 
вестно, скорость работы процес- 
сора на несколько порядков выше 
максимальной скорости записи ко- 
дированных логических единип ин- 
Формации на магнитной ленте. По- 
этому программа должна выполнять 
задержку после каждого записыва- 
еного на магнитофон бита данных. 
Время задержки удобно считать 
не в секундах, а в циклах такто- 
вого генератора, который синхро- 
низирует работу пронессора 2-80. 
У каждой команды процессора есть 
своя продолжительность, которая 
может быть измерена в этих цик- 
лах. Впрочем, не для всех конани 
это величина постоянная. Так, на- 
пример, для команд, связанных с. 
каким-либо условиен, “например 
38 7 и т.п.) число циклов обычно 
зависит от того, выполняется или 
нет данное условие и для кахдого 
случая различно, поэтому нам не- 
юбкодюино учитывать и этот Факт и 
Расснатривать соответствующие 
приемы задержки, используемые в 
данной процедуре обработки инфор- 
мапии, поступающие с нагнитной 
ленты. и 


начинается в ПЗУ с адреса 0556Н = 
1366 БЕС. Ее действие заключается 
в многократной проверке шестого 
бита порта 254 и в опредлении 
временного интервала между двумя 
следующими друг за другон Ффронта- 
ни. й 

Таким образом, 
ка данных с ленты важнейшим явля- 
ется точное определние интервала 
нежду фронтами сигнала. Эту’ рабо- 
ту выполняет. специализированная 
процедура, размешенная в ПЗУ кон- 
пьютера под ‘адресом о5ЕЗН = 1507. 
Эту точку входа в ПЗУ можно ис- 
пользовать, когда надо устано- 
вить, сколько времени прошло от 
момента вызова процедуры до обна- 
ружения двух, следующих один за 
ДРУГИМ, смен уровней сигналов в 
гнезде ЕАЮ (и насколько оба они 
соответствуют допустимым пределам 
требуеных временных интервалов). 

Второй важной точкой входа в 
ПЗУ является специализированная 
процедура, позволяющая  опреде- 
пить, сколько времени прошло с 
момента вызова процедуры до полу- 
чения первого Фронта. Она ‘разме- 
шзется по адресу ОЗЕТИ = 1511. 
Вызов этой процедуры ‘выполняется 
после помешения в регистр В вре- 
менной константы, ‘ограничивающей 
количество проверок порта гэв. 

Если оказывается, что время 
ожидания смены Фронтов сигнала 
превышено или будет установлен 
Факт нажатия клавиши ВВЕАК. про- 
исходит сброс Флага С ‘Флагового 
регистра Р. Для  распознования 
каждой из этих ДВУХ ситуаций 
служит Флаг 7. Если он обнулен, 
значит во вреня работы данной 
процедуры была нахата клавиша 
ВЕЕБАК. 

Мы начнем рассмотрение проце- 
дуры загрузки с изучения этих 
подпрограмм. Названия процедур 
стали общепринятыми послё выхода 
в свет книги Я. логана и $. О’Хары 
"Полный дисассемблер ПЗУ, Спектру- 
на". Те же названия использованы 
и в наиболее полном описании ра- 
боты "Спектруна” с магнитоФоном 
Анджея Кадлофа ("Спектрум и наг- 
нитоФон") и мы сохраняем те же 
наименования процедур. 


мы 


при чтении бло- 


мы приводим два значения и для| 


й 
обеспечивает двукратный вызов! 


процедуры 1)-ЕБСЕ-1. Перед тен, | 
как приступить к проверке порта, | 
выжилается 358. тактов работы! 
7-80. Процессор слишком быстро- 
цействующий по сравнению со  вре-} 
менем. в течение которого на ос-| 
нове активного сигнала от Л.А. 
стабилизируется состояние м 
го бита порта 253. 

В последней колонке приведено || 
время затрачинаемые на выполнение | 
каждой операции. измеренное 
тактах микропроцессора. ‹ Так, 
случае. выполнения операции воз-| 
врата из подпрограмны, в зависи-| 
мости от состояния Флага перено-1| 
са С - ВЕТ НС, - затрачиваются 5 
или 11 тактов микропроцессора, в} 
связи с. тен, выполняется условие, 
или нет. По аналогичной’ причине! 


процедуры условного  иерехода| 
38 52, поскольку время,  затрачи-| 
ваемое на ее выполнение, может) 
быть различным в зависимости от 
выполнения или невыполнения усло- | 
вия. 
После начала работы процедуры 
12-ЕПСЕ-!, в аккумулятор. загруха- 
ется шестнаднатиричное значение | 
16Н. Благодаря этому мы ‘органи- 
зуем цикл задерлки; основанный на! 
уменьшении аккумулятора на едини- 
цу и сравнении этого значения с 
нулем. Если ноль не достигнут, мы 
продолжаем уменьшать аккумулятор 
на единицу, обеспечивая задержку. 
Так происходит ровно 
Т+ ах 16+ 4+ Т+&а = 
тактов микропроцессора: 
Командой АНБ А сбрасывается! 
Флаг С, который, как мы знаек. | 
выполняет Функции маркера. 
После обнуления наркера прове- | 
ряется, достигла ли  временная| 
константа в регистре В значения 
нуля. Обратите внимание. что в| 
противоположность процедурам  за- 
писи, здесь значение регистра В| 
увеличено на единицу. 


358 


Т 12-5АИРЬЕ ( 14С В :4 
8 ВЕТ 2 зат 

Следующим ‘этапом идет контроль 
нажатия клавиши Н®ЕАК. для этого 
мы считываен числовое значение из| 
порта 254 и, после ротации данно- 


15 


== 


‘рщия © 


го» значения (причен иИнтТеРЬСУЮЩИЙ 
вас, бит, ‚смещается во, флаг, перено- 
са,С)» мы осуществляем продоляе- 
Вие. работы, либо. выхолим из. дан- 
ной. процедуры. Все зависит .от то- 
„ была.ли пахата, клавита, ВВЕАЕ, 


9 Р.А. ТЕ. 1 
10 ТН А, (РЕ) ^ к 
1 ВРА . :4 
12 | ВЕТ, НС ат 
‚Теперь ны проверяем. изменился 
ли шестой бит 254 порта, в  соот- 
ветствии со. значением, сохраняе- 


мым в регистре С (именно этот бит 
сигнализирует о поступлении сиг- 
нала с магнитофона). Если бит не 
изменился, о чем свидетельствует 
нулевой Флаг 2. то он проверяется 


снова. 

13 хо с :4 

14 АНО #20 т 

15 3 2. ЬО-БАНРЬЕ ;12,Т 


Фронт сигнала извлечен. йнвер- 
гируются все биты в регистре С и 
одновременн9 изменяется информа- 
состоянии порта, а также 
цвет изменяется на дополнительный 
ивет бордюра {красный-голубой 
или синий-хелтый). Эти операции 
выполняются с помошью специальной 
оманды инверсии. для этого мы 
заносим в аккунулятор содержимое 
регистра С, после чего над акку- 
выполняется команда 
которая инвертирует каждый 
его бит на противоположный. В ре- 
зультате получается как ‘бы допол- 
нение содержимого акумулятора до 


этого инвертированное 


16 Гр А, С ;4 


17 СРЬ 4 
18 12 С.А О 


После смены цвета бордюра на 
экране включается Флаг С  регист- 
ра.Е, что. сигнализирует! об успеш- 
ном результате проверки. соответ- 
ствуюшие промежутки времени под- 
считывает. процедура,  вызываеная 
на основе приращения значения в 
регистре В. Каждый вызов . проце“ 
ЦУРЫ ГР ЕОСЕ-! длится 465 тактов 
микропроцессора плюс по 58 тактов 
на каждый дополнительный тест. 


19 АКП #07 

20 ОЕ #08 

21 ОТ (РЕ), А 
ЗСЕ` 

м | БЕТ 


Рассмотрим теперь основную за- 
ГРУЗОЧНУЮ процедуру 10-ВТТЕЗ. Она 
занимает в паняти объем начиная 
от 0556Н до ОБЕгН. Перед началом 
работы процедуры в регистр 2% не- 


значение ны возврашаен в регистр С. 


обходимо занести длину читаемого 
блока, в регистр 1Х адрес’ байта, 
начиная с которого’ должна быть 
загружена информация. В аккунуля- 
тор заносится тип блока, 

10-ВИТЕЗ может не только счи- 
тывать Файлы в память, но также и 
сравнивать их. На этом принпипе 
основано действие БЕИСИК-конанды 
УЕВТЕУ. Необходимый режин работы 
определяется состояниен Флага пе- 
Реноса С перед вызовом процедуры 
загрузки. Его уставовка в единицу 
означает считывание в память все- 
го файла, а обнуление - сравне- 
ние. Поскольку микропроцессор но- 
ет работать не более чем с шест- 
надцатиразрядными числани,` длина 


читаеного блока нЕ может превы-` 


тать 65535 (ЕРЕЕН). 


1 ГО-ВУТЕ$ 1С р ;4 
|- ЕЗ АЕ, АЕ’ :4 
з рЕС р :4 
4 от ;% 
5 ГО А, #0Е $ 
ев \ О0Т (НЕЕ). А ом 
т БР НЕ. #0532 $10 
8 РИЗН НЕ 


Регистр Р увеличивается с це- 
лью обнуления Флага 2 перед со- 
хранением его в альтернативном 
наборе регистров микропроцессора. 
Посде этого значение регистра р 
восстанавливается и запрешаются 
‘маскированные прерывания. 

занесение в регистр А значения 
ОРН знаменует собой установку 
белого пвета бордюра путем выдачи 
этого значения в порт 254. В р6- 
ГИСТРОВУЮ пару Н!. заносится адрес 
процедуры ° обработки возврата 
ЗА-ГО-КЕТ. Который сохраняется на 
стеке. 


ы ТН А, ЕР и 
10 ВЕРА :4 
11 АКГ #20 зу 
12 ов #02 :т 
13 тр С.А ; 

14. СР А :8 


Первый тест порта 254 пред- 
ставляет собой занесение в акку- 
мулятор значения состояния дан- 
ного порта с последующей его 
ротацией и выполнением операции 
логического”ИЛИ”. Из всего байта 
оставляется только шестой бит, 
который характеризует состояние 
гнезда ЕАЮ. После выполнения это- 
го цвет бордюра становится крас- 
ным. После помешения в регистр С 
значения 22гН или 02Н вкаючается 


-Флаг 2 Флагового регистра. 


15 .О-ВВЕАК ВЕТ В7 зи,т 
16 ГО-5ТАВТ САМ, ГЛ-ЕБСЕ-1 ; {7 
17 Ж НС, 1О-ВВЕАК ; 12,7 


Следующий отрезок програны 
представляет собой пикл, в кото- 
РОМ ПРрОГрамна будет задерхана до 


нажатия клавиши ВРЕАК или! до'`сме- 
ны состояния ‘шестого зита порта! 
254. Во ВТОРОМ случае цвет борлю- 
ра будет изменен на голубой. ‘Вы- 
полнение данной пропедуры осущес- 
твляется нногократным повторением 
вызова подпрограммы р ВЕЕАК; >. 


18 ГО НЕ; #08 15 ;10 
19 ГО-МАТТ БУХ ГО-МАТТ 40; 6 
20 ОВС НЕ. Нет 
21 А.Н 2 
гг ок 1, ;4 
ла, т 


23 ЭВ Н2., ГО-МАГТ 


Перед началом непосредствен- 
ного чтения информации с магнит- 
ной ленты рыхидается около одной 
секунды. Это достигается за’ счет 
создания’ специального цикла за- 
держки. Длительность ожидания за- 
вист от значения, которое занесе- 
Но В РЕГИСТР Н|. В нашен случае 
оно составляет #0415. 


28 СА, 10-ЕПСЕ-2 
25 3 ВС, 1-ВРЕАК 


ЗАТ 
за, 


Первым делом проверяется, не 
передается ли еще какой-нибудь 
сигнал за данный промежуток ‘вре- 
мени. За время, составляющее при- 
баизительно ‘14000 тактов никро- 
процессора должны появиться два 
Фронта сигналов. Обратим внимание 
на большой излишек времени перед 
началон загрузки данных. В пило- 
тирующем сигналбё Фронты появляют- 
ся в интервале порядка 2185 так- 
тов. 


26 ПР-ГЕАРЕК ГО В, #9С 
2т САМ. .2-ЕФСЕ-2 ; 
28 Э® НС. 10-ВВЕАК ; 12,7 


29 ГО А, #26 т 
30 СРВ :4 
31 В НС. 1О-5ТАКТ ; 12,7 


В регистр В заносится времен- 
ная конставта УСН, позволяющая 
процедуре 10-ЕБбЕ-г искать два 
фронта за время, не превышающее 
7000 тактов микропроцессора. С 
ДРУГОЙ СТОРОНЫ, ПОСЛЕ их отыска- 
ния проверяется прошло ли с но- 
мента вызова вышеуказанной про- 
цедуры до появления заднего фрон- 
та не менее, чем 3366 тактов ра- 
боты микропроцессора. Таким спо- 
собом отличаются Фронты пилотиру- 
юмего сигнала от значительно 60- 
лее’ близких пар Фронтов информа- 
ционых сигналов. 


за, тис н ми 
33 ЗЕ Е2,.10-ЬЕАБЕВ °;12.7 


В цикле мы начинаем искать 
Фронты ПИЛОТИРУЮЩеГго сигнала. По- 
сле извлечения 256 пар, ны . пере- 
одинт к оиданию импульса синхро- 
низации, Который сигнализируе: 
нан о начале собственно самого 
Файла данных. 


14 


34. 0-5УНС ЕО. В, 8С9... т. 
135... САШ.. ЦР-ЕБСЕ-1 .: АТ. | 
36 „В НС, ГО-ВЕЕАК ;12,1 
проверяется время появления 


каждого нового. Фронта сигнала. Он 
должен. быть, обнаружен в, течение 
13655 тактов работы микропроцес- 
сора; Необкодимая точность ‘обес- 
печивается. занесением в регистр В 
временной константы сэн и вызовом 
процедуры 10-ЕбСЕ-1. 


зт тр А.В ;4 

38 СР #14 а 

39 33. нс, 1о-ЗУнС ПВ 
Однако, если это. произошло по 


`Ристечения 1100 тактов работы про- 
цессора, значит, уже появлся. пер- 
вый Фронт синхроимпульса. Для оп- 
ределения его появления мы зано- 
сим я аккумулятор содержимое” ре- 
гистра В и сравниваем полученное 
значение с числовой констайтой 
04Н. В зависимости от состояния 
Флага переноса, ° программа либо 
прРодолхает свою работу, либо же 
возвартается на начало процедуры 
проверки появления синхроимпульса 


по метке ГО-$УНС. Значит, сигнал 
пришел слийком рано ‘и. это не тот 
сигнал, который нужен, 

0 САМ, 1Т0-ЕОСЕ- 1 зат, 

81 ВЕТ НС $11,5 


После появления первого фронта 
синхрОиНпУЛЬьСса мы Ожидаем появле- 
ние второго. Это достигается За 
счет вызова процедуры Ё0-ЕБСЕ-1. 
Если После вызова данной пропеду- 


ры, она воозврашает значение Флага 
переноса выключенным, то мы осу- 
ществляем возврат’ в  вызвавшую 
програму по команде КЕТ НС. ' 

42 ГР А, С :4 

43 Хок #03 | 

84 О С.А 


После появления обоих ‚фронтов 
синхроимплуьса необходино  осу- 
шествить соответствующую  индика- 
цию на экране, Это делается. ' пох- 
готовкой н Регистре С сигнализа- 
ции о появлении следующего Фронта 
синин и желтым иветани. для этого 
мы загружаем в аккумулятор содер- 
жиное регистра С и осушествляем 
операцию исключающие ”ИЛИ“ над 
содержимым аккунулятора. После 
этого полученное значение вновь 
возврашается в регистр с. 


45 10 н, 00 7 
46 ыо в, 4во :Т 
т ЗЕ ГО-МАВКЕЮ ;1а 


\ В регистре Н создается байт 
четности, а в регистр В помешает- 
ся временная константа для считы- 
вания первого бита первого байта, 
описывающего тип читаемого Файла. 


х 


как Вы поините, значение первого 
байта каждого Файла характеризует 
тип Фаипа и должно равняться нулю 
для заголовка и 255 для блока 
данных. 


48 (0-ЁЬООР ЕХ АР, А’Р” 
49, 58 5, ГО-ЕЫАв 


; № 
12,1 


°К этому, Фрагмевту програнма 
возвращается после чтения пелсго 
байта. поскольку предыдущая часть 
программы закончилась безусловным 
переходом на метку 10-НАВКЕЕ: В 
этом участке программы Флаг 72 
употреблен для различения байта, 


определяющего тип Файла. Здесь 
также учитывается Флаг С, опреде- 
ляютий, происходит ли процесс 
чтения или верификации. 
50 УВ НС, ЕО-УЕВТЕУ :12.7 
51 ЕО (1Х+0),[ ;19 
52 ЗЕ 1О-НЕХТ ;1а 

В ходе выполнения данных опе- 


раций считанный байт помешается 
под адресом, находящимся в 1%. 
дя этого мы загрухаен в ячейку 
памяти, адрес которой находится 
в(1Х+0), содержимое регистра 1. 
После этого осушествляется безус- 
ловный переход на метку 1.0-НЕХТ. 


53 ВО-РЬАб в С ;4 
5% хОК | ;4 
55 ВЕТ 57 }11,5 


При входе в данную процедуру в 
регистре А находится тип Файла, 
который мы хотим считать, а в ре- 
гистре |, - первый считанный байт. 
Первая команда служит для времен- 
вого хранения значений Флага С в 
регистре С. Если считанный байт 
не совпадает с содержимым  регис- 
тра А, то проискодит возврат из 
процедуры со сброшенными Фиагами 


Си 2, что сигнализирует об ошиб- 
ке. 

56 О А; С :4 

57 ВКА ;8 

58 2 С.А ;4 

59 ТЫС БЕ В. 

50 3 ЕО-БЕС $12 


В случае совпадения типов вос- 
станавливается состояние Флага С 
и регистра С. Для этого мы загру- 
заен содержиное регстра С в акку- 
мулятор, осуществляем ротапию с 
через флаг переноса и возвращаем 
полученное значение из акумулято- 
ра в регистр С. Увеличение регис- 
тра ПЕ на единицу служит для кон- 
пенсации его состояния при пере- 
ходе к инструкции ПЕС РЕ при вы- 
полнении безусловного перехода на 
нетку 1О-ОЕС. 


64 10-НЕХТ тс 1х 
65 10-05С  ОЕС РЕ 
66 


ЕХ АР, А’Р” 


68 ЬО-НАРЕЕВ ГО г, 0: 


76 2 А’Н ;% 
МТ ХО ь :4 
78 ОН, А ;4 


Данные конанцы устанавливают 
регистры 14 и БЕ В состояние; ‘не? 
обходиное ‘для’ правильной работы 
программ. побив 5т0Ро осуществая- 
ется сохранение флага с’ Е: 
Регистра гв б6зопаеньм “Небте”е 
помошью Использования конаниы пё- 
рехода к набору альтернативных 
регистров никройрощессора 2-80. 


67 о в, #в2 


После установки временной кон- 
станты ВН в регистре’ в. обнуяя- 
ется регистр Ь`и его младший бит 
устанавливается в единицу, После 
следующих сдвигов влево ‘он ‘будет 
постепенно  перенешаться по на- 
правлению к Флагу С ив коние 
концов окажется во Флаге перено- 
са, сигнализируя считывание всего 
байта. 


69 10-8-В1Т5 САШ. ГО-ЕФСЕ-2г 
то ВЕТ НС 


зат 
#11.5 


данная процедура, определяет 
время нежду ДВУМЯ очередными 
Фронтами сигналов. Для этого вы+ 
зывается процедура 10-ЕОбЕ-г, ко- 
торая работает в состветствии со 
значевием временной константы за- 
несенной в регистр В. 


71 10 А, #СВ т 
72 СРВ ; 
73 о ;4 


ЕСЛИ Пара Фронтов найдена за 
вреня,. меньшее чен’ около 2400 
тактов относительно вызова 
12-ЕОСЕ-ё, то они’ представляют 
собой ноль, а если за большее 
вреня, то единипу. Значение, по- 
лучающееся после анализа инфорна- 
дии, несет в себе Флаг С. 

Для правильного выполнения за- 
данной процедуры мы загружаем‘ в 
аккумулятор константу СВН,  отно- 
сительно которой ведется проверка 
содержимого регистра В. 


7% 
15 


ТО. в, Во 
УР. ЕС, Ео-В-Вут5 


:т 
$10 


Посше загруэки временной’ кон- 
станты для следующего бита иссле- 
дуется регистр В, который уста- 
вавливается только после считыва- 
ния и размещения во регистре 1. 
всех восьми битов данного байта. 


Этот участок программы осушес- 
твляет нодификацию байта четнос- 
ти, о которон мы уже писали ра- 


нее. . ( 
ТУ. ТО А, В 8 
80 ОЕ : 

81 ЗЕ НЕ, БО-ЕООР те: 


15 


й Здесь мы проверяем все ли бай- 
ты были. считаны. и. если должны 
Ибыть считаны еще какие-либо бай- 
УТЫ, то. мы возврашаемся к метке 
|1.2-1.002;_Эта’ проверка ‘осуществля- 
ется с ‘помомью сравнения ‘содер- 
жиного регистра ОЕ с нулем и осу- 
шествлениен операции услозного 
перехода в зависимости от’бостоя- 
ния Флага 2 Флагового регистра. 


1ва 10 А.Н :4 

|183 СР в01 Е 

[84 ВЕТ ;10 
После считывания последнего 


(четности), в регистре Н 
должен быть ноль. Если это так, 
то Флаг С включается, сигнализи- 
рУя этим правильность окончания 
Пзагрузки файла. 


Так работают процедуры загруз- 
'ки Файлов с ленты в панять ком- 
|пьютера. Надеемся, что этот нате- 
Приал окажется полезным лля Вас. 
Тем ие менее, его невозможно рас- 
сматривать в отрыве от инфорнации 
00 вопросам записи Файлов на наг- 
яитную ленту в Формате ”Спектру- 
|ма". Поэтому в следующей главе мы 
рассмотрим более подробно этот 
|вопрос. 


Глава 2. Стандартные процедуры 
записи информации на 
нагвитную ленту. 


Теперь мы переходим к рассмот- 
|рению процедур, реализущия запись 
информации на магнитную ленту и 
|понешенных в ПЗУ компьютера. 

| Начнем с пропедуры 5А-ВУТЕЗ, 
|слузалей для записи последова- 
|тельности битов на кассету. Пред+ 
полагается, что в момент ее запу- 
|ска`в регистре РЕ находится длина 
записываеного блока. в регистре 
1Х - адрес первого байта, а в ак- 
кунуляторе - число, определяющее 
‘тип загрухаемого блока. Напомним, 
|что для заголовка этот байт равен 
|нулю, в то вреня как для блока 
данных он равен 255. Первая  про- 
педура записи информации на маг- 
витную ленту начинается с адреса 
04С2Н. Это является ее отправной 
| точкой. 


г РОЗН НЬ 

з ТНГ, #1780 

4 ВТ Т.А, : 

5 ЗВ 2, ЗА-РЬАВ 12, т 
6 $10 


То НЕ. #0698 


| Первым делон загружаен в ре- 
ГИСТР Н. адрес процедуры возврата 
к БЕИСИКУ - БА-1О-РЕТ, после чего 
данное значение сохраняется на 
стеке. Далее мы загружаем в ре- 
Тистр НМ. временные костанты зР8ОоН 
и ОС98Н, которые определяют дли- 


ы ное регистра РЕ увеличивается 


< 


тельность пилотирующего сигнала. 
Эта длительность составляет пять 
секунд дая заголовка и две секун- 
ды для блока данных. Определить, 
какой тип Файла мы сейчас записы- 
ваем на ленту, компьютеру понога- 


ет седьмой бит аккумулятора, На- 
помним, что в аккуммуляторе со- 
держится число, определяющее тип 
блока. 

Т ЗА-РЬАСб ЕХ АЕ, А'Е^ ра 

8 ТнС рЕ ;6 

9 БЕС ТТХ $10 

10 . ОТ ;4 

11 10 А, #02 и 

1а 10 В,А ;4 


После обработки блока содержи- 
на 
единицу. На столько же уменьвает- 
ся и содержимое регистра 1х. Все 
это делается после вызова альтер- 
нативного набора регистров микро- 
процессора и дае“ возножность 
определить байт как первый в за- 
писываемон блоке. у 

Выключение наскируеного преры- 
вания необходимо, чтобы программа 
не была прервана для опроса кла- 
виатурн (в обычном режиме опрос 
клавиатуры происходит пятьдесят 
раз в секунду. так как иненно с 
такой регулярностью поступают ин- 
пульсы на вход ТИТ микропроцессо- 
ра). Значение 2 в аккунуляторе 
установит предварительное напря- 
жение в гнезде НТС на низкий уро- 
вень и цвет рамки на красный. 


13 ЗА-БЕАРЕВ ОУ 5А-РЕАРЕК\; 13, 8 


14 ОТ (НЕЕ, А 11 
15 ХОР #0Е эт 
16 10. В, #44 1 
17 ЕС 1. :4 
18 В НЕ, $А-ЦЕАРЕВ; 12.7 


Следующий блок программы гене- 
рирует пилотирующий сигнал. Цикл 
ЗА-ВЕАБЕЕ гарантирует задержку 
мехду последующими сненани напря- 
жения в гнезде М1С. Затем,  посяе 
установки напряжения в этом гнез- 
де. четыре младших бита аккунуля- 
тора неняются на противоположные 
путем выпопнения операции исклю- 
чаюшщее "ИЛИ" над содержимым акку- 
мулятора. Это подготавливает из- 
менение напряжения на разъеме НТС 
на противоположное и смену цвета 
бордюра с красного на голубой или 
наоборот. Затем уменьшается млад- 
ший байт счетчика импульсов 1. 

иногие пользователи * "Спектру- 
ма” наверняка встречали компью- 
терные программы без характерных 
полос на бордюре, присущих стан- 
партным процедуран загрузки. Это 
объясняется тем, что цвет бордюра 
в ходе загрузки Файла не изменя- 
ется. Как Вы помните, за цвет 
бордюра ответственны три младшие 
бита компьютерного порта 254. По- 
этону, если Вы будете проводить 


операцию исключающее "ИЛИ" только 
над битом, ответственным за сос- 
тояние сигнала на разъеме НГС и 
не будете затрагивать биты цвета 
бордюра, Вам также’ удастся до- 
биться аналогичного эФФекта. 


19 ЕС В ;% 
20 БЕС Н ;1 
21 УР Р, ЗА-ЦЕАРЕВ  ;10 


После обнуления младлего байта 
счетчика импульсов 1. уменьшается 
и старший байт Н и модиФицирует- 
ся в соответствующей ситуации 
временная постоянная в регистре 
В с целью учета дополнительно вы- 
полненныя инструкций (в данном 
случае это тринадцать тактов мик- 
ропроцессора). Как Вы уже могли 
заметить, после некоторых команд 
стоит несколько значений,  харак- 
теризующих длительность  выполне- 
ния команды в циклах никропроцес- 
сора 2-80. Это объясняется тем, 
что, команда может быть выполнена 
по-разному в зависимости от того, 
выполняется условие или нет, и, 
следовательно, ‘длительность ве 
выполнения для каздого из этих 
случаев ‘различна. Это объясняет 
тот Факт, что в ходе работы тако- 
го Рода процедур необходимо учи- 
тывать время, затрачиваемое на 
дополнительно выполняемые  ин- 
СТРУКЦИИ. 


22 10 в.#2Е, 
23 ЗА-БУНСТ БЛИХ 5А-5УНС1 
24 СИТ (РЕ). А 


;7 
;10;8 
$11 


После того, как был выслан пи- 
лотирующий сигнал, › на порт МС 
идет посылка переднего Фронта 
синхроимпуУльса. Задержка в цикае 
5А-5УНС1 составляет 667 тактов, 
после чего содержимое аккунулято- 
ра передается в порт 254. 


25 ГР А, #00 ;7 
26 БО В, #37 ;7 
2Т $А-5УНСа ОЛХ ЗА-БУНСг ;10,8 
28 ОТ (НЕЕ), А зы 


После 735 тактов идет высылка 
заднего Фронта  синхроинпульса, 
устанавливающего цвет бордюра 
голубым, напряжение на разъеме 
НГС - высоким. Изменение цвета и 
управияющего напряжения осушест- 
вляется занесением в аккунулятор 
числовой константы орН. Задержка 
осушествляется загрузкой в ре- 
гистр В временной константы З7Н. 
После выполнения задержки в цикле 
5А-51НС2, значение аккунулятора 
пересылается в компьютерный порт 
254. } 


29 Гр ВС, #3ВОЕ 
30 ЕХ АР, А”Е’ 
31 ТОТ, А 

з2 УР БЗА-5ТАЕТ 


Загрузка константы 


25 


РЕГИСТР ВС представляет ‘собой за- 
ГРУЗКУ ДВУЕ Различных чисел. в от- 


1вой пары. “ЗВН`- это временная по- 
|стоянная, + загружаемая в регистр 
|В, а ФЕН ‚т; придает. начальное ‹зна- 
чёние регистру. С, 
сохраняться состояние 
напряжения в гнезде. м1С и цвет 
бордюра (начальное состояние - 
низкое напряжение и желтый цвет 
бордюра).  Воспроизведенный Тин 
блока помешается в регистр Ь и 
посылается она’ ленту ‘как первый 
байт данного блока. После этого 
осуществляется безусловный пере- 
| ход на‘метку 5А-ЗТАВТ. 


последнего 


33 ЗА-ГООР 10 А.Б :1 
за ОЕ :1 


135 ЗВ 2, ЗА-РАКТТУ :10.Т 
й Процедура 5А-.00Р - это начало 
йглавного ‘цикла, записывающего 


следующий байт. Если счетчик баи- 
|гов. который организуется в ре- 
гистре БЕ, достиг нуля, то  оста- 
ется записать только байт четнос- 
ти. Проверка на ноль осушествля- 
ется типичным способом, карактер- 
ным для микропроцессора 7-80. В 
|аккумулятор запружаем содержимое 
регистра р и, используя содержи- 
|ное регистра Е, выполняем опера- 
[цию логическое "ИЛИ". Результат 
операции ножет быть. равен нулю 
голько в том случае, 
[баята равны нулю, поэтому нам 
Пголько остается проверить  содер- 
|химое Флага 1 Флагового регистра 
|процессора для точного установле- 
ния результата выполнения данной 


36. р 1. ах+0) 


38 хо ь 


|хит для получения следующего. бай- 
|та для высылки его на нагнитоФон. 
Гон также используется для запуска 
созданного в регистре Н байта че- 
| тности. ‘регистр Н инициируется 
|байтом, определяющим тип записы- 
| ваемого блока. (Методика построе- 
|ния байта четности в ходе опера- 
ций записи и загрузки была нами 
рассмотрена в’ главе !’данзого то- 


Загружаеное в аккумулятор зна- 
чение единицы установит напряже- 
ние в гнезде МТС на высокий уро- 
вень и цвет бордюра станет си- 
ним. Принудительное включение 
| флага С Флагового регистра Е бу- 
дет выполнять роль указателя, 
позволяющего утверхдать, что‘ выс- 
| восемь битов данного 


В завершение процедуры мы осу- 
1шествляен безусловный переход на 


дельные регистры ‘данной регистро-: 43 ЗА-РАВТТУ О, Н 


В КОТоРОН будет. 


если оба. 


метку 5А-8-В1Т5: 


44 } * УВ ЗА-ЬООР-Р-У1а 

Процедура, .5А-РАВТТУ 
высылку байта четности, как пос- 
леднего ‚байта, ‚записываемого на 
нагиитофонную. ленту, для этого 
В регистр. 1, КОТОРЫЙ Обычно ИС- 
пользуется для хранения высылае- 
мого байта, записываем байт чет- 
ности. который находится в регис- 
тре Н. После этого осушествляет- 
ся переход к процедуре 5А-ГООР-Р, 
которая, собственно, и осушеств- 
ляет запись. 


готовит. 


45 5А-ВТТ2 10 А, С ;4 
46 ВИТ 7, В :8 


К процедуре 5А-ВГТ2 мы обраша- 
енся ПРИ ВТОРОМ проходе цикла, 
записывающего одиночный бит ‘(это 
осуществляется перед  высылкой 
заднего Фронта сигнала). Проверка 
седьмого бита н регистре В имеет 
цель только обнуление Флага С, 
сигнализируя таким образом второй 
ПРОХОД. 


47 5А-ВТТА ТУ $А-ВТТ1 
48 ЗК НС, 5А-ОИТ 


10,8 
з1а,1 


Следующая продедура Формирует 
главный цикл. задержки нежду ‘по- 
спедовательными Фронтами сигна- 
лов. Флаг С несет в себе действи- 
тельное значение высылаемого би- 
та. у 


49 го в, #42 т 
50 5А-5ЕТ БЛ ЗА-5ЕТ } 10,8 


Перед высылкой логической еди- 
ницы нам необходино задержать ра- 
боту на 855 дополнительных так- 
тов. Для этого в регистр В мы за- 
носим. временную константу &42н, 
которая организует нам необходи- 
ный цикл задержки, 


51 5А-ООТ ОПТ (РЕ), А ыи 


52 р В, #3Е т 
53 „8 М2, 5А-ВТТа 12а, т 


данная процедура организует 
высылку заднего Фронта’ сигнала. 
Это проискодит после высылки пе- 
реднего Фронта путен` занесения в 
регистр В константы ЗЕН ‘и вызова 
подпрограммы 5А-ВТТа, 


58 рЕС В $18 

55 ХОВ А м: 

56 ТС А ;4 

51 ЗА-8-В1Т5 ВЫ Ё ;8 

58 УР Н2. ЗА-ВТТ! ;10 
после модификации ‘временной 


константы в регистре В путем 
уменьшения ее на единицу, обнуля- 
ется Флаг 7 и в аккумулятор вно- 
сится значение единицы (бордюр 
становится синим, а напряжение в 
Н:С - низкого уровня). Затем, по- 
сле увеличения аккумулятора на 


`59 1 В, #3В :7 
70 ЗА-РЕЕЛУ 0242 5А-БЕБАУ 10,8 
71 С ВЕТ ;10 


единицу, во Флаг С перемешается 
следующий бит из регистра” ^`Ес- 
ли`регистр `Ъ отличеёнгот’ нуля, “то 
св знаменует °бобой начало“" цикла 
ЗА-ВТТ+, о причеи. ‘первый: ‘вход 
этот. цикл. выполняется сосустанов-}. 
ленным Фларом @,.-в тозвремя скакй»\ 
все. ‘остальные --; С-оебнуленнын, 
Благодаря этому. только после. вол 
съии, проходов. регистр, №. достига- 
ет значения нуля. о. 


59 РЕС БЕ ;6 
60 ТнС 1х 510 
61 10 в, #31 т 


Данный отрезок програнмы осу- 
шествляет ‘нордификацию счетчика 
путем уменьшения на единицу со- 
держимого регистра РЕ и ‚увеличе- | 
ния на единицу содержимого регис- 
тра 1%. Следующин этапон идет 
подготовка временной ‚ константы 
путем засылки в регистр В значе- 
ния з1нН. 


62 10 А, ТЕ Я 
53 ТН А, (НЕЕ) В 
64 ЕВА :8 
55 ВЕТ НС }11,5 


Здесь выполняется контроль на- 
хатия клавиши ‘ВВЕАК и, если она 
нажата, то программа передает уп- 
равление на адрес О5ЗРН процедуре 
обработки возврата в БЕЙСИК 
ЗА/О-ВЕТ. 

Проверка нажатия клавиши начи- | 
нается с чтения в аккумуллятор 
значения из порта РЕН. После по- 
лучения значения осуществляется 
сдвиг аккукуулятора вправо с ис- 
пользованием Флага переноса, в 
который попадает нулевой бит ак- 
кумулятора. Этот бит и характери- 
зует тот Факт, была’ ли нажата 
клавиша ВРЕАК. Завершает этот 
участок программы ‚ процедура ус- 
ловного возврата, которая, анали- 
зируя состояние ‘Флага переноса 
либо продолжает выполнение про- 
гранмы по нижеследующену нмаршру-| 
ту, либо осуществляет возврат к!’ 
процедуре выхода в. БЕИСИК. 


66 ЬО А, В ;4 
67 ТС А ;4 


58 РН. ЗА-ЬООР _; 10 


Контроль счетчика байтов 0с7- 
шествляет предварительную ‘провер- 
ку ва достижение нуля в регистре 
2, для этого мы передаем в акку- 
нулятор значение регистра Г, уве- 
личиваен аккумулятор на единицу и 
проверяем содерхимое регистра А 
на наличие нуля. Переход к метке 
ЗА-100Р выполняется: также в, слу- 
чае достижения регистром БЕ зна- 
чения нуля, так как необходино 
еше записать байт четности. 


После достижения в регистре РЕ 


Ру 


значения ЯЕЕЕЕ. и короткой ‘паузы 
управление передается к процедуре 
возврата к БЕЙСИКУ 5А/1О-КЕТ. Как 
Вы знаете, в компьютере при вычи- 
гании значений из регистра, со- 
держашего ноль, у нас получается 
значение : РЕЕЕН,  ‘ЕРЕЕН; `ЕЕРОН и 
‘так далее. Пауза организуется с 
помошью занесения в регистр вре- 
менной константы  ЗВН и создание 
цикла на основе ‘этого. значения. 
Последний байт процедуры 5А-ВТТ$ 
помещается ‹в ячейке, с адресом 
О5ЗЕН. 


Ны с Вами рассмотрели стан- 
цартные продедуры считывания и 
записи данных на магнитную ленту, 
Осталось рассмотреть процедуру 
обработки возврата в БЕЙСИК. 

Эта, процедура имеет название 
ЗА/ЬО-КЕТ и используется для вы- 
хода в БЕЙСИК из под программ за- 
ГРУЗКИ или записи в случае успеш- 
ного или неуспешного их заверше- 
ния, или же нажатие клавиши 
ВЕЕАК. Она необходима для того, 
чтобы’ гарантировать возврат к 
БЕЙСИКУ из процедуры записи/счи- 
‘тывания, как в случае их правиль- 
ного окончания, так и в случае 
появления отибок или прерывания 
оператора, то есть клавишей 
ВЕЕАК. Время выполнения инструк- 
пии для этой процедуры не ‹ сушес- 
‘твенно. 


ЗА/.О-ВЕТ РОЗН АЕ 
Л А, (#5С48) 


1 
г 
3 
44 ВЕСА 
5 
5 ВЕСА 
т ОТ (ЕЕ), А 
Помещение ‘Флагового регистра 
на стек имеет целью сохранение 
флага С: обнуление его ` означает 
прерывание клавишей ВВЕАК Или 
ошибку чтения. Затем в аккунуля- 
гор загружается значение систем- 
ной переменной ВОЕПРЕР и на осно- 
ве ее третьего, четвертого и пя- 
того битов воспроизводится цвет 
бордюра экрана, который был перед 
запускон соответствующей процеду- 
ры. обслуживающей магнитофон. Это 
осуществляется путем высылки со- 
держимого аккумулятора в компью- 
‘терный порт 254. 


|8 БР А, #Я7ТЕ 

9 ТН А, (РЕ) 

10 ВКА 

11 ЕТ 

А 38 С, 5АЛЛО-ЕНО 


В этом отрезке программы еше 
раз проверяется, была ли нажата 
клавиша ВЕЕАК для того, чтобы мо- 
жно было выдать соответствующее 
информационное сообщение. После 
этого мы включаен маскируеное 
прерывание и осуществляен. услов- 
ный переход в зависимости от со- 
стояния Флага переноса С, 


жатия клавиши ВВЕАК. В случае. 
если клавиша ВЕЕАК была действи- 
тельно нажата, мы осушествляем 
переход к процедуре 5А/1.О-ЕНР. 
13 ВЕРОВТ-р Е5Т #08 
14 РЕЕВ #00 
Эти команды вызывают возврат 
к БЕЙСИКУ с выдачей сообщения: 
Р-ВКЕАК-СОНТ КЕРЕАТ$. 
данное сообщение, как Вы пом- 
ните, выдается, если программа 
прерывается операторон с помошью 
клавиши ВЕЕАК. Это только один из 
типов сообщений, которые могут 
выдаваться в подобном случае. оно 
Говорит, ЧТО клавиша ВЕЕАК была 


‚ нажата во время действия перифе- 


РИЙНОЙ ОПерации. Действие СОНТт- 


НОЕ после этого оператора обыч- 
ное. 

15 ЗА/ЛО-ЕНО РОР АР 

16 ВЕТ 


Первым делом мы извлекаем из 
стека содержимое Флагового регис- 
тра. Это необходимо для воспроиз- 
ведения Флага переноса и правиль- 
ного возврата к процедуре  запус- 
ка. Следует отметить, что послед- 
ний байт процедуры ЗА/1О-ВЕТ за- 
нимает ячейку за адресом 0555Н. 

Мы с Вами закончили рассмотре- 
ние процедур чтения и записи на 
магнитную ленту в Формате "Спек- 
труна". данный материал мы‘ ста- 
рались построить так, чтобы он 
был легко доступен дия начинаю- 
ШИХ И Чтобы в то же время и про- 
Фессионал ног почерпнуть в нем 
что-то новое. 

В то хе время, это был вынуУх- 
денный шаг, поскольку пель, кото- 
рую мы ставили перед собой - ос- 
воить защиту програнм от копиро- 
вания была бы не достигнута, если 
бы Вы не смогли разобраться в 
принцивах действия стандартных 
загрузочных процедур, ° зашитых в 
ПЗУ "Спектруна". И, тем не ме- 
нее, знание одной лишь работы 
стандартных подпрограмм Ван будет 
явно недостаточно для написания 
мощных защит от копирования. В 
следующей главе мы = расснотрим 
конкретную програмну зашиты от 
копирования информации на нагнит- 
ной ленте. Это лишь один из мно- 
гих способов зашиты от  копирова- 
ния и мы надеемся, что читатель 
отнесется к изучению нашего мате- 
риала творчески, то есть постара- 
ется не ТОЛЬКО. ВНИКНУТЬ В СУТЬ 
публикации, но и разработает свои 
собственные более мошные програн- 
ны. 


Глава 3. Методы защиты от копи- 
рования для ПЭВМ 
“Спектрум”, 


1. Методика создания оригинальной 
процедуры записи информации на 
магнитную ленту. 


Информация, приведенная в пре- 
дыдущих главах, поможет Вам по- 
ближе познакомиться сс СТРУКТУРОЙ 


хранения иформации на магнитной 
ленте в Формате "Спектрума". Од- 
нако, этого еше не достаточно для 
написания мощных програмы защиты 
от копирования. и тем более для 
создания оригинальных зашишающих 
проиедур, ПОСКОЛЬКУ необкодино 
предварительно ознакомиться с ос- 


новными существующими приенами 
такой зашиты. 
Как Вы помните, время, которое 


затрачивает процессор на обработ- 
ку одной машинной операции ‘ несо- 
измеримо мало по сравнению с ми- 
нимально допустимым временем, за 
которое можно закодировать один 
бит. информации на магнитной лен- 
те. Поэтому для того, чтобы пра- 
вильно записать информацию на 
магнитный носитель, процессор вы- 
нужден делать временные. задержки, 
оФфромляемые в программе в виде 
циклов с предварительно заданны- 
ми временными константами, хра- 
няшинися в регистре’ В. 

Таким образом, одно из направ- 
лений в создании собственной за- 
шиты - это изменение временных 
констант в сторону незначительно- 
го уменьшения или увеличения их 
значений, что ‘позволяет сделать 
непригодными стандартные процеду- 
ры чтения данных, записанных в 
новом формате, ‚ 

Аля того, чтобы обеспечить на-| 
дёжную защиту. нет необходиности| 
в полном изненении всех времен- 
ных констант - на практике доста- 
точно изненения одной из них. Мы 
ножем изменить временную констан- | 
ту задержки, характерную — для| 
стандартного пилотирующего сигна- | 
ла, стандартного  синхроимпульса, | 
а также характерную для стандарт- | 
ной записи логического нуля или| 
единицы. Все это приведет к тому, | 
что созданная и выгруженная нами! 
программа не сможет правильно 
считываться стандартными процеду- 
рани, встроенными в ПЗУ компьюте- 
ра. | 

для’того, чтобы облегчить Ва-| 
шу работу по созданию собственных | 
защит, мы хотим предложить Вам 
достаточно удобный способ созпа- 
ния программ подобного рода. Если! 
Вы внимателььно читали предыдущие! 
главы, то наверняка обратили вни-| 
мание на то. что процедуры записи! 
и чтения состоят из большого чис-! 
ла подпрограмм, которые периоди- 
чески вызываются в ходе работы 
основной процедуры. Для создания 
своей процедуры записи и чтения| 
Ван Фактически необходимо пить| 
создать головную програмну, кото-| 
рая внесет необходиные изменения 
во временные константы. Остальные | 
подпрограммы можно использовать! 
из того стандартного набора. ко- 
торыЙй уже “зашит” в, ПЗУ. 

Возможно, что этот путь устро-| 
ит не всея и кто-то захочет напи- | 
сать ‘собственные процедуры заниси 
и чтения программ в полном объеме! 
самостоятельно. Что ж. мы не ста-| 
вим своей целью навязывать Ван| 
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Тровшик. 


дения, 


свои приемы программирования, а 
лишь хотим ознакомить Вас с ос- 
новными методами зашиты. 

Итак, (мы предлагаем Вам для 
рассмотрения ‹ достаточно простой 
способ зашиты, а именно: изнене- 
ние временной константы задержки 
для пилотирующего ‘сигнала. Созда- 
ние собственного, отличного’ от 
стандартного, пилотирующего ‘сиг- 
нала, позволило бы Ван зашитить 
свою программу от несанкциониро- 
ванного копирования уже в началь- 
ный момент загрузки. Это объясня- 
ется тен, что все программы,  за- 
писанные на магнитную левту в 
Форнате Спектрума начинаются име- 
нно с пилотирующего сигнала. 

для создания зашименной от ко- 
пирования программы, `Вам необхо- 
димо исключить возможность за- 
ГрУзки данной программы в копи- 
ПОСКОЛЬКУ КОПИРОВШИК ИС- 
лользуст стандартные процедуры 
записи и чтения информации с маг- 
нитной ленты. то Ван необходимо 
блокировать его работу путем соз- 
дания Файла, записанного в одном 
из созданных Вами Форматов, от- 
личном от стандартного Форната 
"Спектрума”. Чтобы затитить ‚ про- 
грамну от копирования, на‘ прак- 
тике нет необходимости в полном 
изменении Формата. записи всех 
блоков данных, хранимых на маг- 
нитной ленте. для этого доста- 
‘точно записать в измененном Фов- 
нате всего лишь один небольшой 
блок данных, который хранит в се- 
бе информацию, без которой не мо- 
хет начаться выполнение програнн, 

Поскольку данный Файл записан 
в измененном формате, то его не- 
возможно будет скопировать с по- 
номью копировшика, а так как он 
несет в себе жизненно важные све- 
необходимые для правильной 


работы прогрРамм„ы, то без него 
Программа не сможет нормально 
функционировать, даже если попы- 
‘таться отбросить его в процессе 
копирования. 

Рассмотрим принцип Формирова- 
ния пилоттона в Форнате “Спектру- 
ме й 

5А-ВУТЕЗ. 10 НЫ, #0532 
РОЗН Н. 
Го НЕ. #1780 
"ТТ Т.А 
Л 7, ЗА-РЬАб 
ТО НЕ, #0698 
ЕК АЕ, АЕ 
ТС БЕ ° 


ЗА-РЫАС 


ЗА-ВЬЕАБЕЮ 


РР, $А-ВЕАБЕВ 
Перед входом в данную процеду- 


Ру предполагается, что регистры 
хранят информацию о  записываеном 
Файле. В регистре ГЕ находится 
длина записываемого блока, в ре- 
гистре 1х, адрес первого байта, а 
в аккумуляторе. - число, которое 
определяет тип записываемого бло- 
ка, причен ноль выставляется для 
заголовка, а 255(0РРН) - непо- 
средственно для блока данных. 
После начала работы процедуры 
ЗА-ВТТ$ идет подготовка к Форни- 
Рованйю пилотирующего сигнала. В 
Регистр Н. могут -быть занесены 
два числа, определяющие длитель- 
ность — пилотирующего сигнала. 
1780Н заносится в регистр НЬ в 
случае записи загловка - и это 
соответствует прибилизительно пя- 
ти секундам звучания пилотируюше- 
го сигнала, а значание 0С98Н за- 
носится в кцанный регистр в слу- 
чае записи непосредственно блока 
данных, что соответствует прибли- 
зительно двун секундам звучания 
пилотирующего сигнала. Какой тип 
значения заносить в регистр НЬ 
определяется путем проверки со- 


пержимого аккумулятора, точнее, 
его седьмого бита. 
Формирование пилотирующего 


сигнала осуществляется процеду- 
рой 5А-ТЕАШЕЕ. Временная .задерх- 
ка осуществляется с помошью зане- 
сения в регистр В значения Ан. 
Таким образом, путем измененения 
содержимого аккумулятора, мы до- 
стигаем периодического перепада 
напряжения ` на выходном разъеме, 
связывающен Слектрун с магнито- 
Фоном и служащим для записи ин- 
Форнации. Если в этой процедуре 
значение, заносимое в регистр В, 
то Вам удастся сформировать свой 
собственный пилотирующий сигнал, 
отличный от стандартного, который 
позволит защитить Вашу программу 
от копирования: ь 

После Формирования нестандарт- 
ного пилотирующего сигнала оста- 
ется продолжить запись Вашей про® 
граммы на магнитную ленту. Одним 
из способов осуществления этого 
является переход. к стандартной 
подпрограмме 5А-51НС1, которая, 
если Вы правильно оформили свою 
процедуру записи, то стандартная 
подпрограмма сана закончит работу 
по сохранению информации на маг- 
нитном носителе и возвратится в 
операционную среду “Спектрума". 

Теперь Вы видите, что нет. ни- 
чего сложного в том, чтобы соста- 
вить свою собственную программу 
по записи информации на магнито- 
Фон в Формате "Спектрума". для 
этого достаточно лишь немного но- 
дернизировать одну из стандартных 
процедур записи, ‘в нашем случае 
ЗА-РЕАРЕК. Остальные процедуры 
записи можно использовать стан- 
дартные и, лишь когда Вы более 
ПОДРОбНО ПОЗнаконитесь со струк- 
ТУРОЙ вСсТРОеННЫх процедур, Вы 
снохете начать писать собственные 
Программы дальнейшей обработки 
информации и возврата в ‘операци- 


онную среду, Мы предлагаем Ва; 
начинать с простейшего и посте- 
пенно совершенствовать свои  при- 


емы програннирования. 


2. Методика создания оригинальной 
пропедуры чтения инфорнации 
с магнитной ленты. 


Мы с Вани рассмотрели методику. 
создания оригинальных процедур 
записи информации на нагнитоФон, 
используемую при зашите информа- 
ции от копирования. При ее рас- 
снотрении Вам был предложен ме- 
Тод, ПОЗВОЛЯЮЩИЙ УСКОРИТЬ ПОдОб- 
ного рода разработки за счет ис- 
пользования встроенных в ”Сиект- 
РУН" процедур. Однако, такой ме- 
тод не\ всегда приемлем, и поэто- 
му, приступая к рассмотрению про- 
цедуры чтения инфорнации с маг- 
нитной ленты, мы остановим ‘свой 
выбор на создании полноценной 
процедуры выполняющей все Фуик- 
ции чтения информации с магнито- 
Фона. 

Пронедуры чтения информации с 
магнитной ленты, являются более 


‚сложными в сравнении с аналогич- 


ными процедурами записи. Это объ- 
ясняется тен, что основа действия 
процедур заключается в многократ- 
ной проверке шестого бита порта 
254 и в определение интервала ме- 
хду ДВУМЯ СЛСУЮЩИМИ ДРУГ за дРУ- 
гом Фровтами. Таким образом, при 
чтении блока с ленты необходимым 
является точное определение ин- 
тервалов между Фронтами сигналов. 
Работу по определению этих‘ интер- 
валов выполняет вспомогательная 
процедура 10-ЕрСЕ-2, Размешенная 
по адресу О5ЕЗН в ПЗУ "Спектру- 
ма". Эта точка входа в ПЗУ ис- 
пользуется, когпа необходимо ус- 
тановить, сколько времени прошло 
от момента вызова процедуры до 
обнаружения двух, следующих одна 
за другим смен уровней сигналов в 
гнезде ЕЛ и на сколько обе эти 
смены уровней сигнала соответст- 
вуют по времени допустимым преле- 
лан требуемых временных ‘интерва- 
пов. ь 

Второй важной точкой входа в 
ПЗУ является стандартная процеду- 
ра 1Р-ЕПСЕ-1, расположенная по 
адресу О5ЕТН. Она’ позволяет опре- 
делить, сколько времени прошло с 
монента вызова процеудры ‘до из- 
влечения первого Фронта сигнала. 
вызывается она после гомешения в 
регистр В временной константы, 
ограничивающей количество прове- 
РОК порта. РЕН. Превышение допус- 
тиного времени. ожидания смены 
сигнала или определение нахатия 
клавиши ВКЕАК сопровождается об- 
нулениен флага переноса. Для рас- 
познавания кажлой из этих ситуа- 
ций служит Флаг нуля. Если Флаг 7 
обнулен, то в ходе работы про- 
гранмы была нажата клавиша ВЕЕАХ, 
а если он включен, то произошло 
превышение. врененного интервала, 

В расснатриваеной нами методи- 
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рующего  сигвала, 
|как нохно более точно рассчитать. 


стандартного пилоти- 
Ван необходино 


время задеряки пля 


чёткого поиска Фронтов нодернизи- 
Грованного пилоттона. 
` как мы и обешали, 
Идится слециализированная програн- 
загрузки соленты файла, 
[вачинающегося с нодернизированно- 
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полностью соответствует стандарт- 
ной процедуре загрузки информации 
и может осушествлять чтение Фай- 
лов в Формате "Сплектруна”. Если 
Вы внимательно приснотритесь к 
панной программе в нашинных ко- 
дах, то легко обнаружите, что за 
загрузку пилоттона стветственна 
пишь ‘одна процедура 10-ГЕАРЕВ (в 
нашей програнме ей соответствуют 
строки 26-31). Здесь временная 
константа 9СН позволяет процедуре 
ЬР-ЕРСЕ-2 искать два Фронта сиг- 
нала за время. не превышающее 
7000 тактов рРабофты процесора. С 
прупой стороны, ‚ после их нахожде- 
ниЯ\ проверяется, прошло лис но- 
мента вызова процедуры 12-ЕББЕ-2 
до появления заднего Фронта не 
мене, чем 3366 тактов работы 
процессора. Этим способом отлича- 
ются Фронты нилотирующего сигна- 
ла от‘ значительно более близких 
пар Фровтов инфорнационных сигна- 
лов. 

Загружаемая в регистр В вре- 
кенная константа 9СН перед вызо- 
вом процедуры 10-ЕобЕ-2 Формирует 
необходимую задержку пля правиль- 
пой работы этой стапдартной про- 
педуры. После того. как мы воз- 
врашаемся из процедуры 10-ЕПСЕ-2, 
ны первый целом проверяем, была 


`следуютих дрУГ за другом смен 


` си программы на нагнитнур ленту, 


следуютий момент сравниваем со- 
держимое регистра В с предвари- 
тельно загруженной в аккуНУЛЯТОР 
константой С6Н. Команда сравне-| 
ния, 
позволяет нам сравнить содержиное | 
аккунУулятора ‘с числом, содержа! 
шимся во регистре В В результа” | 
те операции числовые значения ‘не! 
изменяются. Результат сказывается!’ 
только. на Флагах регистра’Е. Если 
содержимое аккумулятора больше! 
сравниваеного числа или ‚ равно! 
ему, то Флаг переноса будет вы-| 
ключен. Если же оно неньше, то| 
Флаг переноса будет равен едини- 
це. 

Как Вы помните, процедура! 
ЕО-ЕРСЕ-2 позволяет установить, 
сколько времени прошло эт номента | 
ее вызова до обнаружения двух, | 


уровней сигналов в магнитоФоннон! 
гнезде. для этого в регистр В за-| 
носится константа, ‘определяющая 
количество проверок нагнитоФонно - | 
го гнезда КАЮ. Если изменение 
фронта не обнаружено, то ны «выхо- 
дин из процедуры 1.0-ЕрСЕ-2 по 0б- 
нулению регистра В Если же мы] 
обнаружили смену фронтов в’тот| 
нонент, когда регистр В еше не| 
достиг своего нулевого значения. | 
иы выходим из вышеуказанной про-| 
дедуры и сравниваем остазывеся в) 
регистре В значение с константой, | 
загружаеной в аккумуллятор. Это 
необходино для того, 
РИТЬ, ПРОШЛО ли © МОмента вызова 
ЬР-ЕБСЕ-2. до появления, заднего 
фронта не ненее, чем 3366 тактов 
работы, процесора. | 

Для того, чтобы создать собст-| 
венную процедуру чтения Файлов с 
магнитофона, Ван необходимо рас-| 
считать, какие значения заносить| 
В Регистр В передо вызовон| 
Т0-ЕОСЕ-2 из подпрограммы 
1.0-СЕАБЕВ и с каким значением ак- 
кунулятора необходимо сравнивать 
остаток регистра В после отыска- 
ния Фронта сигнала. 

Все вышесказанное касается! 
лить того случая, когда Вы будете 
использовать метод модернизации! 
пилотирующего сигнала, чтобы до- 
биться его отличия от стандарта. | 
Для кахлого варианта такого сиг-| 
нала Ван необходино создавать! 
собственную оригинальную преце- 
дуру загрузки, то есть подсчитыь- 
вать время задержки. 

Ны с Вами рассмотрели нетоди- 
ку зашиты‘ от копирования с ис-| 
пользованием нестандартного пило- 
тируюшего сигнала, | 


казать вам, : 
сами написать как процедуру запи- 


так и процедуру ‘чтения. Это еще 
ближе знакомит Вас с работой ком-| 
пьютера, помогает пресдолеть ес-| 
тественную ноуверенность перед! 
нашинным кодом и, как мы надеен-! 
ся, поможет Вам реализовать по- 
новому свои способности в про- 
граммировании. 


ри нажата клавиша БВЕАК и лить в 


применяемая в этом случае, |" 


чтобы прове-! 


ПЕР Е ТЫ 


о 


Итак, вы обзавелись. БЕТА-ДИСК 
интерфейсом. ‘а также чистыми дис- 
\кетами. Если есть у кого перепи- 
|сывать готовые программы на дис- 
кетах - Вы ‘на некоторое время 
будете избавлены от прочих забот, 
|наслаждаясь тем, как лихо прохо- 
дит загрузка игр. Вы даже понача- 
лу не будете обрашать внимание на 
Ито, что где-то подпорчена застав- 
|ка ‹нет двух нижних строк), а где 
-то’на экран загружается какая-то 
цветная дрянь. Правда, после это- 
го игра стартует нормально, но 
выглядит это как-то кустарно. 
Кроме того, ‘наверняка есть у Вас 
игры на магнитной ленте; которые 
Вы относите к‘саным “игручим", а 
|их дисковых версий как-то не ока- 
|залось у Ваших друзей. В общем, 
постоянные “житейские" заботы бу- 
|дут каждый день подталкивать Вас 
| ва более глубокое изучение 
ТВ-005. Поэтому я’ поделюсь тем 
опытом, который накопился у меня 
с момента подключения БЕТА-диска. 
| = Вам предлагается обобщенный 
|материал, собранный из разрознен- 
|ных источников, а также уникаль- 
|ные данные, полученные в резуль- 
|тате экспериментальной работы. 
| начальные сведения по дисковой 
| операционной системе ТВ-00$ дос- 
|таточно подробно изложены в мно- 
|гочисленных описаниях,  распрост- 
раняемых в достаточном количестве 
|на компьютерных рынках страны. 
Поэтому в этой статье я буду под- 
разумевать, что владельцы БЕ- 
|ТА-ДИСК интерфейсов уже знакомы с 
этини материалами. 


Первое, что усваивает каждый 
|л пользователь ТЕ-00$5, 


это то, что 
вместо, например: 
ГОА "" СОПЕ 
в Бейсик-строке теперь надо 


ставить: 
КАНПОМТ2Е 056 15619: ВЕМ : 
ЁОАР “паше” СОрЕ 
а вход в систему ТВ-00$ из Бейси- 
|ка производится командой: 
ВАНРОНТЕЕ 05В 15616 
Прежде всего, давайте выясним; 
|что это за ‘адреса? 15616 и 15619 
|это же ведь адреса ПЗУ, того са- 
мого, которое было до подключения 
|ТЕ-005. Не вступаем ли мы в конФ- 
ликт с машинным кодом основного 
|ПЗУ Спектрума? Оказывается нет. с 
[адреса 15616 в ПЗУ Спектрума рас- 
положен символьный набор, начиная 
с. пробела. То есть, в нормальном 
|режиме работы "Спектруна” никогда 
|не происходит выполнение маминно- 
|йго кода в этих адресах. В случае 
БЕТА-ДИСК интерфейса, при попада- 


В "фирменном" 


нии на этот адрес срабатывает се- 
лектор адреса, который подключает 
теневое ПЗУ и дальнейшая работа 
проискодит в нем. В теневом ПЗУ с 
системой ТЕ-00$ по этим адресам 
располагаются команды, передающие 
управление в соответствующие точ- 
ки ПЗУ ТЕ-00$5. 

Рассмотрим теперь более де- 
‘тально, как же устроена ТЕ-1О$5. 


КАРТА ПАМЯТИ ОЗУ. 


Те сведения, которые изложены в 
*Фирменных" руководствах по 
ТЕ-005, можно охарактеризовать 
как ТВ-005 снаружи. Ну, например, 
описании сказано, 
что для работы ТЕ-00$ выделяется 
дополнительно 112 байт озу. И еще 
говорится о том, Что в процессе 
работы ТЕ-Р0$ динзмически выделя- 
ется 255 байт, причем происходит 
это незаметно для пользователя. И 
все про это. Попробуем раскрыть 


поподробнее. эти Фразы, взглянув 
на ТКк-005 изнутри. . { 

Для начала посмотрим, где эти 
112 байт ОЗУ выделяются. До ини- 


циализации БЕТА-ДИСК интерфейса 
карта памяти ОЗУ имела следующий 
вид (только ‘то, что представляет 
интерес): 


16384 
Буфер принтера 23296 
Системные 23552 
переменные 


Бейсик-програмна 


23155 <-- РОС 


При подаче команды БАНПОМТ2Е 
05Е 15616 происходит инициализа- 
ция БЕТА-ДИСК интерфейса. ПРИ 
этом перестраивается карта памя- 
ти. дополнительные 112 байт озу 
выделяются перед областью Бейсик- 
системы. Системная переменная 
РЕОС становится равной 237155+112= 
2з86Т. Бейсик-программа со всеми 
Бейсик-переменными и маркером 
конца передвигается на 112 байт 
ближе к КАМТОР. А область, отве- 
денная под Бейсик-систему стано- 
вится, таким образом, меньше на 
112 байт: 


Экранная память 16384 
Буфер принтера 23296 
НИ ОА ИС м 
Системные 23552 
переменные А 
Системные 


ее <--РАМТОР 
Свободно 

65535 <-- РВАИТ 

Кроме того, непосредственно в 


тот номент, когда ПРОИСХОДИТ чте-]: 
ние или запись сектора данных, 
Бейсик-программа отодвигается еще 
дальше к КАНТОР. Эту переброску 
осуществляет Т®-005 и происходит 
она для пользователя незаметно 
(однако это может доставить массу 
проблен при адаптации магнитоФон- 
ных программы под диск). Бей- 
сик-программа со всеми своими пе- 
ременными отодвигается еше на 257 
байт. это место освобождается не- 
посредственно для операции чте- 
ния-записи сектора данных на 
диск; 256 байт информации плюс 
один байт - контрольная сумма 
сектора. Карта памяти в этот мо- 
мент имеет следующий вид: 


Экранная память 


Буфер принтера 
Системные 23552 
перененные 

Системные 


257-байтное 
пространство 


По завершении операции чтения- 
записи, ‹Бейсик-програнма возвра- 
шается на свое прежнее место - в 
адрес 238567. 

Такое изменение адресов не то 


что происходит незаметно, но, как 
уже говорилось, ножет создать 
массу ’проблен для адаптации наг- 
нитоФонных версий програим под 
диск. Большинство пользователей 
Спектрунов начинали с магвитоФон- 
ных вариантов и БЕТА-диском осна- 
шали свои уже готовые компьютеры, 
поэтому, конечно, одной из первых 
потребностей, с которой Вы стал- 
киваетесь, (и с которой столкнул- 
ся я), является адаптация своих 
собственных программ под БЕ- 
ТА-диск. Переделка Фирменных иг- 
РОВЫХ ПРОГРамм - ЭТО тена для от- 
дельного разговора, однако на 


рынке существует огромное мно- 
жество дисковых версий игр. де- 
шевле пойти и купить то, что на- 


до. Но свои собственные программы 
Ван придется переделывать самим. 
Проблемы могут быть вызваны, нап- 
ример, нехваткой памяти ‘в связи с 
дополнительных 112 
Если значение КАНТОР 
небольшое. порядка 25000, то под 
Бейсик-програмну остается совсем 
мало места. И програнма, которая 
нормально работает в нагнитоФон- 
ном варианте, . ножет отказаться 
работать в дисковом. значение 
ВАНТОР изменить бывает  проблена- 
тично, поэтому прижодится прибе- 
гать к другим приемам по экономии 
памяти. Многие из этих приемов 
достаточно подробно разбирались 
на страницах 7Х-РЕВЮ. Это, в 
частности. замена цифровых значе- 
ний на УАЕ ”...”" и другие приемы. 
Ношет оказаться так, что в 
принципе Бейсик-програмна работа- 
ет, ‘но если в програние встреча- 
ются команды ТЕ-005`с префиксом: 


КАНПОМТ2Е 958 15619: БЕМ: 


"го вместо выполнения их, на экра- 
не появляется сообщение об ошиб- 
ке: “"Оц& о+ шешюгу". Зто значит, 
что свободного места не хватает 
ори попытке выделить 257-байтное 
пространство для операции чтения- 
залиси сектора. 


Если способы экономии паняти 
исчерпаны, ‚ то возможно придется 
серьезно подунать над изменением 
СТРУКТУРЫ программы в целях уве- 
личения значения БАНТОР. Кроме 
этого, следует ‘упомянуть еше об 
юдной проблеме. Во многих прог- 
Раммах применяется нулевая строка 
для разнешения в ней блоков нма- 
шинных кодов за оператором ВЕМ. 
06 этом подробно рассказывалось в 
2х-РЕВЮ Н 9-10 за 1992 год, см. 
Стр. 193. Там говорилось, что ‘если 
строка с ВЕМ это начальная строка 
програмны, то свободное место за 
КЕМ начинается с адреса РКОб+5. В 
случае Тк-00$, это будет 23861+5= 
гзат2. однако, если Бы попробуете 
загрузить с диска блок кодов по 
этому адресу при помоши команды 


ТЕ-005: 
ТОАР "паше” СОРЕ 23872 


то У Вас ничего ие, получится. де- 
ло вот в чем. В тот номент когда 
ПРОИСХОДИТ загрузка (выполнение 
процедуры чтения сектора данных). 
Бейсик-програма и оператор ВЕН 
внесте с ‘ней уже имеют другой ад- 
рес - на 257 больший, чем тот, 
который был. Поэтому загрузку ко- 
дов с` диска в нулевую строку надо 


«выполнять следующим образом: 


ЪОАР “паше” СОБЕ (238712+257) 


Тогда блок кодов попадет точно 
в адрес гз8Тг. 

Вышесказанное относится к заг- 
рузкФ блока кодов в адреса между 
РКОС/и КАНТОР. То же относится и 
к записи блока кодов из этого ин- 
тервала адресов на диск. 


СИСТЕННЫЕ ПЕРЕМЕННЫЕ Т®-005. 


Продолжая взгляд на Т®-005 из- 
нутри, ‘рассмотрим некоторые из 
системных переменных, ’составаяю- 
ших дополнительные 112 байт о3у. 
Еще раз упомяну; предполагается, 
что читатель знакон с ‘описанием 
ТЕ-105 в начальном ›объене. Снача- 
ла кратко. 


23752 (#5003) - 1 байт - режин 
работы диска "А" 

23753 (#5009) - 1 байт/- режим 
работы диска “В“ 

23154 (#5ССА) - 
работы диска ”С“ 

23155 (#5ССВ) 
работы, диска "0" 


1 байт - режим 


- 1 байт - режим 


23773 (#5С00) - в байт - иня 
Файла в кодах АЗСТТ 

23781 (#5СЕ5) - 1 байт - тип 
Файла } 

23782 '#5СЕб) - 2 ‘байта - 
-нараметр ТАКТ В 

23784 | (#5СЕ8) - 2 байта - 
влина Файла 


23186 (#5СЕА) - 1 байт - объем 
файла в секторах 

23781 (#5СЕВ) - 1 байт - номер 
первого сектора Файла ы 

23788 (#5СЕС) - 1 байт — номер 
первого трека Файла 


23198 (45076) - 1 байт - дис- 
ковод для временной операции 

23800 (#5СЕВ) - 1 байт - дис- 
ковой при операции с 2 Файлани 

23801 (%#5СЕ9) - 1 байт - при- 


знак операции КЕАР/УЕЕТЕУ 
23802 (#53РА) - 1 байт - время 
перемещения головки дисковода "А® 
23803 (#5СЕВ) - 1 байт - время 
перемещения головки дисковода “В” 
23804 (#5СРС) - 1 байт - время 
перемешения головки дисковода “С” 
23805 (#5СРО) - 1 байт - время 
перемещения головки дисковода "10” 
23823 (45002) - 1 байт - код 
ошибки ТЕ-005 


`Так ‘осушествляется подготовка к 


23830 (#5016) - 1 байт - копия 
системного регистра 


23833 (#5019) - 1 байт - номер 


дисковода 
23838 (#501Е) - 1 байт - номер 
Файла, если он найден. 


Теперь подробнее. 


С адреса 23752, по 23755 распо- 
ложены & числа, по одному на кахж- 
дый из возможных четырех подклю- 
ченных дисководов А, В.С и р. Т-й 
бит этого числа определяет коли- 
чество дорожек дисковода: 0 - 40- 
порожечный дисковод, 1 - 80-доро- 
хечный дисковод. 1-й бит этого 
числа равен 1, если дисковод 
ДВУСТОРрОННИЙ, 0 бит этого числа 
равен 0; если выполняется команда 
по использованию 80-дорожечного 
дисковода, как 40-дорожечного. 

начиная с адреса 231773, 8 байт 
занимает имя Файла в кодах АЗСТТ. 
При \ инициализации интерфейса в 
эти ячейки заносится ‘иня "004". 


считыванию с диска программы-заг- 


рузчика. 
Следующий байт после инени 
файла, ячейка 23781, определяет 


его тип. Это один из четырех ко- 
дов АЗС - "В", "С", “0 или 
"+". 

Следующие два байта, 
23782, это параметр “5ТАВТ”. 
тип Файла - "С", то это начальный 
адрес размешения кодов в памяти 
спектруна. Если хе тип Файла “В", 
то двухбайтное число в этих ячей- 
ках является системной информаци- 
ей. связанной с автостартом Бей- 
сик-програнны. 

Два байта с адреса 23784 обоз- 
начают длину Файла в байтах. Один 
байт по’ адресу 23786 определяет 
длину файла в секторах (по 256 
байт). Разумеется, должно инеть 
место выражение: 


РЕЕК 23786 - РЕЕК 23785 + 
(РЕБЕ 23784‹>0} 


очевидно, что если младший 
байт длины Файла имеет хоть какое 
-то значение, отличное от нуля, 
то цолжен быть выделен новый сек- 
тор для размешения Файла. 

когда происходит поиск Файла 
на дискете по заданному имени и 
типу, считывается содерхиное ну- 
левой дорожки. В том случае, если 
такой Файл найден, его вонер за- 
носится в яче! 23838. А в ячей- 
ки 23787 и 23788 завосятся соот- 
ветственно начальные сектор и 
дорожка файла согласно его распо- 
лохжению на диске, Таким образом, 
теперь имеется вся необходимая 
информация для загрузки Файла в 
память. 

Если Вы выполняете, 
команду: 

А> ВОАБ “В: рае“ о. 


например, 


== 


|то номер дисковода, указанного 
Вами в качестве временного (в 
|данном случае это "В"}, заносится 
|в ячейку, 23198. Для дисковода 
"А" это 0. "В =, “Са, В" 


|  Ячейка 23801 содержит признак 
|операции 1.ОАБ/МЕРТЕУ, Значение 0 
соответствует. чтению а 255 - 
|сравнению файла. Вы нозете проде- 
лать интересный эксперимент: сде-- 
|пайте РОКЕ 23801,255, а затем ‘по- 
даите_ команду ТВ-005, например, 
ГОА "паше” СОРЕ. Однако вместо 
загрузки будет выполнена нериФи- 
|кация. у 

Интересна информация, находя- 
шаяся в ячейках 23802... 23805. 
|Здесь (по одному байту на каждый 
дисковой) расподожен код, опреде- 
|ляющий время перемешения головки 
дисководов А...П. Число, стоящее 
|там после инициализации - 8. Оно 
соответствует наибольшей скорости 
| перемещения головки. Если чтение 
| сектора’ прошло неудачно, то это 
|число увеличивается на единицу, 
|то есть становится 9 - это соот- 
|ветствует неньшей скорости пере- 
|мешения головки. Она отводится на 
нулевую дорожку, после этого пов- 
| торяется чтение. Если опять неу- 
дача, то опять уменьшение‘ скорос- 
|ти (РЕЕК 23802:10) и повторяется 
| чтение ‘и так до РЕЕК -23802-11. 
|Это наиненыпая скорость перенеше- 
ния головки. Вы можете ° искусс- 
итвенно увеличить ее после неудач- 


ного чтения, подав команду (для 
дисковода “А”, напринер); РОКЕ 
23802, 8 {Кстати тот же эффект 


даст РОКЕ 23802, 12. } 
Вышесказанное про скорость пе- 
премещения головки относится к ТВ- 
005 версии 5.01. В более поздних 
версиях, например, 5.043, уста- 
новлена только быстрая скорость 
[перемещения головки и она не за- 
висит от  содержиного ячеек 
123802...23805. Хотя при инициали- 
зации дисковода туда по-прехнену 
заносится 8. Это число является 
признаком того, что инициализация 
произведена (до инициализации 
|каядого из дисководов А...0 в 
этих ячейках содержится значение 
255). и 

| В ячейке 23814 задается число 
байт, по которым в каталогё диска 
ишется Файл. Начальное значение 


Ячейка 23823 содерхит код 
ошибки ТЕ-205. На коде ошибки не- 
обходимо остановиться поподроб- 
нее. Наберите и выполните следую- 
шую Бейсик-программу: 


10, КАНРОНТ2Е 05 15619: ВЕН: 
1ОАр “аъсае” сорЕ 
20 РЕТИТ РЕЕЕ 23823 

В том случае, если файл 


“аъсае” отсутствует на диске. то. 


__ способом. 


«особенность, 


°нится на; В>. 
. ТЕ-005 в Бейсик, выполнив ВЕТУЕН, 


сообщения ‘06 ошибке не последует; 
ПРОГРАННа остановится с сообщени- 
ем 0 ОК, 20:1. 0 наличии ошибки 
свидетельствует только единица на 
экране. По таблице кодов ошибок 
(снотри в описании Т®-1005) это 
соответствует ситуации “нет Фай- 
ла“. Код ошибки из Бейсик-прог- 
ранмы нохно получить еше и другим 
Ранее в "7Х-РЕБЮ" мы 
уше говорили о том, что внесто 
ВАНООН12Е —`95К вполне можно 
использовать БЕТ’ 5=058 ‹:.. Все 
это относится точно также и к ад- 
ресу 15619. Измените нашу прог- 
рамну: 


10 ГЕТегг - 958 
ГОАО “аъсае” СорЕ 
20 РЕТНТ егг 


15619 : КЕМ: 


Результат работы этой програи- 
ны будет точно. такой же, каки 
первой, Нохете использовать зна- 
чение егг в Бейсик-программе по 
своену усмотрению, например: 


20 ТЕ егг‹>0, ТНЕМ РЕТИТ "ЕВКОК" 
и 


Продолжаем разговор о систен- 
ных переменных ТЕ-100$. 


Ячейка 23830 зто копия систен- 
ного регистра, Если поснотреть на 


схему контроллера дисковода, то. 


это тот регистр, который собран 
на микросхеме 555ТН9, Интересная 
но ‘у меня пока-что 
нет никаких данных о том. как 
практически это можно использо- 
вать. 

Ячейка 23833 ‚ определяет номер 
накопителя А... (А-0, В, С-г. 
2-3). Можете проделать небольшой 
эксперимент. Войдите в ТЕ-005. Вы 
увидите приглашение: А>. Теперь 
выролните: к”ь". Приглашение сме- 
Теперь перейдите из 


затем сделайте РОКЕ. 23853,2 и 
войдите опять в ТВ-005. Вместо 
приглашения: В> Вы увидите: С>, 
так как искусственно поменяли 
дисковод, изменив содержимое сис- 
темной ячейки 23833. 

Перечислены основные, но дале- 
ко не все системные переменные ТВ 
-605.’ Если кто-нибудь из читате- 
лей обладает более полной инФор- 
нацией, напишите об этом. 

Теперь рассиотрин подробнее 
вопрос © том, как информация кра- 
нится на дискете. 

+ 
ФОРНАТ ЗАПИСИ НА ДИСК. 


данные на дискету записываются 
в виде секторов, инеюших объем 
256 байт. вдвое меньший, по-срав- 
нению с 1ВН РС объём одного сек- 
тора позволяет несколько сэконо- 
мить потери из-за недоиспользова- 
ния места, так как длина Файла не 
кратна объену одного сектора. При 


‘тон, 


„7 Номер начального трека 


большом числе коротких Файлов это 
дает определенный выйгрый. 
Предположим, что инеётся цвус- 
ТоРОННИЙ 80-дорожечный ‘дисковод!’ 
(во-всяком случае, таких, навеёр- 
ное, большинство). Если Вы ото: 
натируете дискету. То при завёр-| 
шении форматирования увидите, что 
на дискете имеется 2544 свободных 
сектора. Но 80 дорожек умножить |, 
на 16 секторов получится 2560 
секторов, Где‘остальные? Дело в 
что нулевая дорожка дискеты 
- 16 секторов - является систеён- 
ной. А Файлы могут располагаться, 
начиная с 1-й дорожки по 159 (так 
как запись двусторонняя). 
Информация на нулевую дорожку 
записывается в строго определен- 
ном формате. Эти 16 секторов мо- 
делены на две части. В первой 
части - сектора с о пот - 
нятся заголовки Файлов: 
на один 


секторах может быть размещено 128 

заголовков Файлов. То есть: 

8 секторов * 256 байт - 2048 байт 

то же саное, что: 

128 Файлов * 16 байт - 2048 байт. 
Из максимального числа Файлов, 


кстати, проискодит название: "БЕ- 
ТА-ДИСК 128”. 
для тех, кто програмирует в 


кашинных кодах может оказаться 
полезным еше и такой вэгляд. По- 
рядковый номер заголовка’ инеет 
следующее свойство: старший полу- 
байт этого числё (старшие а бита) 
соответствует нонеру сектора, в 
котором записан заголовок Файла, 
а младший полубайт (младшие 4 би- 
та) соответствует комеру заголов- 
ка в секторе. } 

С том, как в панять компьютера 
считать нулевую дорожку - позже, 
А сейчас о Формате заголовка Фай- 
ла. Он в точности совпадает с 16 
ячейками систенных переменных с 
23773 по 23788: Из 16 байт, отве- 


денных на один заголовок, первые | 
восемь занимает имя Файла в 
А5СТТ. Следующий байт - тип Файла 


(тоже в А5С1т) - В, С. 
Следующие два байта 
ЗТАРТ, далее 2 байта - длина Фай-\ 
ла, следующий байт - объем Файла 
в секторах и далее 1 байт - ‘номер 
начального сектора Файла и 1 байт 
{дорож- 
ки) Файла на дискете. 

КРОНе сказанного, надо ‘доба- 
вить следующее. При удалении Фай- 
ла первый символ имени (первый 
байт заголовка) заменяется ва код 
01. В таком виде Файл считается 
удаленным, однако, если Вы не де- 
лали команду НОУЕ, то удаленный 
Файл всегда можно восстановить, 
изненив первый символ его имени в 
заголовке либо при помоши прог- 
Рамн типа "015К-РОСТОР". либо при 
поноши всевозножных программ-обо- 
почек типа "НОА-5ЕЮУТСЕ". Однако, 
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если удаляется последний Файл ка- 

ога, ‘то’ первый символ имени 
заменяется нё на 1, ана 0. по 
значению 0 определяется конеи ка- 
талога. Заголовки вновь записыва- 
еных, Файлов будут Располагаться, в 
каталоге, начиная с этого места. 

Кроне. секторов. 0...Т, в кото- 
Рых располагаются, заголовки Фай- 
лов, есть еше один сектор, вось- 
мой, ‘в котором содержится общая 
информация по диску. Эта инФорма- 
ция расположена не с начала сек- 
тора, а ближе к его концу. Если 
начать нумерацию байтов сектора с 
0, то вот содержание байтов, не- 
суших инфорнацию по диску, 

Байты 225 и 226 хранят начало 
свободного места на диске, дос- 
ТУПНОоГо для записи Файлов - сек- 
тор и трек соответственно. Сразу 
зе после Форматирования дискеты 
эти байты имеют значения 0 и 1 
соответственно (как говорилось 
выше, запись Файлов на дискету 
начинается с дорожки номер 1). 

Байт 227 ‘определяет тип раз- 
нетки диска. Значения этого байта 
могут быть следующими. 


22 (#16) - 80 дорожек, 2 стороны; 
23 (#17) - 40 дорожек, 2 стороны; 
24 (#18) - 80 дорожек, 1’ сторона; 
25 (#19) (- 40 дорожек, 1 сторона. 


Байт 228 определяет общее ко- 
личество, Файлов, записанных на 
диск. Это число включает в себя и 
удаленные Файлы, так как Физичес- 
ки они все равно присутствуют на 
диске. То есть это все Файлы от 
начала `каталога до начала свобод- 
ного неста. { 

Байты 229 и 230 
старший) определяют количество 
свободных секторов на диске. сра- 
зу же после форматирования диске- 
ты конандой ТЕ-ГО5: РОКНАТ 
"папе", они равны соответственно 
240 и 9. То есть 210+9и256=2544. 
Если для Форнатирования  восполь- 
зоваться програмной “ОСИ” Н. Ро- 
дионова, можно отформатировать 
диск на максимальное число доро- 
жек, для большинства дискет прак- 
тически до 83-84 дорожек. При 
этон байты гг9 и 230 сразу че 
после Форматирования могут иметь 
значения, например 2640 
или 2612. На первый взгляд ножет 
показаться, что на такую дискету 
Удастся записать больше файлов. 
Но это только на первый взгляд, 
Попробуйте отфорнатировать диске- 
ту таким образом, а потом запи- 
сать на нее Файл объенон, напри- 
1 сектор. После записи ‘Вы 
что на дискете осталось 
сектора (2544-1= 
То есть ТЕ-005 пересчиты- 
вает число свободных секторов при 
записи Файла исходя не из того, 
что записано в байтах 229 и 230 
системного сектора, а из того, 
что на диске может быть только 80 
или 40 дорожек по 16 секторов. 


(иладший и 


Единственным преимуществом Форна- 
тирования на максимальное число 
дорожек ПОКа что видится вВозЗмоЖ- 
ность использования места за 80-й 
дорожкой для каких-то своих це- 
лей, например, там может распола- 
гаться пароль, зашишающий дискету 
от копирования. Практически такой 
способ. зашиты очень распростра- 
нен, но это - тема для отдельного 
разговора. 

Если дискета Форнатировалась 
при помоши программы "СИ", то 
байты ггз и гг содержат нмакси- 


нальное число Форматированных 
секторов, доступных для записи 
Файлов. Сразу же после Форматиро- 


вания дискеты значения этих бай- 
тов совпадают со значением байтов 
229 и 230. Но значения последних 
изменяются по мере записи Файлов 
на дискету, а значения байтов 223 
и 224 остаются неизменными и ис- 
ПОЛЬЗУЮТСЯ ПРИ работе | программы 
*рСо*. 

Если дискета ° Форматировалась 
командой ТЕ-005:  ЕОЕМАТ "паше", 
то содержимое байтов 223 и гг4 
равно 0. Ненулевое значение этих 
байтов является признаком того, 
что дискета Форматирована при по- 
моши програнны "рСу", 

Байт 23! всегда хранит код 16 
(#10). Он определяет число секто- 
РОВ На одной дорожке и никогда не 
неняет своего значения. Это число 
обозначает принадлежность диска к 
операционной систене ТЕ-005. 

Байт 244 содержит число уда- 
ленных Файлов - то есть тех, пер- 
вый синвол ‘имени которых в ката- 
логе диска имеет эначение 01. 


Байты с 245 по 252 хранят иня 
диска в кодак АБЗСТЕ (всего - 8 
байт). 


Сектора с 9 по 15 не несут ни- 
какой инфорнации, связанной с 
обычным Функционированием Файло- 
вой системы диска. 

Вот это все, что касается ну- 
левой дорожки. Е сказанному нохно 
добавить, что искажение систенной 
информации диска ‘и каталога диска 
ШИРОКО Используется для зашиты от 
копирования, и разговор об этом 
будет уже в этой статье, но чуть 
позже. А сейчас ны подошли, пожа- 
луй, к саной главной тене. \ 


ВЫПОЛНЕНИЕ КОМАНД ТЕ-005 
ИЗ НАШИННОГО КОДА. 


Трудно переоценить ‘ значение 
этих сведений для програнмиста, 
поэтому сразу к делу, 

В Фирменном руководстве по ТВ- 
205 описан способ выполнения ко- 
нанд ТЕ-00$ из нашинного кода. 
Суть его в двух словах в ‘следую- 
шен. Где-то в памяти Спектруна 
размешается Фрагмент Бейсик-прог- 
раммы - некоторая Фиктивная Бей- 
сик-строка, содерхащая команду 
ТВ-20$. Формат записи этой Бей- 


сик-строки такой же, каким он яв-| 
ляется в обычной Бейсик-програм-! 
ме. Затен в регистры процессора и! 
систенные переменные Бейсика за-| 
носится адрес, в котором находит-! 
ся новый Фрагмент  "Фиктивной" 
Бейсик-програмны. затем. происхо- 
дит запуск интерпретатора Бейсика! 
пля’ выполнения этой Фиктивной 
СТРОКИ. Такой способ выполнения! 
машинного кода при помоши Бейсика 
настолько громоздок и несуразен, 
что может иметь разве что чисто! 
теоретическое значение и вряд-ли! 
кен-то может восприниматься серь- 
езно. Но главное в том» что он 
выполняет только то, что ножет 
быть выполнено из обычного Бейси-| 
ка и не более того. 

для выполнения команд из на- 
шинного кода в Т®-205 сушествуют! 
специальные, возможности. Основная | 
из них - использование подпрог-| 
ранны ТЕ-005 с точкой входа 15635! 
(#3013). С этого адреса в конеч-| 
ном счете осушествляется` переход] 
к подпрограмме 10300 (#283С), ко-| 
торая в зависимости от кода, со-|’ 
пержашегося в регистре С процес- 
сора передает управление  соот-| 
ветствующей процедуре системы ТЕ- 
205. Практически Фрагнент выпол-| 
нения команды ТЕ-РО$ из машинного! 
кода может выглядеть следующим! 
образом: 


ео. с,..%. 
САШ, #31013 
Кроме регистра С может потре- 
боваться предварительная установ- 
ка других регистров процессора. 
Рассмотрим кратко 
процедуры, выполняемые в зависи-| 
ности от содержимого регистра с. | 


С:-0. Восстановление, 
контроллера, при котором головка| 
отводится на нулевую дорожку и| 
ожинается` появление сигнала! 
ТЫТЕО. Выход из режина охидания| 
ножет быть произведен при накатии 


клавиши ВРЕАК на клавиатуре. 


С-1. Инициализация дисковода. 
Предварительно в регистре А дол- 
жен быть задан номер накопителя| 
0...3. Здесь надо сказать, что! 
если ТК-Р0$ стартует при открытонй 
карнане дисковода ‘или без диске-! 
ты. то по адресам 23802... 238051 
заносятся числа 255. Это означа- 
ет, что дисководы неннициализиро- 
ваны. В результате работы этой! 
процедуры устанавливается время 
перемешения головки дисковода - 
заносится число 8 по однону из 
адресов 23802...235805 в зависи- 
мости от номера дисковода, 
определяется количество дорожек! 
дисковода и результат заносится| 
по одному из адресов 
23Т52...23155 в соответствии с! 
номером накопителя (первовачаль- 
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ие 
ное значение также 255). Если 
дисковод имеет 40 ‘дорожек, то за- 
иисывается 0, если 80 дорожек, то 
128 (устанавливается Т-й бит). 
Далее зацается номер дисковода 
для временной операции (берется 
из регистра А) и это значение за- 
носится во адресу 237198. По адре- 
СУ 23830 помешается копия систен- 
ного регистра. 

Есаи вреня перемещения головки 
(ячейки 23802...23805) уже уста- 
новлено, то операции по инициали- 
зации дисковода не производятся. 


С=г. Позиционирование. Предва- 
рРительно в регистр А помещается 
вомер дорожки, ‘на которую донхжна 
быть установлена головка. При 
двустороннем  дисковове  первону 


Эта процедура помещает 
содержимое регистра А по адресу 
ёззот, задавая, таким способом 
номер сектора, 


С-4. Процедура помещает содер- 
жиное регистра НГ. по здресу 23808 
(2 байта}, задавая таким способом 
адрес буфера. 


С-5. Очень важная нодпрогран- 
ма. Она ‘позволяет читать блок 
секторов. Для этого  необжодино 
подготовить начальные параметры в 
регистрах процессора. В регистр В 
помещается количество читаемых 
подряд секторов. В ‘том случае, 
если В=0, то с диска считывается 
только область заголовка, считы- 
вание сектора в память не произ- 
водится. В Регистровую пару Е 
помещается начало ‘считываемого 

вр - дорожка, а 
В регистре НЕ дол- 
ен быть задан адрес начала 6уФе- 
ра в памяти Спектруна, куда будет 
производиться загрузка блока сек- 
торов. 
С:6. Процедура ‘Записи ва диск 
Все параметры 
которые были в 
предыдущей процедуре. 

С-Т. Вывод каталога диска 
(аналогично команяе ‘САТ Т®-р0$). 
В регистре АЛ должен быть задан 
канал дая вывода каталога. Для 
вывода на дисплей, например, в 
регистре А должно быть 2 (стати, 
при этом будет очищен экран). Для 
вывода на принтер - 3. Следует 
что перед. выполне- 


дать номер накопителя для времен- 
ной операции, поместив его по 
аиресу 23198. Эта процедура пред- 
процедуру 
загрузку м. 
и (сн. нихе). - 


С=8. Чтение заголовка Файла. ‚В 
регистре А должен,быть номер ин- 


тересующего файла (с 0 по 121). 
из каталога диска 16 байт заго- 
ловка Файла будут помещены в иа- 
мять. начиная с адреса 231173. Это 
может быть и удаленный Файл, так 
как не проверяется, есть лк такой 
Файл, в действительности, 


С-9. Запись в каталог заголов- 
ка Файла. 16 байт из памяти, на- 
чиная с адреса 23113; перелисыва- 
ются в ‘каталог диска на место 
заголовка Файла, вомер’ которого 
Задаечся в регистре А аналогично 
предыдущей процедуре. 


С=10. 
В каталоге диска имется Файл, ко- 
торый по имени и типу совпадает с 
тен, что задано в памяти; начиная 
с адреса 23713. Количество байт, 
на которые ведется пойск, залает- 
сЯ по адресу 23814. начальное 
значение - 9. В том случае, если 
Файл найден, то его номер будет 
находиться в регистре С, а также 
в ячейке 23858. Если Файл не най- 
пен, то в регистре С будет 128 
(7-й бит установлен в 1), содер- 
хиное 23838 не изменяется ав 
ячейке 23823 будет 255. 


С-11. запись кодового | Файла, 
При этом с адреса 23713 задается 
иня и тип Файла. В регистре НЬ - 
апрес начала Фажла в памяти, в 
регистре ПЕ - длина Файла. Эта 
процедура выполняет, действия ана- 
логичные конанде ТВ-1О5: 

ЗАМЕ "паше" СОБЕ 5фаг4, Героев. 

С-12. Запись Бейсик-ирограммы, 
С адреса 23173 должны быть заданы 
имя и тип Файла. В тон случае, 
если тип Файла отличается от "В", 
то Файл записывается под инченен 
"Боо%" <В>. 


С-14. Загрузка или верификадия 
Файла. Имя и тип Файла должны. 


‚быть помещены по здресу 23113, 


Здесь есть несколько вариантов, в 
зависимости от значения регистра 
А. При А-0 адрес загрузки и длина 
Файла берутся из каталога. При А- 
3 загрузка происходит с адреса, 
который задается в регистре НГ, 
причем длина загрузки определяет- 
ся значением регистра Е. При 
А-255 адрес загрузки берется из 
8, а длина загрухаемого Файла - 
из каталога диска. Значение по 
адресу 23801 определяет команду: 
О - ОАО, 255 - УЕВТЕЯ. 


С-18. Удаление Файла. Иня и 
тип Файла должны быть заданы с 
апреса 23773. При этом удаляются 
все Файлы с такини данными. Хак 
у=е говорилось выше, если Файл не 
последний, первый символ инени 
Файла нет кодом 01, К 


С:19. Эта процедура перебраси- 
вает 16 байт информации с адреса, 
указанного в НШ.,`в адрес 23773. 


Процедура поиска Фаила. ` 


С:20. Процештра, обратная пре- 
выдушей. 16 бане пзребрасывзются 
с айреса 23113 в адрес, указавный 
в нь 


С=2а. Процедура загружает сис- 
темный регистр интерфейса. Код - 
в, ‘аккумуляторе (регистре! А). 
загрузке к Содерхимому аккунуля- 
тора добавляется #36. 


Для пругих значений С в раз. | 
личных источниках приводятся про- 
тиворечивые или весьча  снутные| 
сведения, поэтону ва них не будем 
останавливаться. | 
покопаться в ПЗУ 12-008, привоху| 
входные адреса’ процедур, соот 
ветствующие различным ‘значениям 
регистра с. | 


#3098 #0103 
#30СВ #290Р 
#3563 #0103 
#зког #0103 
#3206 #0103 
#130 #2926 
#1 ЗО #280 
$2808 %28ЕЗ 
#1656 #2739] 
#1664 ЗА ЕЕВ 
#1СРО #1ЕЕб 
ЖРВЕВ #03051 
с-12 мова 


Для выполнения команд ТВ-В05] 
из нащинвого кода существует ещей 
один `сп0с0б. Он позволяет обра- 
паться сразу же непосредственяо в} 


теневое ПЗУ ТВ-005, в любую его| 
точку. Вы спросите, как же это 
практически сделать, ведь обра- 
тившись, напринер, по олнону из 


тех адресов. которые приведены 
выше, мы попаден всего лишь в ос-| 
новиое ПЗУ слектруна. для этого в 
системе ТЕ-р0& имеется специаль- 
ная точна входа с адресом 15663 
(изрёг), Там находится всего. дить! 
оина конанда НОР, после чего сра-| 
зу же идёт ВЕТ. дело в том, что 
при обрамении по адресу 15663 се-| 
нектор адреса БЕТА-ДИСК интерфей- 
са подклрчает теневое ПЗУ, а вы-| 
полнение команды РЕТ приведет к 
переходу программы на адрес, ‘за- 
писанный на стехе. Поэтому ‘если| 
перед. обращением к 15563 на стек! 
поместить н адрес. то можно 
осушествить перехьд на этот за-| 
данный апрес теневого ПЗУ  конан- 
пой: 2.15653. 

в качестве практического | 
примера использования машинного 
кода ная выполнения команд ТЕ-005| 
приведу простую програнму "ОТК", 
которая позволяет яыводить на 
экран параметры Файлов (имя, тии, 
апрес загрузки, длина им т.п. ), 
содержащиеся в каталоге диска, 
Кроме теоретического. эта прог- 
рамиа представляет определенный 
ирактический интерес, так как вы- 
водит кроне обычной инфогиадии 
се и данаые о начаде Файлов ‘на 
ииске (конанла Ш5Т  Т8-10б эту 
инФориадую не изводит). 
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Г ПРОГРАМНА "ПТК". 


Нашиннокодовая часть программы 
выглядит следующим образом (адрес 
размешения - Произвольный) : 


21'00`АВ^ ТО НГ, ЧАВОО (1) 
11.00 00° РВ ОЕ, #0000 (2) 
06 08 10 в, #08 (3) 
оЕ 05 2.с, #05 {4) 
Со 13 32 САМ. #13013 (5) 
с9 ВЕТ {6} 


В регистре НЬ задается (1) ад- 
буфера, куда будет произво- 
|диться чтение. каталога’ диска 
(#АВОО-43176). В регистрах риЕ 
задаются пачальные дорожка и сек- 
„тор (2): чтение будет начинаться 
ИС О сектора О дорожки. Число счи- 
| тываемых подряд секторов’ задается 
(3) равным 8, столько  занинает 
|каталог диска. Затем задается (4) 
параметр, определяющий процедуру: 
|С-5,/ ‘то есть чтение блока секто- 
[ров и далее (5) - выполнение 
подпРОГРАамны ТВ-РО5. После чего 
{5} - возврат в вызывающую прог- 
| рамну. з 
После того, как содержимое ну- 
плевой дорожки считано в буфер, 
|его можно рассмотреть более под- 
Робно. Этим уже займется Бейсик. 
ИПрогранна выглядит следующим об- 


г ВОКОЕК 1: РАРЕВ Т: 11; С 
Т.ЕАК 39999 
3 ВЕЗТОВЕ : РОБ а-40000 ТО 40 


1013: ВЕЛО Ь: РОКЕ а,Ь: МЕХТ а: р 
АТА 33, 0. 171, 17,0, 0, 6, 8, 14, 5, 205 
|, 19, 61, 201 

4 60 ТО 100 

5 КАНПОНТ2Е 056 15619: ВЕМ: 
ЗАУЕ "ОтЮ” 


6 ТОР 

20 РАНТ АТ 0,0; РАРЕЕ 6; 1НЕ 
"Наше ”; РАРЕЮ 2; ТВК Т; "Туре" 
РАРЕК. 3; ШК 0;" 5%аг& Бепв& " 
РАРЕК 4; "Ве 1пп"; РАРЕВ 5;" 1е 
22 РЕНТ ВЕСНТ 1; ТМУЕВ5Е 1; 


АЗСТТ -"; ТМУЕВЗЕ 0; " Вухе 


3 "; 1ВУЕЕЗЕ 1;"Тгк"; ТВУЕВ5Е 
0; " 5естог” 

| 24 ВЕТУЕН 

| 30 РОВ аза ТО а+Т: 1ЕТ п%=0%+С 


|НЕ$ РЕЕК а: НЕХТ а: ВЕМ паше 
| 31 БЕТ 4$-СНЕ$ РЕЕК а: ВЕМ 1УР 
е 


| 32 ТЕТ а-а+1: 1ЕТ 3&-РЕЕК а+25 
б®РЕЕК (а+1): РЕМ зфаг& 

33 БЕТ а-а*г: БЕТ 1еп=РЕЕК а+2 
5б=РЕЕК (а+1): ВЕМ зепваВ 


38 "ЕТ а- а+2: 1.ЕТ Я=РЕЕК а; КЕ 
| 35 ЕТ -а+1: 
РЕМ Ъев1п' 5ЕС 

36 ГЕТ а:а+1: 


БЕТ зес-РЕЕК а: 
ТЕТ \Г=РЕЕК а: В 


37 [ЕТ а а+1: ВЕТУЕН 
100 КАНРОМТИЕ 95Я 40000 
200 ТЕТ а-13776 
| 300 0 508 20; 
1, 3+10 

1000 ТЕТ п3:”"; 60 508 30 
1010 РРТИТ АТ 3,5; РАРЕБ 6; 


БЕТ 3:2: ВБЕР ‚0 


ТНК 


2; п%; РАРЕВ 2; "ВК 7; 13; 

1020 РЕТНТ РАРЕК 5; 18К 0; ТАВ 1 
0; 34; ТАВ 16; 1еп; ТАВ 22; РАРЕВ 4; 
ТАВ (22+ ({г<100)); АГ; ТАВ 
РАРЕВ 5; 1 0; ТА 


1030 ГЕТ 3=3*+1: ВЕЕР..`01, 3+10: т 
Е )>=-аг2 ТНЕН РАОЗЕ 0: С15 : 60 
то 300 

1040 1Е а<4377Т6+256*"8 ТНЕМ Со Т 
о 1000 

2000 РЕТМТ #0; ТНУЕВ5Е 1; "РТЕ 0. 
К. ": ВЕЕР .1,26; ВЕБР..1,20: РАЦ 
5Е 0: 615 : 60 То 200 


После набора программы сделай- 
те вом 5 это запись программы 
на диск. Нет необходимости запи 
сывать программу на диск с ‚автос- 
тартом. Любой загрузчик (”Ьос1"} 
запускает програнну с начальной 
Строки. При этом строка 2 Форми 
рует в паняти необходимый кодовый 
блок, после чего происходит чте- 
ние восьми секторов нулевой до- 
РОЖКкИи (Строка 100). Считанная ин- 
Формация разнешается с адреса 
43116 (#АВОО). СО 50В 20 в строке 
300 - это распечатка “шапки”. Пе- 
ременная 3) - это номер строки эк- 
рана для вывода последующей ин- 
Формации. 

Со СТРОКИ 1000 расположена 
програмна распечатки одного экра- 
на информации, Подпрограмна ` со 
ЗУВ 30 ПРОИЗВОДИТ расчет парамет- 
РОВ длЯ каждого заголовка Файла. 
Первые 8 байт - имя программы 


(п$, строка 30). Затем тип (1$, 
строка 31). Следующие 2 байта оп- 
ределяют параметр ЭТАЮТ (3%, 
строка 32). Затем 2 байта - длина 
Файла (1еп, строка 35). Потом 
идет 1 байт - длина Файла в сек- 
торах (9, строка 34). Следующая 
пара байт - начало Файла на диске 


- сектор и дорожка (соответствен- 
но зес и {г в строках 35 и 36). 
Строки 1010 и 1020 - это рас- 


печатка полученных данных по од- 
ному заголовку - 16 байтам нуле- 
вой дорожки. Строка 1030 - 


завершающие операции по распечат- 
ке заголовка и проверка на дости- 
жение конца экрана. Если он дос- 
тигнУт, то очистка экрана и 
распечаткаеслелующего (со СТРОКИ 
300}. 

Строка 1040 проверяет, не дос- 
тигнУт ли конец каталога (8 сек- 
торов По 256 байт). Если нет, то 
переход к расчету и печати инфор- 
мации о следующем файле (со стро- 
ки 1000). Иначе - Завершение ра- 
боты переходом на строку 2000, 
где программа запикливается, во- 
эобновляя вывод информации с пер- 
всго заголовка Файла. 

Теперь предположим, что Вы за- 
пустили эту програмну, вставив в 
дисковод какую нибудь дискету. 
Послё того, как на экран будет 
выведена информация © всех су- 
шествующих Файлах (при этом уда- 
ленные Файлы будут начинаться со 
знака "?"), если на дискете боль- 
ше нет Файлов, то вся последующая 


часть каталога будет состоять из! 
нулей. Чтобы не "прокручивать" 
вхолостую весь каталог, можно до- 
бавить в програмну такую строку: 


1035 ТР РЕЕК а=0 ТНЕН 60 ТО 20001 


Так как начало свободного мес-! 
та на диске обозначается нулевым! 
первым кодом имени Файла. то как! 
только встретится такой код, вы-| 
вод будет завершен переходом на| 
2000 СТРОКУ. | 

как еше можно усовершенство-| 
вать программу? Ну, например, | 
можно в конце добавить вывод ин 
Форнации по диску, его имя, ис. 
Файлов, наличие свободного ме 
итд., в общем, все то, что мох 
но "выудить" из восьмого систем- 
ного сектора. Для этого надо что- 
бы с нулевой дорожки было считаной 
не 8 секторов, а 9. Для этого в! 
строке 3 после БАТА число 8 долж- | 
но быть заменено на 9. теперь за- | 
одно с каталогом в память будет! 
считан и системный сектор. Попро- 


буйте сами сделать такое уссвер- | 
шенствование, если хотите, распо- | 
ложив эту часть программы, 1 


начиная со строки 2000. Вся необ-| 
ходимая инфорнация по расшифровке! 
системного сектора приведена вы- 
ше, | 

Для того, чтобы просмотреть! 
новый диск, можно нажать ВКЕАК, | 
затем сделать КОМ. Используя блок! 
кодов "ОН ЕВРОВ 60 ТО” (сн. | 
7Х-РЕВЮ НК 5-6 за 1992 год, стр. 
113), Вы можете еше более усовер- 
шенствовать программу; ‘она будет! 
перезапускаться с начальной стро] 
ки При нажатии ВЕЕАК для того, || 
чтобы можно было просмотреть | 
вый диск. 


ПРИЕМЫ ЗАЩИТЫ ОТ КОПИРОВАНИЯ. | 
| 

До сик пор ны вели разговор о| 
тон, как все должно работать, как} 
говорится, "по букварю”. Теперь! 
подойден более критически к неко- | 
тТоРыМ вопРОСан. Например, длина! 
файла. В 16 байтах заголовка дли- 
на Файла фигурирует дважлы. Дейс-| 
твительно, длина Файла это два| 
байта: 11-й и 12-й. 
это 13-й байт - | 
секторах. Зачем он нужен? Ведь он 
же легко рассчитывается из из- 
вестных 11 и 12 байтов. ТЕ-ро51 
устроена так, что точная длина 
Файла (1!-12 байты) необкодинай 
для процедуры загрузки Файла в} 
память, а вот при операциях пере- | 
записи Файла Т®-005 — оперирует! 
именно с 13 байтом, резервируя на! 
диске столько места, сколько! 
обозначено в 13 байте. Поэтому| 


если искусственно, ВРУЧНУЮ", 
например, ПРИ ПОомоШИи программы 
типа "ОГ5К-роСТОЕ", изменить зна- 


| 
чение этого байта, задав нулевое! 


значение. ‘то Файл будет загру-| 
хаться и стартовать нормально (111 
и 12 байты не изменены). но пРи| 
перезаписи Файла на другую | 


>) 


г будет переписано ноль секто- 
ров, то есть Фактически перезапи- 
[си не произойдет. 
На этом принципе работают  не- 
которые самые простые программы 
по защите Файлов от копирования, 
например программа “С1.05Е". Эта 
|програнма обнуляет 13-й байт за- 
головка у Файлов, имеющих расши- 
|Рение "В", задавая, таким обра- 
нулевую длину Файла в секто- 
Кроме того, эта программа 
искажает системную инфорнацию по 
диску, изненяя значения парамет- 
Ров системного сектора. Искажению 
подвергаются: начало и-количество 
свободного места на диске, тип 
диска {вместо двустороннего зада- 
|ется односторонний), количество 
Файлов. Кроме-того, в имя первого 
|Файла вводятся непечатаемые уп- 
|равляющие коды. Однако при этом 
|не нарушается нормальный старт 
`програнн с диска. Такие диски 
[удается скопировать только цели- 
ком при помощи специальных копи- 
|Ровшикон типа “диск в диск”, ког- 
да копируется 6е3 изменения 
содержимое всех 80 дорожек диска. 
Кстати, изложенные в этой статье 
сведения позволяют Вам саностоя- 
тельно разработать такой копиров- 
шик даже на Бейсике, с выполнени- 
|ем одного Фрагмента в. машинных 
| аналогично программе 
Пофайловое копирование 
|всего диска при помоши команды 
1ТЕ-005: СОРУ В, а также копирова- 
ние при помощи програмн-оболочек 
й|йтипа "МОА-5ЕВУТСЕ”" в этом случае 
не помогает. 
|й Этот способ защиты широко 
Праспространен на рынке програнм- 
ного обеспечения, но пользуются 
им не разрабстчики оригинальных 
|проррамн, а скорее "работники 
|торговли”. Их дискеты недостаточ- 
но хорошо сконпонованы, чтобы ко- 
пировать их целиком. Обычно на 
дискете бывает несколько хороших 
программ, остальное - мусор для 
заполнения дискеты. Впрочем, это 
уже отклонение от темы. Так или 
иначе, Вы должны быть свободны в 
вопросах компоновки своих дискет, 
поэтому я поделюсь с вани прог- 
раммой, созданной мной в противо- 
*С1.05Е". Она называется 
На санон деле проблема 
достаточно примитивна. Испорчен- 
ную длину Файла в секторах легко 
можно восстановить, вычислив раз- 
ность между началон этого Файла 
{байты 14 и 15 заголовка) и нача- 
|лом следующего Файла. Заодно 
|програнма “ОРЕН" также рассчиты- 
вает объем и начало свободного 
места на диске и восстанавливает 
всю остальную системную инФорна- 
цию по диску. 


ПРОГРАММА "ОРЕН". 


2 ВОВОЕЕ Т: РАРЕВ Т: 
ЦЕАЕ 39999 
| 3 КЕЗТОКЕ : РОК а-40000 ТО 40 
012: ВЕАО Ь: РОКЕ а,Ъ: НЕХТ а: В 
АТА 33, 0, 171, 17, 0,0, 1,5, 9, 205} 19 


тк о: с 


„Затем начинаются рассчеты. 


‚ 61, 201 

4 во то 100 

5 КАМПОНТАЕ И5Е 15619: ВЕМ : 
ЗАУЕ "ОРЕН" 

6 ЗТОР 
100 С15 ; РЕТЫТ #0; "ТЫ$ЕВТ 015 
АНО РВЕ5$ АМУ КЕУ": РАОЗЕ 0 
110 ТНРОТ ТНКЕУ$: РЕПНТ #0; ТАВ 
8; РЕАБН 1;" РТЕАЗЕ МАТТ “ 
200 КАНРОНМТТЕ 05Р 40000 
210 ТЕТ а-43716: ТЕТ п-0: ТЕТ а 
ГЕТ +гее=2544 
2г0 60 508 1000 
230 ТЕТ а-43116+128"16 
240 60 508 2000 
300. ТЫРУТ 1НКЕУ$: РЕТНТ #0; "ОМЕ 
ЕМЕТТЕ ТВАСК <0> (У/Н) ? ": РАЦ 
Е 0: ТНРИТ ТЕКЕУ$ 
310 ТЕ 1ЫКЕУЗ-"У” ОК’ 1НКЕУ$ -"У" 
ТНЕМ РОКЕ 40007, 6: КАНРОМТЕЕ 0 
58 40000 
320 5ТОР 
1000 КЕМ Каза1о& 
1010 ТР РЕЕК а-0 ТНЕН ВЕТОКН 
1020 ЦЕТ п-п+1 
1030 1Е РЕЕК а-1 ТНЕН ТЕТ 4е1-4 
е1+1: 60 ТО 1050 
1080 ТЕ РЕЕК а‹зе ОК РЕЕК а>1217 
ТНЕН РОКЕ а, 63 
1050 ТЕТ Ьев!1=РЕЕК (а+14)+16=РЕЕ 
К (а+15) 
1060 ГЕТ ьевё-РЕЕК (а+14+16)+16к 
РЕЕК (а+15+16) 
1070 ГЕТ 1епз-Беяг-Ъе81 
1080 ТЕ РЕЕЕ (а+16)-0 ТНЕН ТЕТ! 1 
еп$=РЕЕК (а+12)+(РЕЕК (а+11)<>0) 
1090 РОКЕ (а+13), 1еп3 
1100 ТЕТ #гее=+гее-1еп$ 
1110 БЕТ а-а+16 
1120 60 ТО 1000 
2000 ВЕМ р15к-дафа 
2010 ГЕТ зрасе-Ьев1+1еп3 
2020 ЕТ ЗР&-1ЫТ (3Расе/16): 
$Р5: зрасе-3Р4 #16 
2030 РОКЕ (а+225), $р5;: 
26), ЗРА 
2040 РОКЕ (а+гет), 22 
2050 РОКЕ (а+гг8), п 
2060 ТЕТ +га-ТНТ (#тее/256): 
$г1- +гее-+генг56 
2010 РОКЕ (а+229), #г1: 
30), +гё 
2080 РОКЕ (а+г44), 4е\ 
2090 ВЕТОЕН 


БЕТ 


РОКЕ (а+2 


БЕТ 


РОКЕ (а+2 


По своей СТРУКТУРЕ ПРОГРам„ма 
похожа на “РТВ”. После старта с 
начальной строки, программа Фор- 
мирует кодовый блок для чтения 
девяти секторов нулевой дорожки, 
затем останавливается (строка 
100) для того, чтобы ножно было 
вставить в дисковод засекреченный 
диск., После нажатия клавиши про- 
исходит чтение нулевой дорожки, 
Зада- 
ются начальный адрес каталога 
(а), ‘число Файлов (п) и число 
удаленных Файлов (4е1) принимают 
для начала нулевые значения а 
число свободных секторов на диске 
(+гее) - максимальное значение 
для двусторонней дискеты 80 доро- 
хек - 2544 сектора. 

Подпрограмна со строки. 1000 
приводит в порядок каталог диска. 
Строка 1010 проверяет, не достиг- 
нуто ли свободное место на диске 


и если да, то выход из подпрог- 
Раммы. Если нет, то число Файлов 
увеличивается. на единицу (строка 
1020), затем; проверяется, не уда- 
ленный ли это файл: (строка 1030). 
Если да, то счетчик удаленных 
Файлов увеличивается ва`единицу. 

Строка 1040 исправляет значе- 
ния тех кодов в названии Файла, 
которые могли быть искусственно 
изменены для невозможности произ- 
вести распечатку каталога коман- 
дами ТЕ-005: САТ или 115Т. Управ- 
ляющшие коды либо токены ключевых 
слов, подставленные в имя Файла 
заменяются символон АЗСТТ с кодом 
63 - это знак. вопроса. 

Далее рассчитывается ^ длина 
файла в секторах. (1еп3). Для это- 
го определяется начало текушего 
Файла (Ъе81), затем начало следу- 
юшего Файла (ЪБезг). Эти значения 
рассчитываются непосредственно’ в 
секторах от начала диска. Их раз- 
ность (строка 1070) опрЬделяет 
длину текущего Файла. Однако в 
тон случае, если текущий Файл яв- 
ляется последним на диске (строка 


1080), то значение Бевг даст ну- 
левое значение, поэтому длину 
Файла в секторак в этом случае 
можно рассчитать непосредственно 


по его длине в байтах. После за- 
несения рассчитанного значения в 
память (строка 1090), рассчитыва- 
ется оставшееся свободное место 
на диске (строка 1100), затен - 
переход к следующему заголовку 
путем возврата на СТРОКУ 1000. 

После того, как  выполыена 
подпрограмна восстановления ката- 
лога (в строке 220), значение ад- 
реса устанавливается на начало 
системного сектора (строка 230). 
Подпрограмма со строки 2000 восс- 
танавливает систенную информацию 
диска. Начало свободного места на 
диске в секторах (зрасе) опреде- 
ляется как начало последнего Фай- 
ла плюс его длина (строка 2910). 
Далее это, значение преобразуется 
{строка 2020) в номер дорожки 
{5РЁ) и сектора (3р3) и заносится 
в память (строка 2030). 

Строка 2040 устанавливает тип 
диска: двусторонний, 80 дорожек. 
Далее в память заносится общее’ 
число файлов (строка 2050), расс- 
читываются старший и младший бай- 
ты числа свободных секторов 
(строка 2060) и полученные значе- 
ния заносятся в память (строка. 
гото). заносится в память и число 
удаленных Файлов (строка 2080). 
Далее - возврат из подпрогранны 
на строку 300. Здесь выводится 
предупредительная табличка и. в 
случае подтверждения (клавиша 
"У"), происходит перезапись нуле- 
вой дорожки диска (строка 310). 
Здесь значение регистра С в ячей- 
ке 40007 вместо чтения (С-5) за- 
меняется на запись (С-6). После 
этого программа останавливается. 
Ножете запускать дискету обычным 
порядком и копировать Файлы с нее 
на другие дискеты. 

‚ к к 


А 


процедурой. 
Тема русификации - это,  пожа- 
луй, вечная тема для "Спектрума". 
Пока что не сушествует способ (и 
будет. ли когда-нибудь сушество- 
вать), который бы был достаточно 
универсален и хорош для всех. 
Многие програмисты ломают голову 
над решением этой проблемы. В 
ЭТОТ раз интересное письно пришло 
к нам от Александра Еременко из 
Свердловска. Он прислал программу 
в нашинных. кодах, позволяющую пе- 
реключать символьный набор однов- 
ременным нахатием ›лвУх клавиш 
{5УНМВОГ, 5ТТЕТ}+ГЕМТЕВ). При пер- 
вом нажатии включается загружен- 
ный в ОЗУ символьный набор, а при 
повторном нажатии - опять син- 
вольный набор из ПЗУ. Самое глав- 
ное, что такое переключение можно 
сделать в любой момент. Как пишет 
неважно, где Вы рабо- 
в режиме редактирования 
Бейсик-строк или в программе, все 
равно можно производить переклю- 
чение шрифта. 

Нам понравилась идея увахаемо- 
го корреспондента (и мы даем ее 
всем читателям, снабдив собствен- 
ными комментариями и постаравшись 
немного ее развить. 


Вот эта программа: 


С07С ЗЕСВ 10 А, #СВ 
СОТЕ 212060 10 Нн., #0020 
081 360 ых. (Ну, #сь 
с083 гв ЕС Н. 
сова ВС и: 
с085  а0РА 3 №2, всра1 
С087Т  ЗЕСС 10. А, #СС 
ЕП4Т Ро ЕОА 
РЗ рт 
Е5Е ие 
ЕВ ЕТ . 
с9 ВЕТ 
65 РОЗН ВС 
05 РО5Н РЕ 
Е5 РОЗН НЫ 
Е5 РОЗН АР 
ЗЕТЕ 12° А, #ТЕ 
ОВЕЕ 1 А, ЕЕ) 
РЕЕР СР’ РБ 
202А 36 2, #056 
ЗЕВЕ ГО. А, #ВЕ 
РВЕЕ ТН. А, (ЕЕ) 
РЕРЕ СР ЗЕ 
2022 о 12, #6066 
ЗА1ОСр 10 А, (#5010) 
ВА 14 А 
з210с0 10 (#6010), ^ 
СвАт ВТ 0.А , 
2805 3 7. #С5ва 
01003с° 10 вс, #300. 


срве 1803 #СоВТ 
серва о1робс (10 ВС, #ССво 
СОВТ 21365С ло М. #5636 
` СОВА 71 ры 
совв 23 ей 
совс то Е 
СВ: 219701 1 Н.. #0197 
С0Со 116400 1р ПЕ, #0064 
с0с3 С08503  САШ, #0385 
С0Сб РЁ РОР АР 
сост Е! РОР_ НЬ 
с0с8 п! РОР БЕ 
с0с9 ‘с! \ РОР ВС 
СРСА 33800, 3Р’ #0038 
соср 639060’ Ро #090 
ООВ СИНволЬнНыЙй 
ев аки набор 
Как видим, принцип действия 


этой программы основан на исполь 
зовании прерываний второго рода 
12. Подробнее о прерываниях Вы 
ножете прочитать в нашей книге, 

посвященной програмированию в на- 
шинных кодах. Тан мы рассказыва- 
ли, что на использовании прерыва- 
ния первого рода основан основной 
режим работы "Спектрума". В этом 
режиме (если он разрешен командой 
ЕТ) всегда в ответ. на прерывание, 


поступающее по шине ТмТ (а это 
происходит 50 раз в секунду), вы- 
полняется обрашение по адресу 


0038Н. Процедура, расположенная с 
этого адреса, ‘обеспечивает скани- 
рование клавиатуры в поисках на- 
жатой клавиши. 
Теперь о 
рода. ‘В компьютерах ‘иных систем, 
собранных на’ базе процессора 
7780, для програмиста существует 
возможность самому задать адрес, 
по которому будет происходить об- 
работка этого прерывания. Он оп- 
ределяется следующим ’ образом. 
Старший байт поступает из регист- 
ра Г процессора (он таки называ- 
ётся "вектор прерываний”), а 
нладший байт должно выдавать пе- 
рифёрийное устройство, от которо- 
го получено прерывание. В ‘паре 
ячеек, адрес которых определен 
таким образом, хранится адрес 
процедуры. обслуживающей прерыва- 
ние. Программ, обслуживающих та- 
кое прерывание может быть 128, 
так как старший байт определен 
регистрон 1, а младший байт - это 
256 ячеек, в которых можно за- 
писать 128 двухбайтных адресов. В 
“Спектруме“ рехим прерываний вто- 
РОГО Рода не используется для 
взаимодействия с периферийными 
устройствани, поэтому появляется 
возможность использовать этот ре- 
хин в своих целях. 


Теперь конкретно о предложен- 
ной программе. Вначале выполия- 
ется инициализирурщая процедура. 
Она запускается с адреса загруз- 
ки, то есть СОТСН (52604). При 
этом происходит ‘следующее. 06- 
ласть, начиная 


‚ программы, 


прерывании Второго’ 


с ССООН и кончая 


адресом СОРОН заполняется кодом! 
Ср. Затен в регистре Г процессора! 
Задается старший байт  адреса| 
ячейки памяти, в которой хранится! 
адрес обслуживающей процедуры: || 
СС. Далее происходит включение! 


выполняется 
Программу. 
Что же происходит при получе- 
нии сигнала на прерывание, (кото-| 
рый, как мы помним, ПРИКОДИГ 50| 
раз в секунду). Несмотря на то, | 
что неопределен нладший байт 
ячейки с адресом обслуживающей! 
обратившись по любому! 


адресу со старшим байтон СС‘ (то! 


есть начиная СС00Н и кончая 
ССЕЕН). получим один и тот же ад-| 
Рес ‘обслуживающей ПРОоГРаннмы: | 
сосрн, так как вся эта область 


заполнена кодом Ср. 

По адресу СЬСОН (см. листинг! 
програнны) видим безусловный пе-| 
Реход на адрес СОН. ’ЭТо и весть 
вачало программы, обслуживающей 
полученное прерывание. Перед на- 
чалом выполнения 
действий, на стеке запоминается | 
содержиное всех регистров пРо- 
цессора, которые ногут быть изне- 
нены при работе обслуживаютей! 
процедуры. Затём выполняется ска-| 
нирование ДВУХ полурядов клавиа- 
ТУРЫ (© том, как производится о 
рос клавиш, Вы также ножете про 
читать в натеи книге, посвятенной| 
програмнированию в машинных ко- 
дах). Вначале проверяется нажа-| 
тие клавиши 5УМВОГ, ЗНТЕТ и, если! 
она не нажата, то сразу переход 
на заверение процедуры обработки 
прерывания. Если 5УМВОГ. ЗНТЕТ на- | 
хата, то проверяется Факт нахатия| 
ЕВТЕВ. Если нет, то также переход! 
на завершение процедуры, а если и| 
Эта клавиша нажата, то происходит! 
дальнейшая работа. 

Проверяется содержиное ячейки, 
определяющей включение одного или| 
другого СИМВОоЛЬНого набора, | 
ячейка с11оН. От значения младше-| 
го бита этой ячейки (четное число 
или нечетное). зависит выбор одно-| 
го из двух символьных наборов, | 
При этом происходит увеличение на| 
единицу содержимого этой ячейки! 
{то есть подготовка к включению в| 
следующий раз  противоположного| 
символьного набора). Соответству-| 
`ющее значение системной  перемен- 
ной СНАЮ5 пересылается ПРИ помоши 
регистра ВС в область системных! 
перененных, в ячейку 5С36Н. Далее| 
ПРОИСХОДИТ вызов подпрограммы! 
ВЕЕРЕВ из’ ПЗУ (параметры: ‘тон и| 
длительность звукового ‘сигнала! 
задаются в регистрак НН. и БЕ), 
Звуковой сигнал свидетельствует о| 
произошедщен переключении сим-| 
вольного набора. | 

далее выполняется 
процедура: восстановление со сте-| 
ка прежних значений регистров! 


-1-1 


на адрес 0038Н, как 
БЫТЬ 
ний первого рода. С этого неста 


это долЛянНо 
в случае обработки прерыва- 


Работа компьютера 
Традиционной, 


совпадает с 


При реализации этого метода 
следует помнить, Что синвольный 
набор. располагается сразу же за 
саной программой, с адреса сррон 
(52688), ПРИ этом системная пере- 
мевная СНАК$ равна ссрон’ Но Вы 
можете расположить символьныи на- 
ИБор там, где это Вам удобно, из 
|менив значение СНАЗЗ в ячейках 
'СОВН и СОВбН. Кроме того, оба 
переключаемых символьных набора 
могут находиться в 03У, и Вы мо- 
жете поочередно переходить на лю- 
|5ой из них. Для этого значение 
йсистемной ° переменной СНАКЗ для 
второго символьного набора должно 
быть задано в ячейках СОВОН и 
|СОВ!Н. Следует также помнить, что 
йдля работы ьрогранны необходима 
побласть кодов с адреса ССоон 
1(52224). То есть перед стартом 
инициализирующей 


процелурРЫ 
{РАМРОНТ2Е 05Е 52604) надо заре- 
зервировать это место, 


| изменив 
ИВАМТОР командой СЬЕАЕ 52223, 
Следует также учитывать тот 
Ифакт, Что раз (уж мы работаем с 
прерываниями второго рода, ПРИЗ- 
ванными обслуживать периферийные 
устройства, то работа с поспедни- 
ми, например с дисководон., после 


|1 невозможна. Дия работы с периФе- 
урией необходимо восстановить тра- 
идиционный порядок работы. 05 этом 
еше будет разговор ниже. 


Вообще нам очень понравилась 
заложенная в этой програнне 
йи тот изяшный способ, при номоти 
Которого Эта идея реализуется, 
для того, чтобы поглубже "про- 
чувствовать” действие этой прог- 
наберите простую  де- 
Пнонстрационную програмку на 
'Бейсике: 


1 60 то 100. 

2 СЬЕАК 52гг3: ТОАБ “гиз"СОБЕ 
(52604: 1ЮАР "сЬг"СОВЕ 52688 

3 ВАКПОНТ7Е 05 52604 

4 ВОН я 
100 РЕТЫТ ”Ргезз ‹5. $. >+<ЕНТЕК> 
ог соп4го1"**: РАЦЗЕ 0 
200 РОВ а-3г ТО 127: РЕТЯТ СНЕ$ 
‚ а;: РАЧЗЕ 1: НЕХТ а: С0 ТО 2006 

После набора запустите ее с 
'первой строки командой КУН и вни- 
ймательно понаблюдайте за реакцией 
компьютера. Хотя ничего неожидан- 
ного сейчас произойти не должно 
(конпьютер не  подпрыгнет, он 
по-прежнему останется на своем 
месте), но все-таки остановимся 
|на происходяшем подробнее. Сразу 
{после старта на экране появится 
надпись: “нажмите <$. 5. >+<ЕКТЕВ> 


_5НТЕТ 


для управления” и программа оста- 
новится иа РАЦОЗЕ 0. ожидая нажа- 
тия клавиши. Попробуйте нажать 
указанную комбинацию клавиш. Пау- 
за прервется (ЗУНВО, 5НТЕТ здесь 
ни при чем, сработало нажатие 
ЕКТЕР) и начнется распечатка син- 
вольного набора из ПЗУ. Когда за- 
полнится весь экран, появится 
ПРИВЫЧНЫЙ Запрос; ^"3сго11?”. Поп- 
робуйте опять нажать 5УМВОЕ $ЗНТЕТ 
+ ЕМТЕВ. Вывод символов на экран 
будет продолхен. 


Теперь остановите програмну 
нажатием ВВЕАК и запустите ее со 
второй строки (с которой должен 
происходить автостарт) КОН 2. При 
этом загрузите (заготовленные за- 
ранее) исследуемый блок кодов 
"гиз" и любой инеющийся у Вас 
символьный набор ”свг“ {лучше 
“утолшеяный" или стилизованный, 
так будет нагляднее). о После заг- 
рузки произойдет инициализация 
Программы в кодах, после чего 
Беисик-програнма запустится с на- 
Чала, как это делали Вы командой 
КОН. Сравните реакцию конпьютера. 
После появления надписи в верхней 
строке, нажмите ЗУМВО. 5НТЕТ + 
ЕНТЕВ. Вы услышите короткий зву- 
ковой сигнал, свидетельствующий о 
нажатии на клавиши, но больше ни- 
чего на экране не изменилось: па- 
уза не прервалась, как раньше. То 
есть, указанная комбинация клавит 
теперь не влияет никаким об- 
разом на работу Бейсик-програмны. 
Теперь она воспринимается именно 
как 5УНМВО. 5ЗНТЕТ + ЕМТЕВ, а не 
как просто ЕНТЕК. Прервите паузу 
нажатием на любую клавиму, и Вы 


увидите, что на экран выводится 
новый  символьный набор, то есть 
Произошло переключение, Пока эк- 


ран заполняется, можете попробо- 
вать несколько раз нажать ЗУМВОЕ 
+. ЕНТЕЕ и убедиться в том, 
что происходит переключение сим- 
вольных наборов. Когда экран бу- 
дет заполнен и появится запрос 
*3сго11?", опять нажмите комбина- 
цию клавиш. Кроме звукового сиг- 
нала, свидетельствующего о перек- 
лючении символьных наборов, ниче- 
го не происходит. Дия продолжения 


работы надо нажать, напринер. 
ПРОСТО ЕНТЕВ. Можно, таким обра- 
зом, сделать вывод: приведенный 


блок кодов не оказывает никакого 
вмешательства в работу интерпре- 
татора Бейсика, он только иснрав- 
но выполняет то, что ему пред- 
писано - переключает символьные 
наборы. 


Продолжаем наше исследование. 
вызовите на редактирование 100 
СТРОКУ БеЙСИК-ПРОгРамны. ПОПРОбУ- 
ем в кавычках напечатать текст, 
состояший из символов разных сим- 
вольных наборов. Для этого, нахо- 
дясь в середине текста, нажните 


БУМВОЕ ЗНТЕТ + ЕНТЕК. ЗВУКОВОЙ! 
сигнал - переключение произояло. 
но на экране ничего не меняется! 
до того нонента, пока Вы ‘не наж-й 
нете какую-нибудь клавишу. `А про-| 
искодит сябдующее. Весь текст ре-! 
пактируеной строки верерисовыва “| 
ется заново, причен сииволами но-| 
вого  символьного набора, Отсюда 
ВТОРОЙ ВЫВОД: НЕЛЬЗЯ ПРИ поноШИ 
этого блока кодов решить задачу 
совмещения символов разных сим-| 


вольных  ипаборов внутри одногой 
оператора РЕ1НТ. действительно, 
чудес ведь не бывает. Кодовый 


блок только переключает  символь-1 
ный набор, а текст, подлежащий 
выводу на экран, никак не изменя- 
ется, то есть каким было кодовое 
выражение строки текста, ‹ таким! 
ФНО и осталось, таким и выводится! 
на экран, только в новом символь-1 
ном наборе. То же относится и к| 
оператору 1МРОТ. Нельзя при. вводе 
текстовых выражений совместить) 
русские и английские буквы. | 

И еше один вывод. Переключение 
символьного набора таким способом 
ПРОИСкОДИТ ТОЛЬКО “ВРУЧНУЮ“, ТО 
есть, если по алгоритму выполке- 
ния программы должно ‘произойти 
переключение символьного набора, 
то оно должно быть выполнено, как 
обычно, изменением СНАР5 при по-! 
моши РОКЕ. Так что же, новый 
изянный нетод переключения шриф-| 
тов не’ вносит ничего нового по 
сушеству проблемы? Видимо, такое 
заключение преждевременно. — Су-| 
шествуют ситуации, где изложенный! 


| 


способ сможет оказать действи-й 
тельно неоценимую пользу. Напри- 
мер, программа “МОЗАИКА", которая] 


опубликована в этом выпуске 2х- 
РЕВЮ на с.1. Там переключение из! 
текстового в графический режим! 
происходит включением | 
САРЗ 10СК, из-за чего сушествует 
ограниченное число псевдографи-| 
ческих символов, только по числу] 
малых букв латинского символьного 
набора - 26. Если переключать 
символьные наборы новый способом, 
то во сколько раз можно расширить 
графические возможности, а следо- 
вательно и привлекательность этой 
программы! Ведь все до одного 96 
символов нового синвольного набо- 
ра можно отдать графическим обра- 
зам, да и захватить еще часть 
первого синвольного набора, как! 
это сделано в "МОЗАИКЕ”. 

Другой принер. Вы набираете! 
программу, в которой заведомо бу- 
дет только русский текст (ка- 
кой-нибудь тест иди обучающая 
программа}. И естественно, хотите! 
для придания программе большей! 
привлекательности, использовать! 
русские заглавные и строчные бук- 
вы, используя загружаемый только 
русский синвольный набор. — При| 
этом, если Вы набиваете текст| 
ПРОГРанммы, используя стандартный 
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символьный набор ПЗУ, то дегко 
можете допустить ошибки при набо- 
ре русского текста в операторах 
РЕТЫТ, так как набор’ ведется 
практически “вслепую”. Если же Вы 
переключитесь на русский символь- 
ный набор, то сана Бейсик-прог- 
Рамма. токены, имена неременных - 
всё это станет “нечитаемын”, При- 
менение изложенного в этой статье 
приема позволит Вам при наборе и 
отладке программы без труда пе- 
реключаться с одного на другой 
символьные наборы в зависимости 
от | того, что Бы в данный момент 
предпочитаете видеть. 


Мы уверены, что если начать 
развивать эту стену, то появятся 
новые оригинальные программы с 
использованием этого метода. оп- 
деленные проблемы для начинаю- 
ших мохет вызвать тот Факт, что 
блок кодов нельзя переместить в 
другое место паняти, но при жела- 
нии можно это сделать. Мы попро- 
бовали поэкспериментировать иу 
нас получился несколько изменен- 
вый и немного усовершенствованный 
вариант этой програнмы. Вот то. 
что у нас получилось. \ 
А, ЕВ 


ЕВЕ4  ЗЕРВ го 

ЕВРб ЕО4Т ьр Г.А 

ЕВЕВ ЕОЪЗЕ вое 

ЕВКА С9 ЖЕТ 

ЕВРВ 00 МОР 

РЕВЕРС Е05б тн 1 

ЕВРЕ С9 ВЕТ 

ЕВЕР `01РС ОЕРВ #РС01 
РСо1 С5 РОЗН ВС 

Есб2 05 РОЗН БЕ 

РС03  Е5 РОЗН НЬ 

2С04 Е5 РИБН АР 

72С05 ЗЕТЕ 2 А #ТЕ 
ЕСОТ ОВРЕ тн А, (НЕЕ) 
ЕС09  ЕЕЕР СР #7 

ЕСОВ 2020 3 НЕ, ЧЕСЗА 
ЕСОр  ЗЕВЕ ЬО . А, ВЕ 
РСОР ОВЕЕ 1 А, (РЕ) 
РС11 КЕРЕ СР РЕ 

ЕС13 2025 к 12, #ЕСЗА 
ЕС15 г132РС пФ и, чЕСЗа 
ЕС18 СВТЕ вт т, ны 
ЕСЛА е80Т 32 2. аРСгз 
РСС ,11003С 10 10Е, #3С00 
РСАР СВВЕ ВЕЗ 17, (НШ) 
ЕС} 1805 че  #ЕСгв 
ЕСез 11582В 10 ТЕ, #ЕВ58 
ЕС26  СВЕЕ $ЕТ 7, 
гсев 21365 1 и.,4#5С36 
гсев 173 р (НЫЕ 
ЕСсгСс 23 тс нь 

ЕС20. Те шо (НЕ), о 
ЕСгЕ 210002 10 #.,#0г00 
2РС31 117200 10 ВЕ. #001Е 
ЕСЗ4 С108503  САШ, #0385 
ЕСТ. 00 НОР 

РС38 00 НОР 

РС39 00 НОР 

ЕСЗА Е! РОР АР 

РСЗВ Е! РОР_о м, 

ЕСзС 1! РОР БЕ 

РСЗ С РОР‚ ВС 

ЕСЗЕ #0038 


С33800 


`и блок 90б-граФики 


Прежде чем’ начать пояснения, 
рассмотрим подробно карту памяти, 
тех областей, которые имеют зна- 
чение для работы програнны. 

ЕАМТОР 64499 


Программа в натинных 64500 

кодах (новый вариант) РВЕЯН 
7171 байт 

Свободное место: для ра- 64577 

боты программы не исполь-  ЕСА1Н 
зУется 23 байта 

Символьный набор 64500 

(любой, по ВКУСУ) ЕС5ЗН 
768 байт 

\Об-графика. стандартно 55368 

расположенная здесь ЕРУВН 
168 байт 

Р_КАНТ 


Эта область памяти должна быть 
зарезервирована ПРИ старте 
Бейсик-программы, путем переуста- 
новки РАМТОР  конандой — СТГЕАЕ 
54199. Файл, содержатий блок ко- 
дов, начинается с адреса 64500 и 
включает в себя, в зависимости от 
конкретных задач, либо только 
программу в кодах (до адреса 
64577), либо программу и символь- 
ный набор (заодно с 
используемыми байтани), либо еше 
(то есть. по 
адрес 65535 вкаючительно), 06- 
ласть паняти с адреса 64577 (23 
байта); в работе программы не 
Участвует. (Вы можете использовать 


` ее по своему усмотрению. 


Инициализация выпойняется ко- 
мандой КАНПОН1ТЕ И5Р 64500, С 
этого адреса (ЕВЕН) начинается 
инициализирующая процедура. Кста- 
ти сказать, нет необходимости за- 
полнять почти 300 байт кодом для 
задания адреса обслуживающей про- 
цедуры. Дело в том; что при су- 
шествующей архитектуре ”Спектру- 
ма” нладший байт всегда будет ра- 
вен ЕР. То есть, если в регистре 
Т процессора задать. например ЕВ, 
то при прерывании ВТОРОГО Рода 
перекод произойдет всегда на 
программу, адрес которой хранится 
В РВЕЕН. В этой паре ячеек (ЕВЕР 
- младший байт, в ЕСО0 - старший 
байт) находится адрес процедуры, 
обслуживающей прерывание второго 


Рода. Читаем этот адрес (см. 
листинг ПРОГРАммы): РСО1. 
Начало процедуры, расположен- 


ной по этому адресу точно такое 
зе. как и в исходном варианте. 
Так ле опрашивается нажатие инте- 
ресуювих кланишей а дальше начи- 
нается отличие. Системной ячея- 
кой, определяющей, какой символь- 
ный набор должен включиться, выб- 
рана ячейка РСЗгН. ‘Точнее, опре- 
деляютим является Т-бит числа, 
находящегося там, (получается ли- 


23-мя не-. ‘процедура. Здесь включается режим 


‚оригинальными, 


60 ТР. либо ЕР), В этой ячейке 
содержится параметр, = задающий 
время звукового сигнала для под- 
программы ВЕЕРЕЮ, вызываемой из 
ПЗУ. Таким’ образом, переключение 
на символьный набор из ОЗУ. сопро- 
вождается длинным звуком, а об- 
ратное переключение на символьный 
набор из ПЗУ - короткин. 

После вызова подпрограммы 
ВЕЕРЕЕ, зарезервировано 3 свобод- 
ных ячейки памяти. здесь, при не- 
обжодимости, можно организовать 
вызов каких-то — дополнительных 
сервисных процедур, если это пот- 
ребуется в будущем (вызов ка- 
кой-нибудь подпрограммы: САМ, 
м или перекод: ГР.... - все 
это занимает 3 байта). Далее - 
Финишные операции и переход на 
адрес о9озан. 

Кроме указанных отличий, новый 
вариант программы предусматривает 
возможность отключения  рехима 
прерываний второго рода. Это не- 
обкодино делать прежде, чем, нап- 
ример,  обрашаться к дисководу. 
Иначе произойдет сбой,` зависание 
или сброс компьютера. “Де-инициа- 
лизация" ‘или восстановление тра- 
диционного режима работы выполня- 


ется конандой  КАНПОМ17Е 1058 
54508. С этого адреса (ЕВРСН) 
расположена ‚ восстанавливающая 


прерываний первого рода, восста- 
навливая исходный рехин работы 
-Спектруна”. 


В заключение хочется поблаго- 
дарить Александра Еременко за 
присланную программу. Надеенся, 
что она подтолкнет и других чита- 
телей к решению насущных проблем 
нетрадиционными 
методами. 


Расчет резонансных 
характеристик. 

Кроме оригинальной программы 
для переключения символьных набо- 
РОВ, в своем письме Александр 
Еременко из Свердловска делится с 
читателями также програнмой на 
Бейсике, которую можно использо- 
вать для рассчета резонансных ка- 
рактеристик пассивных Фильтров в 
циапазоне звуковых частот. Расчет 
ПРОИЗВОДИТСЯ ДлЯ ДВУХ ТИПОВ Филь- 
тров по схемам, приведенным на 
рисунках 1 иг. Мы приводим эту 
программу с некоторыми непринци- 
пиальными изменениями. Кроме то- 
го, Мы РусифицирОВали ее по ‘ме- 


тодике, = приведенной в "7Х-РЕ- 
В0”-92,. Н1,2, СТР. 31. 
1 [-23 
р 
й с1 са 
С ры 
сз РЗ 
с2 С: 
Рис. Ъ вис, 


зо 


| Вот програмна для расчета ре- 
пзонансной частоты фильтра по рис. 
1 {(автостарт программы со строки 


9900, где загрузается русский 
Исимвольный набор); 
й 1 ВОВРЕЕ 0: 11К 7; РАРЕВ 0: © 


11.5 
й 2 РОК Е-0 ТО 1710 5ТЕР_ 16: РО 
|Т О, Е: ОВАМ 255,0: НЕХТ Е 

Я 3 РОК Р-0 ТО 21 5ТЕР. 2: РЕНТ 
| АТ 2+1, 0; (20-2) *8: НЕХТ Е 

| $ РОК Р-58 ТО 220 ЗТЕР За: Р, 
|ОТ Е, 0; ОВАМ 0, 170: 


ЗЕХТ Е 
5 РЕШИТ! АТ 0,0; " 40 

1160 640 2560. 10280" 
| 10 1МРОТ "С1 (ФАРАД); ";С1: 1Н 
|РОТ “С (ФАРАД): "; Са: ТНРУТ "К! 

(ОМ): "; 81: ТЫРОТ "Вг (0Н): "; 8 
|: 

11 ЕТ Е=1: БЕТ Х=16 

12 1ЕТ Е-Р#1. 0442738: ШЕТ Х=Х+ 


20 ВЕТ С1К=1/ (РС1н2ярг) 

30 ТЕТ С2В=1/ (Р«СажёиРТ) 

40 ГЕТ Е!С1=81+С18 

56 ЕТ вгса-Севккг/ (сгв+кг) 
60 ТЕТ. У=весан (170/ (к1Са+веса) 


ТО ТЕ Х>255 ТНЕН 60 ТО 10 

80 РЬОТ Хх, У 

90 ‘0 то 12 

19000 СЬБАВ 64599: ГОАр "сЬг"СОПЕ 
54600 

19010 РОКЕ 25606, 88: РОКЕ 23607, 2 
151: ВИН н 

| после старта программы ва эк- 
Иран будет выведена сетка с оциФ- 
|ровкой. По-горизонтали - частота, 
по вертикали - затухание Фильтра, 
введите по-очереди номиналы тех 
| элементов, которые будете исполь- 
|зовать в Фильтре. Посяе ввода 
|всех номиналов програнма выдаст 
|Вам амплитудно-частотную характе- 
Гристику Фильтра, Ножете оценить 
|ее и попробовать изменить вводи- 
|мые номиналы для получения требу- 
|емой резонансной частоты, доброт- 
вости и затухания фильтра. При 
'любых изменениях номиналов ре- 
|Зультаты рассчета тут же будут 
| выведены на экран в виде изненив- 
|шейся характеристики фильтра. Вы 
пинеете возможность сравнивать ха- 
|рактеристики между собой, так как 
|все они на’одном экране перед Ва- 
|ни, Благодаря этой программе под- 
|бор злементов для Фильтра с тре- 
буемой амплитудно-частотной ха- 
(рактеристикой можно выполнить 
‚легко и быстро. Результат работы 
|программы представлен на рис. 3. 

| 0 160 6240 256е 18240 


для Фильтра, представленного 
ва рисунке 2, надо изменить стро- 
КУ 10 программы для ввода больше- 
го числа входных параметров: 

10`ТНРИТ "С1 (ФАРАД): ";С1; Ш 
РТ "С2 (ФАРАД): ";Сё: 1ЫРОТ "СЗ 
(ФАРАД): ";С3: ТМРИТ "1 (ОН): 
"; ЕЕ: ТЫРОТ "Ва (ОМ): *;В2: ТРО 
Т "КЗ {0М): "; 3: ТНРОТ "Ю НАГРУ 
ки (ом): "; М | 


Кроме того строки, начиная с 


` а0 должны быть: 


20 ГЕТ А-Вё+ВН 

30 (ЕТ В=1/(Ехекр1 СЗ) 

40 ТЕТ С-=В*А/ (В+А) 

50 БЕТ У1=С* (170 (1 +С)) 
$60 ВЕТ Уа=ВН» (\1/ (ва+ВН) ) 
ТО БЕТ 0=1/ (Ежежрткса) 

80 ГЕТ Е-Б+ЕН 

90 ТЕТ С-ВЗкЕ/ (ЕЗ+Е) 

100 БЕТ Н=1/ (ЕжажртиС! ) 

110 СЕТ УЗ-б*(4т0/(Н+С) 
120- ГЕТ. У ВНк (УЗИ (Т+ЕН) ) 
130 тг У2>У4 ТНЕН БЕТ У-Уе: 60 
то 150 

1840 БЕТ У-Уз 

150 ТЕ Х>255 ТНЕН 60 ТО! 10 
160 РОТ. Х,У 

170 со ТО 12 


Результат работы 
представлен на рис. 4. 


49 160 649 25600 168 
ть бо пораа 


№ 


Програнмы 


Са (фаряа) : В. Рис. 4 
Если Вас заинтересовали эти 
программы, то при практической 


реализации их, мы со своей сторо- 
ны можем порекомендовать малень- 
кое усовершенствование, которое, 
наверняка. смохет сделать каждый. 


Поскольку номиналы конденсаторов * 


удобнее задавать в никроФарадах, 
а нониналы резисторов - в килоо- 
нах, то разунно будет этот пе- 
ресчет поручить комльютеру. Орга- 
низуйте для этого дополнительные 
Строки. Кроме того, попробуйте 
объединить два варианта расчета в 
одну програнму. Для этого можно 


посоветовать при загрузке готовой 


программы выводить экран-застав- 
ку, на котором будут изображены 
рисунки | и 2, а далее должен 
следовать запрос, для какой схемы 
будет производиться расчет. 


Нестандартная загрузка. 
Комиссаров Павел из пос. Видо- 
во Мурманской обл. пишет о том, 
что он занимается взломом прог- 


раны, в которых используется 
нестандартная загрузка ‘или есть 
что-то необычное! У него уже наб- 
ралась небольшая коллекция такик 
загрузчиков. Павел прислал распе- 
чатку одного из них. Он загружает 
блоки кодов с изменением цвета 
бордюрных полос. Павел пишет, что 
он взял этот загрузчик из прог- 
Рамны "ВАВВАБТАН-3” (ВУ ВИ 
СТИЕВЕВТ). ОЕ начинается с адреса 
65000 и используется точно так 
хе, как и процедура “ГОАР ВУТЕЗ" 
из ИЗУ, расположенная по адресу 
1366 (0556Н). Вот этот загрузчик: 


Е0Е8 14 с р 

РОЕУ 08 . Ех АЕ, АЕ” 
ЕОЕА 15 ЕС р ' 
ЕОЕВ РЗ р 

ЕОЕС  3Е0О 12 А, #00 
ЕРЕЕ ОЗЕЕ от РЕ). А 
ЕБРО 213205 10 Н,,#053Е 
ЕОРЗ БЭ. РОЗН НЬ 

РРЕЯ ОВРЕ 14 А, СЕВ) 
Роб 1Е ЕВА 

ЕОЕТ Е620 АО #20.’ 
ЕБР9 С06ЕЗС САМ, #ЗС6Е' 
РОРС ВЕ О 

ЕОРр 00 КОР 

ЕОРЕ С079РЕ СМА, ЧЕЕТ9 
РЕО! ЗОКА Л КС. ВРОРО 
РЕЗ 216900 Пр Н.,#0069 
ЕЕОБ (10ЕЕ РУН7 #РЕОб 
РЕО8 ав ВЕС нь 

2809 1С Ш АН 
ЕЕОА В5 оо 

РЕОВ 2079 52 Н2. ВЕЕОб. 
ЕЕОр СОТ5РЕ САМ, #РЕТЬ 
РЕ!0 ЗОВ , Ж НС, ЖРОЕО 1 
РЕ!2 069С т в,39С 
РЕ!8 СОТЭРЕ  САШ, #ЕЕТ5 
РЕ1Т 304, 3 КС, ВЕБРО 
ЕЕ!9  ЗЕСб 10 А, #06 
2:9: СРВ 

ЕЕ!С  30Е0 Ле КС, ЗРОРЕ 
ЕР1Е 24 сн 

РЕЕ 2021 ле на, врыа 
РЕ?! 0669 12  В,8С9 
РЕ?З СОТУРЕ  САЫ, #РЕТЯ 
РЕ?б 3005 Л КС, ВЕР 
ЕЕё8 78 и: 
ЕЕС9 РЕОА СР #04 
РЕВ 3024 кс, чкЕг1 
РЕРО С079РЕ САМ, ЗЕЕТЭ 
РЕЗО 0 ВЕТ КС 

РЕЗ! 19 10 А,С 
РЕЗ2 ЕЁОЗ Хок #05 
РЕЗ 4Р СА 
ЕЕЗ5 2600 А: 5) 
ЕЕЗТ 0680 о: 

. РЕЗ9 181Е 3 ЗЖЕ5А 
РЕЗВ 08 ЕХ АЕ, АЕ* 
ЕЕЗС `2007 3 НО, ВРЕ45 
РЕЗЕ 300Е о КС акЕаЕ 
РЕЗО 1007500 10 (1+0), ь 
РЕЗ 180Р Л #7754 
РЕ45 СВ! А 
РЕЗТ АБ хо ь 

`РЕ48 СО ВЕТ Н7 
РЕЗ9 19 ЧЫВ АЕ 
ЕЕЗА Е ВЕЛ 
ЕЕАВ 3Р р сй 
РЕаС 13 18С БЕ 
РЕЗ 1807 Жо #156 
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р А, (Х+0) 


нее 
а 
= 
= 
Г 
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РЕЗ? АБ хо ь 

ЕЕ5З СО ВЕР 7 
РЕБН 023 нс 1х 
РЕ5б 1В ЕС ВЕ 

| РЕБТ 08 Ех АЕ, АЕ 
РЕ58 ОбВа а: :3 
РЕЗА 2Е01 тр 1,01 
ЕЕ5С  СОТ5РЕ | СА. ЗЕЕТБ 
РЕБЕ 00 ВЕТ НС 
РЕбО ЗЕСВ ры: 
ЕЕбг в8 м 

РЕбЗ СВ!5 НИЕ 
РЕбо 0680 то в яв 
РЕбТ ро5СРЕ (ЛР КС, НЕЕБС 
РЕБА 1С ЫВ АСВ 
РЕбВ АР хо 

ЕЕбС 67, 12 НА 
РЕбр ТА 12 Ар 
РЕВЕ В3 08 Е 

РЕБЕ  20СА Ле НУ, РЕЗВ 
ЕТ! 17С Ан 
БЕТё ЕЕ! СР #01 
ЕЕТ4 69 ° ВЕТ 

ЕЕТ5 СОТ9РЕ СА ЧЕЕТО 
РЕТВ 00 ВЕТ НС 
ЕЕТ9 3616 10 А. 16 
РЕТВ 39 РЕС А 

РЕТС г0Рр 3 НЕ, ВРЕТВ 
РЕТЕ АТ АО Л 
РЕТР 04 и: 
ЕЕЁО  С8 ВЕТ 2 

РЕЗ! ЗЕТЕ р АТР 
РЕВЗ ОВЕЕ 1 А ЕЕ) 
РЕВ5 1Е ВВА 

РЕЗб 00 ХОР 

'РЕЗТ А9 хо с 

ЕЕ88 Е620 АНР #20 
РЕЗА 2823 Зе 1, #РЕТЕ 
ЕЕЗС 79 А 
РЕЗО 22 СРЬ 

РЕВЕ 1Е 0 СА 
РЕВЕ 82 АПР А.Р 
РЕЗО А9 хо с 

ЕЕ! ЕбОТ АВР 07 
РЕЭЗ 2608 ок #08 
ЕЕЭ5 ОЗРЕ ОТ (НЕЕ), А 
ЕЕ9Т 37 5СЕ 

298 С9, КЕТ 


Перед вызовом загрузчика надо 
в регистре 1х задать адрес заг- 


Рузки, а в регистре РЕ - длину 
загружаемого блока кодов. Проце- 
дура вызова загрузчика, например 


для загрузки экрана-заставки мо- 
жет иметь следующий вид: 


00210040 1 ТХ, #4000 
11004в По 10Е, #1800 
ЗЕРЕ т) А, МЕРЕ 

37 $5СЕ 

СРЕЗЕО СМЛ, ЧЕРЕВ 

с9 ВЕТ 


При этом блок кодов, подлежа- 
щий загрузке, может быть записан 
ва ленте обычным способом. надо 
лишь удалить заголовок. ‘оставив 
только коды. ` 

цвет полос бордюра во вреня 
загрузки будет. периодически ме- 
няться, временами полосы вообте 
будут исчезать, затем появляться 
вновь с новыми цветами. Клавива 
ВКЕАЕ пРИ загрузке не’ действует. 

По окончании загрузки’ значение 


Флага переноса содерхит инфорна- 
цию об отибке при загрузке: Фон 


не было, 0 - была. Здесь надо 
сказать, что и как в случае 
использования Процедуры 1366 
{0556Н) ПЗУ, 06 ошибке свиде- 
тельствует только значение Флага 
переноса, никакие дальнейшие 
действия, связанные с наличием 


ошибки не выполняются. Но если Вы 
хотите, чтобы при ошибке програм- 
на останавливалась с 
сообмения: `® Таре 1оаагая 
еггог", то надо поступить анало- 
гично тону, как это делается в 
ПЗУ. Тан для вызова процедуры 
1366 используется процедура 2050. 
Применяя аналогичный прием, вызов 
приведенного загрузчика нохжет 
выглядеть следующим образом: 

подготовка пара- 

метров (см, выше) 


САШ, ЗРРЕЗ 
28 вЕТ. С \ 
СЕ в5Т 8 
1А ФЕРВ #1А 


на этом можно было бы и закон- 
чить, но вот что случилось спустя 
некоторое вреня, после того, как 
ны успешно ‘оттестировали этот 
загрузчик. Неожиданно выяснилось, 
что загрузчик упорно не хочет ра- 
ботать на другом компьютере. вы 
решийи выяснить, почему это про- 
исходит. К счастью. програнма 
*ВАВВАЕТАН-3" оказалась в нашей 
"Фопотеке”. Ны опробовади ее и 
выяснили. что йа обоик конпьюте- 
рах программа нормально загружа- 
ется, В чем же дело? Стали ‘иссле- 
дорать коды загрузчика, который 
приводит Навел. Как и следовало 
ожидать, загрузчик похох на про- 
цедуру "ГОАО ВУТЕЗ", расположен- 
ную в ПЗУ по адресу 13656. Но 
стоп! Что это такое? По адресу 
РОЕУН видим команду: САШ, ЗС6ЕН. 
Это вызов подпрограммы из ПЗУ, Но 
ведь мы знаен, что в ПЗУ на этом 
несте ничего нет. Или есть? Так 
вот, оказывается, где’. кроется 
разгадка. дело в том, что на тон 
компьютере, где этот загрузчик не 
работал, стоит стандартное ПЗУ, а 
на том, где работал нормально, 
стоит ПЗУ "ТУРБО-90“, В КОТоРОН 
на свободном месте, перед сим- 
вольным наборон расположёны прог- 
раммы, расширяющие Функциональные 
возвожности концьютера, в част- 
ности, загрузка с удвоенной ско- 
РоСТьЮ. Для этого процедура 0556Н 
(13566) этого ПЗУ содерхит в точ- 
ности то, что видин в листинге 
загрузчика, который приводит Па- 
вел, по адресу ЕОЕУН: выполнение 
подпрограммы зс5ЕН. Это связано с 
загрузкой на удвоенной скорости. 
В обычнов ПЗУ подпрогранмз ЗС5ЕН 
отсутствует, поэтому этот загруз- 
чик и не нохет работать с другим 
ПЗУ,  кромё "ЗТУРБС-90*. Кстати, у 
Комиссарова Павла, назерняка, то- 
хе ПЗУ “ТУРБО-90“ (необходимый 


выдачей’ 


инструмент любого “взлоншика"}, 

Вроде бы разобрались, но опять! 
непонятно, почену ле программа! 
“ВАВНАЕТАН-3” ‘работает с любым 
ПЗУ: и с обычным, и с "ТУРБО-90".. 
полезли в програмну. А выяснилась! 
очень интересная вешь, В програн-! 
ме “ВАЮВАКТАН-3”" отсутствует заг-| 
РУЗЧИК КОДОВ в ТОМ виде, в каком! 
его приводит Павел. Загрузчик в 
кодах Формируется в нрограмне из! 
подпрогранмы 1366 ПЗУ. Ны немного 
поискали и нашли ‘у. процедуру, 
которая выполняет эту работу. Она| 
в процессе загрузки "ВАЕВАВТАН- 3” 
располагается с адреса с305Н 
{50133}. Вот что там ваходится! 
(фрагмент кодов приводим с неко- 
торыми измененияни, в виде завер- 


менной подпрограммы, готовой | к] 
употреблению} : | 
6505 215605 12 #№.10556 
С308 11ЕВРО 10 РЕ, ВЕРЕВ 
СЗОВ О1АРОО 10 ВС, 00АЕ 
СЗОЕ ЕОВО тллВ 
С3Е0 211964 ФН. #0419 
СЗЕЗ 118РРЕ 10 ПЕ, ВЕЕЗЕ 
СЗЕб 010400 12 8С.#000А 
СЗЕЭ ЕРВО роте 
СЗЕВ 2г175ЕЕ 10 М. РЕТБ 
СЗЕЕ 220ЕРЕ 12 | (ВРЕОЕ), 
СЗР1 2215РЕ 10 (#ЕЕ15),НЬ 
СЗР4 2250РЕ 12  (#ЕЕБР). нь 
СЗЕТ 2119РЕ 1 Н.\ЕЕТУ 
СЗРА 22РЕРО 10  ЗЕБЕР),Н. 
СЗЕР 2224РЕ 10’ (ШРЕЗА), нь 
С400’ 222ЕРЕ 10 (ЕЕК), НЬ 
с403з 2276ЕЕ 10 (4РЕТб). НЕ 
С306 215СРЕ 10 Н.ВРЕБС 
С409 2268РЕ 10  (#РЕб8), НЕ 
С40С АЕ Хо А 
С30р З2ЕБЕО 10 (ШЕФЕР), Л 
С310 З2РОРО’ №2 (ШЕРЕЬ), А 
С413 З285РЕ 10 (РЕЗб), А 
С416 59 ВЕТ 
са1т 06 НОР 
с418 00 НОР 
с119 82 АБР АР 
СА1А 9 хов С 
С41В ЕбОТ АНО #07 
С410 2608 ов #08 
С41Р ОЗЕЕ ОТ (РЕ), 
саг: 37 $СЕ 
сагг 9 ВЕТ 

Эта подпрограмма Формирует | 


загрузчик кодов, расположенный с 
акреса 65000, (а далее вы можете! 
использовать его так, как расска- 
зывалось выше. 

Если сформировать 
колов, пользуясь приведенной 
подпрограмной сзо5Н, при исполь-| 
зовании ПЗУ “ТУРБО-90”,  полУчиН| 
тот загрузчик, который приводит 
Комиссаров Павел. А если сформи- | 


загрузчик 


нии стандартного изу, 
следующие отличия по-сравнению с} 
вариантом для "ТУРБО-90”: | 


ЕОР9 Рбог ок #02 
БОЕВ %Р тр. СА 
РЕОЗ, 211504 1 


НЫ, #0815 


зе 


Кстати, если внести эти изме- 
нения в вариант Павла; то загруз- 
чик будет работать с обоими ПЗУ. 
Почему же в "ВАВВАРТАН-З”" исполь- 
зуется казалось бы более голово- 
ломный прием, когда загрузчик 
Формируется при помоши другой 
подпрограммы (СЗО5Н) из процедуры 
0556Н ПЗУ? Ответ прост. Если у 
Вас стандартное ПЗУ, то Вы рабо- 
таете как обычно. А если У Вас 
"ТУРБО-90", то сохранится возмох- 
ность загружать всю игру в режиме 
с удвоенной скоростью (как это 
предусмотрено, введя "-" перед 
командой Т.ОАР "")., Несмотря на 


то, что загрузчик кодов в 06- 
шем-то нестандартный. в нем под- 
держивается турбо-режин. Это про- 
исходит как раз из-за вызова 
ПОДПРОГРАаммы ЗСбЕН, который мы 
видим по адресу ЕОР9Н. Те читате- 
ли, У которых есть "ТУРБО-90", 
ногут убедиться в том, что заг- 
РУЗЧИКк, приведенный Павлом, рабо- 
тает и на удвоенной скорости 
(правда при этом пропадает эффект 
переключения цвета бордюрных по- 
лос). Кроне того, процедура, ко- 
торая создает загрузчик, гораздо 
короче саного загрузчика, поэтому 
такой путь еше и экономит память 


и время загрузки исходной прог- 
рамны. 

Эта история показывает, 
насколько осторожным и предуснот- 
рительным надо быть, проектируя 
автономные загрузчики для загруз- 
ки кодов. Иначе за Вашей замеча 
тельной програмной, в которой Вы 
примените такой загрузчик, 
закрепиться репутация "капризной" 
или "неработоснособной". Надеемся! 
все хе, что приведенный пример не 
отпугнет програмистов, а вооружит|| 
сведениями, позволяющими выпол. | 
НИТЬ ЭТУ работу более квалиФици- 
рованно. 


р тес. с 


|- один из самых интересных нонен- 
тов в работе программиста. Рези- 
дентные программы работают как бы 
|"поверх” основных и позволяют не 
выходя из главной программы вы- 
полнять еше какую-либо ценную 
задачу. Так, например, в разделе 
|"ФОРУН" Вам была представлена 
|резидентная  программа-русифика- 
тор, которая 50 раз в: секунду 
|проверяет нажатие комбинации кла- 
виш ЗУМ. ЗН + ЕМТЕВ и, если они не 
нажаты, то резидент себя не про- 
|являет и остается "прозрачным" 
|для пользователя. 

В ИГРОВЫХ ПРОГРАаммах резидент- 
|ные процедуры как правило занима- 
ются тем, что воспроизводят музы- 
[ку одновременно с работой других 
процедур, а иногда ин поручают 
обслуживание клавиатуры в поисках 
нажатия нужной клавиши. Нередко 


ВИих ИСПОЛЬЗУЮТ и ПРИ организации 


| ° Создание резидентных програнн 
для "Спектрума” основывается на 
использовании режина прерываний 
|г-го рода (1М2) и сегодня мы 
представляем Вашему вниманию еше 
одну. полезную резидентную про- 
|грамму, которая поможет тем, кто 
| программирует в машинных кодах, 
особенно тан, где иные средства 
откажутся работать. 


Кто не испытывал трудностей 
|при отладке программ в нашинных 
кодах, когда казалось 5ы вполне 
“хорошая” ° программа почему-то 
| ВДРУГ ни с того ни с сего "за- 
|висает” и никак не удается опре- 
|делить, почему же это происходит. 
|Проблену отчасти решает пошаговая 
отладка програмны при поноши мош- 
Иных мониторов, таких, как, напри- 
|мер "МОН5-3", "МОН$-4". Но только 
|отчасти, так как для того, чтобы 
вручную "пПРОоЩелкать"” достаточно 
большую программу, требуется уйма 


иона мы ны м 


времени, ведь программы содержат 
нассу различных циклов и придется 
повторять выполнение программы в 
одних.и тех же адресах многократ- 
но. В общем задача эта - не из 
ПРОСТЫХ. Пошаговая отладка - это 
конечно, хорошо, но неужели толь- 
ко Этим ограничиваются возмож- 
ности “влезть ВНУТРЬ" программы и 
посмотреть, что же там происхо- 
дит. Сегодня мы предлагаем чита- 
телям еше один инструнент, позво- 
ляюший заглянуть внутрь программы 
во время ее работы, причем в ре- 
химе реального времени. Конечно, 
использование приведенного нетода 
требует определенной квалиФика- 
ции, но если Вы хорошо разбере- 
тесь с ним, то получите в свой 
арсенал инструмент, значение ко- 
ТоРОГО ТРУДНО Переоценить. 


Итак, вниманию читателей пред- 
лагается отладчик нашинного кода, 
использующий режим прерываний 
ВТОРОГО рода. 


Програнма-отладчик машинного 
кода называется "ТВАСЕВ". Она 
позволяет выводить в правой части 
экрана’ заданную информацию в 
щестнадцатиричном коде. Что это 
может быть за информация? Это за- 
висит от Ваших требований. Что вы 
зададите. Например, Вы хотите 
просмотреть число, записанное в 
какой-нибудь ячейке памяти, как 
оно изменяется. Или как меняется 
содерхимое какого-то регистра. 
или что записано на вершине нма- 
шинного стека. Принцип работы от- 
ладчика состоит в тон, что 50 раз 
в секунду будет происходить пре- 
рывание' Вашей исследуемой прог- 
ранны и 50 раз в секунду инте- 
ресующие Вас сведения будут выве- 
дены на экран в столбец в правой 
части экрана. Процедура,  обслужи- 
вающая прерывание, должна Форми- 
ровать требуемый параметр и выда 
вать его на печать. От того, что 
конкретно Вы котите проснотреть, 


подом 


зависит начало этой процедуры, В 
качастве примера, рассмотрим ва- 

РИант кодов, который позволяет 
проснотреть число, записанное на! 
вершине машинного стека. Блок ко- 
дов, который это делает, приведен 
В распечатке (Листинг 1), а воз- 
можный пример работы отладчика - 
на рис. 


1. 
39 то зав 
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рис, 1 


происходит при выполнении 
лизирующей подпрограммы 
расположенной с адреса 
(РАНРОМТ2Е 958 65211) 


дается 
куда будет производиться | 
результатов: в регистр НЕ записы-| 
вается адрес верхней пиксельной 
линии того знакоместа экрана, ку- 
да будет производиться печать. 
Это значение заносится в систем-| 
ную ячейку РЕ1ЗН. Затем обнуля-!| 
ется другая системная ячейка| 
5С81Н (это неиспользуемый адрес | 
в ‘таблице системных переменных). 
Здесь будет организован счетчик 
строк для выводимой информации. 
После этого происходит включение 
режима прерываний второго рода. В| 


число РЕН. Поэтому при прерывании| 
Произойдет переход на пРОоГранну, ||| 
адрес которой записан в ячейке! 
памяти РЕЕЕН. Там записан адрес 
РЕБСН. Это начало обрабатывающей 
Процедуры. Затем происходит пе-| 


2 Зэк.390 


==] 


и 


|реключение на режин прерываний 
второго рода и возврат. 

| Теперь 50 раз в секунду будет 
выполняться обслуживающая проце- 
|дура. По условию, которое мы за- 
дали, она должна выдавать значе- 
|ние двухбайтного числа, находяше- 
Йгося на вершине машинного стека 

считывание этого значения про- 
исходит следующим образом 
шее значение регистра Н!. сохраня- 
ется в неиспользуемой ячейке 
И5свон в таблице системных пере- 
менных. Далее интересующее нас 
|число с вершины стека заносится в 
регистр НЕ. При этом необходино 
восстановить стек в том виде, в 
|каком он был, что выполняется при 
помоши обратной записи числа из 
|. на стек. Далее на стекс сохра 

|няются значения всех регистров 
процессора, которые задействованы 


|и будут изменены в процедуре 06- 
| работки прерывания. 
Теперь надо интересующее нас 


число (в регистре Н.) вывести на 
|почать. Это выполняется следующим 
образом. Проверяется — значение 
|счетчика строк 5С81Н. (Если не 
достигнут нижний край экрана, то 
|происходит переход на процедуру 
|СОМТ, а если достигнут, то для 
последующего = вывода задается 
[опять верхняя строка экрана путем 
[занесения в системный счетчик 
|ЕЕ1ЗН исходного адреса в дисплей- 
|вом Файле. Счетчик строк при этом 
обнуляется 
Процедура СОМТ начинается, с 
того, что в регистр БЕ заносится 
Итекушее значение адреса для выво- 
ла в дисплейном Файле. Затем 
старший байт интересующего числа 
|записывается в регистр А и при 
поноши ротации вправо старший по 
|лубайт становится на место млад- 
шего, Выполняется его печать при 
помои подпрограммы РЕ1НТ, кото 
|рая выполняет печать четырех 
|иладтих битов, содержащихся в ре- 
|гистре Л (в  шестнадцатиричнон 
представиении четырем оитам соот 
встствует один символ), После пе 
чати значение РЕ увеличивается на 
единицу, что соответствует пере 
Иходу к следующему знакоместу. за 
|тем в регистр А опять записыва 
ется значение из регистра Ни вн- 
Пполняется нечать нладшего полу 
|баита. Значение БЕ опять увеличи. 
|вается на 1. Далее то же повторя- 
|ется и со значениен регистра 1, 
| точно так же за два приема выпол 
[няется печать двух полубайтов 
| Далее. путем выполнения рота- 
ции и суммирования, в счетчике 
|РЕТЗН получается следующий адрес 
|в дисплейном Файле, соответствую- 
|ший выводу на следующей строке. 
(Такой способ вычисления этого ад- 
'реса связан с тем, что экранная 
|память состоит из Трех сегментов 
и надо получить правильный ре- 
зультат при переходе от одного 
[сегмента к другому. В нашей книге 


Чеку- 


| 
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ЕЕ5С 22805С ТНТ 5/8 10 {#5СВО), №. ; Сохранение НЕ. 
ЕЕБЕ Е1 РОР нь ‚Получение требуемого 
; Параметра в НЬ 
РЕбО Е5 РОЗН НЕ ; Восстановление стека. 
ЕЕб1 [5 РОЗН АЕ ; Сохранение 
ЕЕбё С5 РИ5Н ВС ; значений 
РЕбЗ 15 РОЗН РЕ ; регистров. 
ЕЕб4 3А815С Гр А, (#5081) ;Переход к 
ЕЕб7. 3С СА ; следующей 
ЕЕб8 32815С ьр {#5С81), А ; строке. 
РЕбВ ЕЕ!65 СР #16 ‚Проверка на достижение 
ЕЕбЬ г0оов УВ М2, НРЕТА ;уконца экрана. 
РЕБЕ 111С40 ьо РЕ, #8401С ; Переход на 
РЕТё 20531 ЗЕЕ р {#РЕ!3), ОЕ ;начало экрана. 
ЕЕТб АЕ ХО А ; Обнуление 
РЕТТ 32815С ьо (#5081), ^ с; счетчика строк. 
ЕЕТА ЕБЪВАЗЕЕ СОТ 1 РЕ, (#РЕ13) ;Текущий адрес 
:в дисилейном файле 
РЕТЕ ТС гр А, Н ; Выделение 
кет 4 КВА ; старшего 
РЕ8О ЗЕ КВА ; полубайта. 
ЕЕ! 1 КВА ; 
ЕЕЗё 1Е ККА ; 
ЕЕ83  СОВУЕЕ САМ, ВРЕВУ ;Печать старшего 
РЕ8б 13 ТС Е ; полубайта. 
РЕЗ 1С ьр А,Н ; 
РЕЗ8 СОВУЕЕ САМ, #ЕЕВЯ ‚Печать младшего 
ЕЕЗВ 13 С ПЕ ; полубайта. 
РЕЗС Тр ых А, 1, ; Выделение 
РЕЗО 1Е ЮРА ; старшего 
РЕЗЕ 1Р КВА ; полубайтА. 
БЕЗР 1Р КВЛ р 
РЕ9О ' 1Р ВКА и ; 
ЕЕ91  СОВУРЕ’ СА, #РЕВ9 ‚Печать стармего 
294. 13 1 РЕ ; ПОЛлУбаЗйтА. 
РЕ95 ТО ьр А, 1, ; 
ЕЕ9б СРВУРЕ СА. НРЕВУ ‚Печать мл. полубайта 
КЕ99  гА!ЗЕЕ гр НЫ, (НЕЕ! 3) ; Рассчет 
ВЕС СВС КВ Н ; адреса 
Чек9Е Св1С вн ;в лисплейном 
|РЕЛО СВ!С вн } файле 
РЕА? 012000 ву ВС, #0020 с учетом 
РЕЛА5  ЕРЯА АС Ш, ВС ; сегмента 
РЕАТ СВ!4 ИИ: ; экрана 
РЕАЯ СВ!4 вГ. н ; 
КЕАВ СВ1В Е, Н ; 
РЕАР сг13РЕР р (ВЕРЕ, И. У 
|ЕВО 1 РОР. ПЕ ‚ФиНИиШНые оперойии 
РЕВ! С! РОР ВС ; по восстановлению 
РЕВа Е! РОР_ АР ; значений 
РЕВЗ гАВО5С 1 НЕ, (#5680) ; регистров. 
РЕВб С33800 УР #0038 ; Переход на Ю5Т 38. 
РЕН9 Е6бОЕ РЕНТ АНр Ног ; Преобразование 
'КЕВВ 87 АБР Л, А ;кода в синвол 
ЕЕВС #5 РОН Н. : согласно 
КЕВО 21071ЕЕ ьр Н1., #РЕРТ ; таблице 
РЕСО 0600 ро В, #00 ; с учетом 
ЕЕС2. /4Е Рив: А ;‚ шестнадцати 
ЕЕСЗ 09 Ар НЕ, ВС } РИЧНОГО 
РЕСН 46 р В, (НЬ) ; представления. 
РЕС5 23 19с он. р 
РЕСб ЗЕ в С, (НИ, ; 
РЕСТ ©С5 РОЗН ВС я ; 
ЕЕС8 Е РОР_ НЬ ; 
РЕС9 0608 го В, #08 ; 
РЕСВ` ТЕ РАТ тр А, (Н!.) ; ВЫВОД 
вЕсс ле а р (РЕ), А ; символа 
И д вс нь ;на 


"Элементарная графика" мы подроб- 
но разбирали все вопросы, связан- 
ные с выводом на экран. Поэтому, 
для более ясного представления о 
том, как все это происходит, за- 
казывайте и читайте нашу книгу. 
После выполнения печати иско- 
ной величины, происходят Финитные 
операции. Это восстановление со 


стека значений регистров про- 
цессора. При этом значение ре- 
гистра Нь, как мы помним, нахо- 


дится в ячейке 5СПООН, _ оттуда его 
и считываем. Далее - переход на 
адрес ооз8нН, как и в случае пре- 
рывания первого рода. 

Непосредственно печать `выпол- 
няется при помощи подпрограмм пе- 
чати РЕТНТ и РЕТ. Вначале зануля- 
ются старшие байты регистра А 
(выполняется печать только одного 
полубайта). Для того, чтобы 
обеспечить печать в шестналцати- 
рИичНнОом ВИДе, используется перевод 
кода в символ при помоши таблицы, 
расположенной с адреса КЕОТН. в 
зависимости от значения кода про- 
исходит установка в регистре Н1. 
адреса в символьном наборе, с ко 
торого находится изображение это 
го символа. Затём процедура РКТ 
выполняет переписывание восьми 
байт из символьного набора в 
дисплейный Файл. 

В результате работы програм- 
мы-отладчика в правой части экра- 
на Вы будете видеть столбец неп- 
рерывно меняющихся цифр. Это и 
есть результат работы программы - 
числа, которые находятся на вер- 
шине стека в процессе работы 
пПРОГРаммы. Они меняются достаточ- 
но быстро, но ведь все происходит 
в режиме реального времени. да и 
к тому же это просто демонстраци- 
онный пример, показывающий воз- 
можности програнны. 

На практике, для того, чтобы 
"вытаскивать" из  исследуеной 
программы требуемые параметры, 
Вам придется несколько видоизме- 
нить начальную часть процедуры, 
обслуживающей прерывание. Хоро- 
шенько разобравшись с принципом 
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ВЕСЕ 14 с р экран. 

РЕСР 10РА 142 #ЕЕСВ ; 

ЕЕО! ТА гр А, 0 

РЕРа 1608 508 #08 

РЕ 57 гр р, А / 

РЕО5 Е! РОР_Н, 

ЕЕОб С9 ВЕТ ; 

ЕЕОТ 308032 ТАВЬЕ РЕРВ ; Таблица 

ЕЕРА 883090 РЕЕВ ; для 

ЕЕПР 309835 РЕРВ ; преобразования 

ЕЕЕС АОЗРАЗ РЕРВ ; кода $ 

ГЕЕЗ ЗОВОЗЬ РЕЕВ ; в символ 

РЕЕб В830С0 РЕЕВ :с учетом 

ЕЕЕЯ 30С83Е РЕРВ : шестнадцати- 

КЕЕС 083Е10 ОЕЕВ ; РИЧНОГО 

ЕЕЕЕ 3Е!83Е РЕРВ ; Представления. 

РЕЕРе 203Е28 РЕРВ ; 

КЕР5` 3230 РЕРВ ; 

КЕЕТ 2!1!С40 БТАВТ Ш НГ, #401С Инициализирующая 

ЕЕРА 2213ЕЕ Йи (НРЕ!З), НЕ ; процедура. л 

РЕРРр 1802 в НРРО1 ; 

ЕЕЕР  5СРЕ АБВ РЕЕВ ‚Адрес перехода по 1Мг. 

ЕГО? АР РАЗ хо Л ; Продолжение 

Его 32815С ву (#5081), А инициализирующей 

ЕРО5 ‹ЗЕРЕ г А, ЗРЕ роцедуры. 

РОТ #Е03Т ьр Т.А 

ЕРО9 ЕО5Е ти а 

ЕРОВ С9 ВЕТ ; 

РЕОС ЕБ5б Это 11 ; Восстанавливающая 

ЕРОЕ ЗЕЗР 12 А, #3Р ; Процедура. 

ЕР10 ЕТ то Т.А 

Ерза с9 ВЕТ ; 

ЕР!3 00 ЗСЕР НОР {:Текушее значение адреса 

ЕР!4 00 т НОР ;в дисплейном Фаийле. 
действия этой програнмы, Вы сно- режима работы "Спектруна". 


хете легко применять ее для своих 
вполне конкретных целей. 

Для того, чтобы отключить от- 
ладчик, надо выполнить останавли- 
вающую подпрогранму, расположен- 
ную с адреса РРОСН (ВАМРОМТ2Е 05Е 
65292). При этом происходит пе- 
реключение на режим прерываний 
1 рода - восстановление обычного 


И в заключение об одном огра- 
ничении на работу отладчика. Вы-| 
вод На экран будет вознохжен толь- 
ко В том случае, если прерывания! 
разрешены (ЕТ). Если в исследуе- 
мой программе они запрешаются ко-| 


нандой РТ, то прерываний не будет 
и, следовательно, не будет вывода| 


на экран. 


МАЛЕНЬКИЕ 
ХИТРОСТИ 


ПРОГРАМНА “ТЕНЕВОЙ КОНТУР" 


На страницах "7х-РЕВЮ" уже не 
раз приводились примеры того, как 
можно внести некоторые усовер- 
шенствования в программы на 
Бейсике, применяя для этого Фраг- 
менты в машинных кодах. Сегодня, 
в продолжение этой тены, Мы при- 


водим блок кодов, который позво- 
лит вносить определенные измене- 
ния в изображение, имеющееся на 
ЭКРане. Посмотрите на рисунок. 
Изображение, которое Вы видите, 
как бы объемно. Создается впечат- 


ление, что оно приподнято над 
плоскостью экрана. Ван, наверное, 
приходилось видеть такой приен в 
програмнмая. Мы предлагаем Вашему 


вниманию оригинальный способ по- 
лучения этого эффекта, 

Суть метода заключается в том, 
что теневое оконтуривание выпол- 
няется автоматически программой в 
нашинных кодах. Сначала "плоское" 
изображение выводится на экран 
обычными способом, будь то Бейсик 
или процедуры в машинных кодах, 


Можно даже заготовить "плоскую" 
картинку при помоши графического! 
редактора. В общем, представин, | 
что имеется изображение, получен-! 
ное любым способом. Затем, вызы- 
вая приведенную ниже программу в 
кодах, выполняется теневое окон- 
туривание этого изображения, при-| 
чем весь экран может быть обрабо- 
тан за один прием, а ножно вызы- 


раз, выполняя оконтурИивание в 
несколько приемов. . 
Критерием, определяющим 
что надо оконтуривать, | 
надо, является повышенная яркость! 
{ВЕТСНТ 1).. Все, что на 
нарисовано с повышенной яркостью, | 
будет оконтурено при вызове блока! 
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в наминных кодах. Как это эФФек- 
тивнее всего использовать в прог- 
раммах придумайте сами. дело за 
Вашей Фантазией. Мы хе предлагаем 
ПРОГРамму в машинных кодах под 
названиен "теневой контур”. Ее 
БЕИСИК-загрузчик призеден в Лис- 
тинге.1, а машинный код с коммен- 
‘тариями - в Листинге_г. 


ЛИСТИНГ. 1 


РОВ 1 - 1 ТО 244 
КЕАР а 

РОКЕ 63999+1, а 
МЕХТ 1 

РАТА 

ТАТА 

РАТА 

РАТА 

РАТА 


РАТА 
РАТА 
РАТА 
ТРАТА 
РАТА 
РАТА 
РАТА 
РАТА 
РАТА 
РАТА 


ВАТА 
РАТА 
РАТА 
РАТА 
РАТА 
ВАТА 
РАТА 


ПАТА 
РАТА 
РАТА 


АТА 
РАТА 
РАТА 
ПАТА 
ТАТА 
РАТА 
РАТА 
РАТА 
РАТА 
ТАТА 


РАТА 
РАТА 
АТА 
РАТА 


РАТА 
ТАТА 
РАТА 


РАТА 42, 
64, 1560, 


хе. Програнма имеет автостарт со 
СТРОКИ 2, Где происходит загрузка 
необходимых кодов. Сам блок “те- 
невой контур” надо оформить в ви- 
де Файла “%еп”. СОБЕ 64000, 211. 
Кроне того, программа русифициро- 
вана по методике, приведенной в 
2Х-РЕВЮ-92 Н1,2, стр. 31. РУССКОо- 
латинский символьный набор загру- 
хается в виде Файла 
"сЬг” СОРЕ 64600, 768. 


ЕЗ 
РОЕЗ 


РАЗ 


АРКЕ 


ОУЕЕ 


УЕЕТ 


хо 


программя , 
ДЕМОНСТРИ- 
рующаяя 


"ТЕНЕВОЙ 
КОНТУР" 


ТУ 
ТУ, #5АЕЕ 


В, #16 

вс 

В.#20 
вс 

А, (ТУ+0) 
жю 

С, #РА2З 


А, (ТУ+1) 
+30 
С, НРАБа 


А. (1У+32) 
#40 
С. #РАЗО 


ТУ 


ЛИСТИНГ_2 


‚Последний байт 

; Файла атрибутов. 
‚Организация цикла 

;для 22 строк. 
‚Организация цикла 

;дия За колонок. 

‚Наличие ВЕТСНТ 1 

;в текушем, знакоместе. 
:Если нет, то переход 
На РАб5$.. 

;Крайнее ли это знако- 
;место с ВЕТЕНТ 1. 

‚Если да, то выполнение 

; вертикального 
‚оконтуривания - УЕВТ. 
Если под текушим знако- 
; местом не ВВТСНТ 1. то 
‚выполнение горизонталь- 
‚ного оконтуривания НОРТ7 
;Финишная процедура, если 
‚;знакоместо не с ВЕТСНТ 1 


;Эта подпрогранна выполня- 
;ет рассчет адреса в дисп- 
; лейном Файле по известно- 
;му адресу в Файле атрибу- 
; ТОВ. 


;Эта подпрограмна выполня- 
‚ет операции, связанные с 
;‚ наложением оконтуривающе- 
; го изображения на тот ри- 
;сУуНок, который имеется на 
; экране. 


:Не последняя ли это коло- 


зе 


1. со то 100 

2 СГЕАК 63999: 1ОАР "1ей"СоВЕ 
| 64000. 

3 БОАВ "сьг"СОрЕ 64600 

4 РОКЕ 23606, 88: РОКЕ 235607, 2 
151: ВЕМ Е05 

100 ВОЕРЕК 1: РАРЕК 1: ТНК Т;: В 


Продолжение Листинга_2 
РЕ20 СР 420 унка, если да, то возврат, 
С8 вт 7 :т.к. негде оконтуривать. 
ЕЕ РОЗН У ; 
11 РОР ПЕ ; 
13 1нС. БЕ ; 


ВТСНТ 0; 'СЕ$ 
| 200 ВВЕСНТ 1 СО2РРА САЫ, ЧРАар 
| 300 ЦЕТ А$-"В" Ор21ВЕРА го ТХ, #РАВЕ Базовый адрес таблицы 
11000 РОБ У-8 ТО 12: РОВ Н-=0 ТО 1 уиля построения оконтури- 
15; РЕГНТ АТ У, 1+4; АЗ; : НЕХТН: Ч ‚ Вающего рисунка. 
ИЕХТ У 0608 р в,#08 ; 
11010 ЕОБ У=3 ТО 11: РОВ Н-0 ТО 9 ЗЕЗО о А, #40 ; 
|: РЕТНТ АТ У, 4+Н; А$: НМЕХТ Н: МЕХ ЕОВЕгТ СР (1+33) ‚Если. знакоместо не угло- 
ГУ 3809 _ УЕ С, #РАТЗ ‚вое, то переход на 100Р.2 
1020 РОВ У=5 ТО 15: РАМТ ВЕТСН 050А р В, #0А ГЕСЛИ УГЛОВОе, ТО ОКОЙТУ- 
ИТ О; АТ У, т; “: НЕХТ У РОВЕгО СР ({ту+за) ; ривание снизу. 
11030 РЕТМТ ВРТСНТ О;АТ 10,3; " ‚3002 к НС, #РАТЗ ; 
| й 050С тр, в, #0С ; 
12000 КОВ Н=5 ТО 15: РЕТЫТ АТ М, 1 ООТЕСО 100Р_2 1 А, 41140) ; Проверка необходимости 
|8; " "; НЕТН в6 ок (м ‚выполнения наложения 
|2010 РЕТНТ АТ 8, 20; "ПРОГРАННА, " 77 уз (НА, А ; на инеющееся на экране 
12020 РЕТЫТ АТ 9, 20; "ДЕМОНСТРИ-" у орг; нс 1х ; изображение. ‚, 
12030 РЕТНТ АТ 10, 22; "РУЮЩАЯ” СОЗАЕА САШ, ЗРАЗА ; Выполнение наложения. 
12040 РЕТЫТ АТ 12, 20; """ТЕНЕВОЙ" 1024 РУ #ЕАТЗ : 
2050 РЕТИТ АТ 13, 23; "КОНТУР" "" с9 ВЕТ у ; 
12100 РАЦЗЕ 50: РГОТ. 145,48: РВАМ 
0, 86: ОКАМ 102, 0. Е! НОК17 РОР НН ; 
3000 РАОЗЕ 50: КАНРОНМТ7Е 058 640 Е! РОР АЕ ; 
100 Е5 РОЗН АР й 
18000 ВЕТЕНТ 0 Е5 РОЗН НЫ ; ` 
| ЕЕ18 СР #18 :Не последняя ли строка. 
После старта Программы со РегзрА УР НС, РАЗ  ;Если да, то негде окон- 
строки 2, загрузки кодовых блоков ;туривать и переход на 
и включения русского синвольного ; РАЗ$. 
|набора, происходит Формирование ЕРЕ5 РОЗН 17 ; 
изображения на экране, которое в 01 РОР р : 
| дальнейшем будет оконтурено. Для ЕХ ПЕНЬ : 
Этого перед подачей команд РЕТНТ 012000 10 ВС, #0020 ; К 
|происходит включение режима повы- 09 АБО НВС ; 
|щенной яркости ВЕТСНТ 1 (строка Ех ПЕ, НЬ ; 
200). Обратите внимание, что от- оЕО& 1) Сс, з02 Нико, 
Гверстие в левой фигуре, состояшей РОг1СВЕА 12 1Х.ЯРАСВ ;Базовый адрес в таблице, 


из букв "В", прорисовывается в 
крежиме ВЕТСНТ 0. (В правой части 
экрана получен ПРЯНОУГОЛЬНИК, 
пподлежаший оконтуриванию, Это вы- 
полняется печатью нескольких 
СТРОК пробелов В режиме ВАТСИТ 1 
| (строка 2000), а текст впечатыва- 
ется уже потом. для завершенности 
Фигуры этот прямоугольник слева и 


; определяющей оконтурива- 
ИОВ зющий рисунок. 

СО2ЕРА СА, ЗРА2Р : 
0504 тр. в, #08 ; 
007ЕСО Гр А, (1Х+0) Проверка необходимости 
в6 ‚ов «нь ; выполнения' наложения 
77 1 (ШлА ;на имеющееся на экране 
00гз тыс 1х ; изображение. 
СОЗАРА САМ. #ЕАЗА ; Выполнение наложения. 


|сверху занкнУТ ПРОРИСОВКОЙ ПРЯМЫХ 104 Р.ЛЯ2 `ЯРАЗЮ : : 
линий (строка 2100), так как ЕОТЕг1 Ы} А, 4У%5) |: | 
оконтуривание производится‘ только РЕЗО СР 430 ; 
|справа и снизу. у ОгёзЕА р С. згАгз ; 

Если оконтуривание должно быть #1 РОР/ АЕ Н 
выполнено поверх символов. напе- Е5 у РОЗН АЕ ; 
чатанных на экране и  инеюмих РЕ?О у СР #г0 : 
ВЕТСНТ 0, то происходит наложение рагЗРА ЛР НС ЗРАЗ ; 
Гоконтуривающего Фона на имеющееся 13 тс ПЕ-. ; 
изображение. Это можно наблюдать, ор ЕСС $ 
если побавить в программу строку: 207С И. 172, НЕА98 р А 
| СЗезЕА 3 ЗРАЗЗ : 


| 150 РОБ Н=1 ТО з2чгг: РЮТ 
м"; г МЕХТ И 000080 Р1ТСТОБЕ ОЕРВ #00, #00, #80; Базовая табйица, по ко- 
| 304050 РЕРВ #40, #АО, #50; торой строится окойтури- 
АО5ОАО РЕРВ $А0, #50, ЗАО; вающий рисунок. 

504050 БЕРВ #50, #АО, #50; 
2А15О0А ГЕЕВ З2А, #15, ОА; 
058040 ФЕРВ $05, #80, #10; 
4050 | ГЕЕВ #40, #50 ; 


Итак, дело за Вашей фантазией, 
|уважаемые читатели: 


зт 


вУЮ постоянную РУБРИКУ В "7Х-РЕ- 
ВЮ" для тех, кто любит и ценит 
Игровые программы. Эту рубрику мы 
назовен "Компьютерная новелла“. 

Изобретатель этой 
он же ее’ главный редактор 
постоянный корреспондент из Мос- 
квы - Матвеев Юрий Александрович. 
Юн экспериментирует в этом жанре 
уже не первый год и 
1Ваш суд предлагается 
|1, П ближайших рыпусках Вас ожи 
дают новые увлекательные приклю- 
чения героев тирокоизвестных ком- 
пьютерных игр. 

Должны сказать, что за прошед 
шие годы мы не раз пробовали экс- 
периментировать с 


РУбРИКИ, 
наш 


сегодня на 
зервзя рзье 


Дорогие читатели! ^ 
С этого номера мы начинаем но 


представлением 
ИГРОВЫХ ПРОГРАамм. Ключевой проб- 
леной здесь является, на наш 
взгляд то, что. подробная "рас- 
КруТка” игры и доведение ее до 
УРОВНЯ простейщих подсказок 
(1101$) не только не. способствует 
ее популяризации, но и наоборот, 
навсегда может оттолкнуть от нее 
возможного пользователя. Как Вы 
думаете, что скажут альпинисты, 
если подходы к основным вершинам 


мира кто-то услужливо забетониру-” 


ет ступеньками? у 
Итак, основная. цель ^ хорошо 
составленного описания комньютер 
ной игры должна быть. на наш 
взгляд в том, чтобы с одной сто- 
Роны дать заинтересованнону поль- 
зователю необходимые "хинты” для 
прохождения ИГРЫ, Но, с ДРУГОЙ 
стороны, сделать это настолько 
мягко, чтобы опи не бросались в 
глаза при первом прочтении и не 
я бы будущую игру. 

Так родилась идея компьютерной 
новеллы. Идея понравилась нам ете 
и потому, что такую новеллу могут 

°Вчитать отнюдь не только те, кто 
имеют данную программу и желают 
ее ПРОЙТИ. В принципе, она дела- 
ется как независимое художествен- 
ное произведение и ножет читаться 
даже теми, у кого нет и не было 
под рукой персонального компьюте- 
ра. И если у них появится после 
этого желание приобрести компью- 
тер, найти и запустить эту игру, 
вот тогда мы и будем считать, что 
наша главная цель - достигнута. 

У Вас на глазах рождается но- 
вый ханр. Мы внимательно следим 
за новинками в зарубежных компью- 
терных журналах, но систематичес- 
кого исследования такого’ направ- 
ления пока не встречали, 
ло. это совершенно неисследован- 
Е Вы ножете и сами принять’ по 
сильное участие в становлении и 
обкатке этого направления. Мы бу- 
дем признательны за критические 
отзывы, советы, рекомендации, Но- 
жет быть у Вас есть какие-то иные 


т.е. де- 


интересные 
и дискуссионные ‘обсудим на 
нипая "2х-РЕВЮ”. 
направлять 


стра- 
Письма ножете 
по нашему адресу на 
редактора раздела 


имя А АА 
Матвеева К. А. 


Матвеев Ю.`^: 
КОНФЕРЕНЦИЯ 


{по игре Колина Свинбурна 
" Джо Блэйд”). 


т 

Джо` Блэйд, удобно УСТРОИВШИСЬ 
на заднем сидении автомобиля, 
ПРИКУРИЛ СИГарету и вопросительно 
посмотрел. на мэра города, 

- Едем, - сказал тот шоферу и, 
когдз они выехали на шоссе, веду 
щег к городской тюрьме, наконец 
повернулся к Джо: 

- Ты смелый паревь и мне оста- 
ется надеяться только на тебя., - 
Он сделал многозначительную пау- 
зу. - Ты, конечно, знаешь, кто 
такой Кракс Бладфингер: влиятель- 
ное лицо в городе, президент мош- 
ной военно-промышленной компании, 
почетный член городского магис- 
трата. 

Дхо усмехнулся. Он никогда не 
признавал авторитетов, тем более 
тех, кто стоял у власти. Власть, 
по мнению Джо Блэйда, всегда ог 
раничивала его свободу, мешала 
спокойно жить, а свободу он лю 
бил больше всего. 

МЭР расценил усмешку собесед 
ника как иронию и поспешил согла- 
ситься. 

` Да, ты прав. Этот человек - 
оборотень, 


и не тот, за кого себя 
выдает, В полиции уже давно под 
него копают, но... Его организа- 


ция словно СПРУТ ОХхВватила важней- 
шие точки города. Везде есть его 
люди. По сути, Мэр города это 
он. Я - лишь прикрытие и ничего 
не могу сделать. Все идет так, 
как хочет он. О чем говорить, ес- 


ли даже городская тюрьма в его 
подчинении. Есть сведения, что 
Кракс превратил ее в склад бое- 
припасов. Также известно, что, 


Кракс Бладфингер нелегально тор- 
гует не только ‘оружием, но и нар 
котиками. У него четко отлаженная 
сеть сбыта и верная агентура. 

Пока мэр рассказывал о Краксе, 
Джо Блэйд, присткрыв окно, шелк- 
нул в туман ОКУРКОом. ‘Мэр не от- 
крыл Америки, в народе уже давно 
ходили слухи о мафии Кракса, од- 
нако на официальном ‘уровне это 
никогда не обсуждалось. 

- Я так понимаю, - задумчиво 
отозвался Джо, - что на сегодняш- 
ний день вопрос встал. ребром: или 
вы, или Кракс? 


- Не совсем, - ответил мэр. ыы 


Все дело в том, что завтра здесь 
начинается международная конфе 
ренция по правам человека. это, 


можно сказать, ‘крупнейшее событие 
в истории нашего ‘города. Среди 
ПРОЧИХ к нам вчера  приекали 
шесть лидеров нирового ранга. В 
какой-то степени они могут изне- 
нить положение, Их влияние в ни- 
ре, их связи были бы способны 
очистить наш город от этого паука 
Кракса и его нечисти. Однако... 

- Однако..? - повторил Джо 
Блэйд. 

- Вчера ночью Кракс похитил их 
и теперь шантажирует меня. 

- Что? Всех шестерых? 


- Да. Впрочем это, наверное, 


от жадности или от наглости. Дляй 
скандала достаточно было бы и| 
одного, 

- Так чего же он хочет? 


- Завтра на Конференции я, как 
мэр города, делаю доклад. Я соби- 
рался, когда готовил речь, дать 


понять о мошной нафФиозной струк 
туре, выросшей в нашен городе за| 


указать на Кракса, как на главаря] 
ЭТОЙ СТРУКТУРЫ. И ПОТОМ... 

Интерпол. .? - засмеялся 
Блэйд. 


речи каким-то образом оказалась у| 
Кракса. И он среагировал быстро. | 
Возможно, ему было бы проше ус 
тТроить мне автомобильную аварию, 
но я предуснотрительно усилил ох-| 
рану и стал для него недоступен. 
Я даже подумать не ног, что он 
решится на захват заложников. се- 
годня Кракс звонил ныне и намеком 
дал понять, что если я делаю до-| 
клад в его пользу. .. 

- То есть? - переспросил Дхо. 

-...Кракс Бладфингер | 
лицо в городе, отстаивающее права! 
человека, 
тью, 
ТУ и стране, 
лее. 


гений, ну и так ‘да-| 
Он хочет добиться благо- 


которые будут присутствовать на! 
конференции. Он ждет аплодиснен- | 
тов, но он их не получит! - Мэр! 
сжал кулаки, 

- Конечно, он же показал те- 
перь всем свое истинное лицо, - 
Улыбнулся Джо Блэйд. 

= Нет. Просто вчера, 
ночи, сразу после приезда делега-| 
тов, он предложил ин в ранках ©3-1 
накомления 
тюрьме, 


их тан до начала конференции и! 
только после моего доклада в его! 
пользу они будут доставлены на| 
место. Никто даже не заметит ни- 
чего подозрительного. Пятнадцать | 
МИНУТ РОЛИ не играют. А в ПРОТИВ || 
ном случае они вообще не появятся 
В зале и конференция будет сорва- 
на. обвинят потом, конечно, не! 
его, а меня. Я обеспечиваю транс- 
порт, питание, организацию, безо- 
пасность. Кракс выходит сухим из 
воды, я же - теряю пост мэра, об-| 
шественность отвернется от ‘меня, | 
а уж потон в долгу не останется и} 
Кракс. Понимаешь? - Мэр посмотрел| 
в глаза Джо Блэйда, иша сочувст-| 
вия. 

Джо молчал. 

- Я послал пять лучших аген-| 
тов: Джаббу, Симона, Криса, Кеви- 
на и Колина.для освобождения за 
ложников, но они вернулись ни с 
чем. Кракс усилил охрану, и тебе, 
парень, будет нелегко. | 
знаешь все. Я верю, 
нам, тен более, что твои крепкие! 


`кулаки и неткий глаз теперь най-| 


дут настоящую работу. - 
хлопал Джо по плечу, 


Мэр по- 
- Какое у 


‚тебя оружие? 


джо, не говоря ни слова, выта- 
ил из-за пазухи блестящее корот- 
коствольное ружье. 
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- Я видел эту штуковину. у Кра- 
кса на заводе, - сказал мэр. 


- Да, - подтвердил Джо, - это 
|их последняя разработка элек- 
ТРОННЫЙ распылитель. Оставляет 
от человека легкое облачко дыма. 

- Причем, опасное, -- добавил 
мэр. 

- Пока не рассеется, - кивнул 


- Откуда это у тебя? 
Джо повертел ружье в руках и 


- Пользуешься услугами Кракса, 
— ВЗДОХНУЛ МЭР, 

- Исключительно 
системы, х 


ПРОТИВ его 
ответил Джо Блэйд и 


Но только не для него. 
ПРОТИВ Целой банды голово- 
обученных и хорошо воору- 
женных. Схватка не на жизнь, а на 
| смерть. И это его устраивало. он 
|считал возможным помочь мэру, да 
пи всему городу, избавиться от хи- 
И грого и страшного Кракса БладФин- 
гера, 

- Самое главное это заложни- 
ки, - сказал мэр. - С Краксом мы 
|успеем разобраться. ‘Дия  заложни- 
ков Ты - сотрудник безопасности. 
Чтобы снять ия нолозрения о каше, 
которая здесь заварилась, скажешь 
им что-нибудь о взрыве ‘боеприпа- 
сов, который вот-вот должен прои- 
зойти. Наши машины будут ждать 
недалеко от входа. Понни, что за- 
ложники ничего не знают и чувст- 
вуют себя достаточно спокойно. 
Когда все шестеро будут за преде- 
Шлами базы, найди способ взорвать 
эту "богадельню", ну а сан сматы- 
вай удочки. У тебя будет несколь- 
ко минут, чтобы унести ноги. 

- Ровно двадцать минут, 
зал Джо Блэйд и пояснил: - 
Кракса последней разработки сра- 
батывают через двадцать  нинут 
после запуска часового механизма. 

- Сумеешь разобраться в коде? 

Джо КИВНУЛ. 

- У меня будет тридцать секунд 
до того, как система саноуничто- 
жения сработает. Этого вполне до- 


ска- 
бомбы 


статочно, чтобы выставить нужную 
комбинацию. 

МЭР с восхишением посмотрел на 
собеседника. Он понял, что этот 
парень знает толк в оружии. 

- Запасные патроны есть? - на 


всякий случай поинтересовался он. 
Джо Блэйд отрицательно покачал 
головой. 

Это только сапожник без са- 
пог, а у Кракса всегда можно най- 
ти необходимое. Я надеюсь, что 
мне хватит двадцати патронов на 
первое вреня. 

= Ну, смотри сам, - нахмурился 
МЭР и, пристально вглядываясь в 


цаль по ходу шоссе, тронул шофера 
за плечо. Тормози, дальше опас - 
но. 

Следон за ним остановилась, 


ВЗВИЗГНУВ ТОоРМОЗами, нашина чер- 
ного цвета. Блэйд нашупал ствол. 
- Моя охрана, - успокоил его 


а находились почти за кило- 
метр от серых КИРПИЧНЫЯ стен 
‘тюрьмы, расположенной чуть в сто- 
ао от МОЕ ва Невольшом. ВоЗВЫ- 


Дхо, 


шении. Джо Блэйд. ‘осмотрелся. Ни 
души. ‘Запретная зона. А по сути - 
одно из владений Кракса ’БладФин- 
пера. Мэр и Блэйд вышли из маши- 
ны. 
Советую пройти тем леском, 

МЭР вздоянул и добавил: НУ, УС 
пеха... Я верю в тебя. 

они пожали друг 
ЧУТЬ ПРИГНУВШИСЬ, 
ко второй машине. Хлопнула двер- 
ца, и машины почти одновременно 
рванули с места. 


ДРУГУ РУКИ. 
мэр направился 


и 
Напевая про себя простенькую 
мелодию. Джо быстрым шагом пошел 
по направлению к тюрьне и через 
несколько минут оказался у высо- 
кого забора. Вход был чуть в сто- 
роне, справа, но Джо рассчитывал 
на внезапность. Недолго думая, 
Блэйд перелез через забор. Он 
оказался на дорожке, ведущей к 
одноэтажному кирпичному зданию. 
Стоявший у входа охранник не сра 
ЗУ сориентировался и не ‘успел вы- 
стрелить: Джо Блэйд опередил его. 
“С почином", - подумал Джо и тут 
же увидел ключ, видино выпавший 
ИЗ рук охранника. Он поднял его, 
подождал пока растворится в в©3з- 
духе белое облачко и направился к 
двери. Самое трудное было впере- 
ди. 
Он оказался в длинном, 
освешенном коридоре. 


тускло 
Здесь никого 


не было. Крепко сжиная ь руках 
распылитель, Джо быстро шел впе 
ред. он обратил внимание на 
странные, в человеческий РОСТ 
витрахи, которые украшали стены, 
РельеФный металлический, устраша- 
юшего вида полу-человек, ПоОЛУ- 


вампир лязгал клыкастой челюстью. 
"Бред какой-то", -( Подумал джо 
Блэйд. В конце коридора он заме- 
тил две человеческие фигуры. Бле- 
стяшая каска и армейский мундир 
сразу бросились в глаза. Это был 
охранник. Второго он не успел 
разглядеть. Джо выстрелил в ох- 
ранника. Когда облако рассея- 
лось, он подбежал ближе. В неяр- 
ком свете Джо увидел чедовека`в 
СТРОГОМ сером костюме с надвину- 
той на глаза шляпой. Заложив рРУу- 
ки за голову, он сидел, присло- 
нившись спиной к каким-то яшикам. 
Похоже, заложник даже не обратил 
внимания на неожиданное исчезно- 
вение охранника и появление чело- 
века в куртке, кепке и джинсах. 
Свидание было коротким. Джо Блэйд 
представился сотрудником безопас- 
ности, кратко и не совсем внятно 
объяснил ситуацию так, как просил 
МЭР. р 

А ны ждем транспорт, - раз- 
вел руками делегат конференции и 
робко улыбнулся. Только я от- 
стал и не знаю, где остальные. 

- К выходу, там вас ждут! - 
ПОЧТИ ВЫКРИКНУЛ Джо, ухе открывая 
дверь в соседний коридор. 

Сразу два охранника, чуть за- 
мешкавшись., бросились к нему. 
лверь захлопнулась в ту ще секун- 
ду и он понял, что обратной доро- 
ги нет. Джо уже не успевал увора- 
чиваться от здоровенных детин в 
армейских нундирах. Дав задний 


ход, ОН ПРИЖался спиной к холод- 

ной стене и выстрелил ПРЯМО В 

УПОР. дым рассеялся не сразу. 
писает в стену, 


ждал, 


пока воздух очистится от нолекул 
распыленных тел. Однако, ‘как он 
ями старался укрыться от едкого 
дыма, нескольких вздохов хватило 
для того, чтобы закружилась голо- 
ва, а в ногах появилась слабость. 
В этот момент он пожалел о том, 
что не взял обыкновенный “Узи”, 
хотя "Узи" все равно выдал бы 
его шумом. 

На стене висел ключ от тюрем 
ной камеры. Джо снял его с крючка 
и пробежал до конца коридора. 
Здесь было сразу две двери: одна 
налево, чуть приоткрытая, другая 
направо - наглухо запертая тяже 
лая стальная дверь. Джо вставил 
ключ в замочную скважину стальной 
двери и, распахнув ее, шагнул в 
ярко освешенный Коридор голубова 
того цвета. Там расхахивал окран 
ник с автоматом наперевес. В се 
кунду его не стало. Коридор был 
свободен. Чувствуя легкое недомо- 
гание после прошлой газовой ата- 
ки, Джо открыл первую попавшуюся 
дверь. Это был склад. Он еше ни 
когда не видел такого количества 
боепривасов. Территория ТЮРЬМЫ 
служила надежным хранилишем для 
оружия мафии Кракса. Огромные 
ящики, стоявшие друг на друге 
вдоль стен, оставаяли лишь не- 
большой проход по центру. "Да 
ведь они никогда не будут. стье 
лять здесь”, НеЛЬКИУЛО У Джо, 
это было бы самоубийством, Столь 
Простой и логичный довод прибавил 
ему сил. Он уверенно пошел впе 
ред, внимательно оснатривая 
склад. Неожиданно из-за горы 
яшиков на Джо бросился толстый 
улыбаюшийся кладовшик. В его ру 
ке сверкнул нож. Прежде, чем Джо 
успел выстрелить, лезвие задело 
висок. Кладовшик метил в лицо, но 
не попал. Он замахнулся еще раз. 
Распылитель хлопнул в то мгнове 
ние, когда, казалось, длинный] ы 
КРИВОЙ НОох, ‘как сабля разрубит! 
тело пополам. Но Джо успел, 

Пока растворялось облако, Джо 
переодевался в мундир охранника, 


| 
} 


найденный среди яшиков с боепри 
пасами. Тяжелая каска, сапоги, 
материал, пропитанный специальным 
составом, пожалуй, могли зашитить 


и от опасных молекул распыленных 
тел, а уж о том, что в таком 06 
лачении Джо Блэйд ничем не отли 
чался от всех остальных охранни 
ков, говорить не приходилось. Еле! 
раз внимательно окинув взглядом 
склад, Джо побежал к выходу. 

Двадцати патронов ногло 
хватить, и Джо это понимал. 
надеялся, что рано или 
найдет патроны нужной системы. | 
Однако среди этого военного вели-| 
колепия ничего подходящего он не’ 
‚ видел. 


помешений. Конечно, 
плохо его иметь, но, 
приходилось 
на себя. | 
экономить время, патроны и силы. 
Пару раз Джо удалось проскочить! 
незамеченным. Но даже когда он! 
лоб в лоб столкнулся с охраной 
одной из камер, никто не обратил| 
на него внимания. Его  спасал| 
мундир, найденный на складе. 
вскоре он нашел бомбу. Огром 


ный шар черного цвета лежал ПРЯМО! 


в проходе. Джо хотел оставить ее 
|Йнезаряженной, но, перепрыгивая 
| через бомбу, услышал шелчок, сиг- 


зизмы срабатывал от малейшего дви- 
Код состоял из пяти букв 


|один из продавцов оружия расска- 
зал. как-то о новой разработке 
|военных - супербомбе, и сказал, 
что пока идут опытные образцы, 
|0яфР`ПРОСТ - АВСРЕ; Именно в 
|гакой последовательности следова- 


что пере- 
двигать буквы по табло можно было 
плишь по заданной схеме, Таймер 


Теперь остановить 
‘таймер не смог бы и Господь Бог. 

й Почти одноврененно с сигналон 
неожиданно выстрелило ружье Джо 
'Блэйда. "Что за черт?” - подумал 
Джо. На один патрон, действитель- 
йно, стало меньше и Джо понял, что 
Псильный электромагнит в бомбе за- 
|ставил сработать электронный боек 
его ружья. "Такими тенпани у ме- 
|ня через пять минут будет пустой 
магазин”. Но Джо решил, ‚что лучше 
пожертвовать патронами, чем опоз- 
дать, и не стал особо переживать. 
Ему нужно было найти еше пятерых 
да. и одной заряженной 
на тюрьму явно не хватит. 
В следующем помешении Дхо по- 
нял, что от военной Формы придет- 
ся отказаться. Здесь охранники 
были одеты в ту же Форму, но дру- 
гого цвета. Он не рискнул нару- 
ить порядок и в надежде на новую 
Форму стянул с себя старый нун- 


стараясь быть незамеченным, Джо 
нырнул в открытую дверь. Тюремшик 
с большим животом видино собирал- 
ся вкусно поесть, На столе стояла 
бутылка воды, в широкой вазе ле- 
Дяо не был голоден, 


успел даже вскочить из-за столз. 
“Ради этого стоило потратить па- 
грон”, - подумал Дко, поедая яб- 


сразу почувствовал себя лучше. 

Он плохо помнил, как в течение 
двух МИНУТ успел найти и зарядить 
еше две бомбы, а такхе освободить 
ничего не подозревающего делегата. 
В длинных коридорах тюрьны он 
редко стрелял, предпочитая  увора- 
чиваться от ударов и пробегать 
мимо охранников. Там. где это бы- 
ло возможно, зная, что ни один не 
решится выстрелить в набитой до 
отказа боеприпасами ‘торьме, Джо 
просто прыгал как пантера через 
ощалевних бойцов и рвался вперед. 
Он еме раз вашел новую, с иго- 
почки, Форму и ухе в ней, давая 
себе передышку, вышел на улицу во 
внутренний цвор Тюрьмы. Телерь 
стало ясно, что заложников разве- 
дели по разным зданиям и коридо- 
ран. Каждый, видимо, думал, . что 


дир. Пробежхав через коридор и. 


отбился от основной группы. Охра- 
на относилась к ним лояльно и по- 
Этому бунта не, возникало. джо 
посмотрел на пасмурное небо и 
подумал о своем возвратении, Бе- 
жать из тюрьмы можно было только 
Через выход, минуя коридоры и ок- 
рану. Дорогу назад он помнил. В 
одной из камер он оставил нетро- 
НУТЫМИ еше один мундир и каску, 
которые позволят уйти незаметно. 

Только сейчас он посмотрел на 
часы. До взрыва оставалось один- 
надцать минут. 

Убрав охранника возле неболь- 
шого кирпичного дома, Джо с ра- 
достью обнаружил внутри боеком- 
плект для своего оружия. десять 
патронов, тшательно упакованные в 
небольшом яшике, быстро перекоче- 
вали в магизин распылителя. На 
душе стало легче. В соседней ком- 
нате он нашел безнятежно спавшего 
Нирового лидера. Джо объяснил си- 
туацию. Тот быстро согласился и 


‘направился бодрым шагом к выходу. 


Джо знал, что этот серый костюм 
никто не тронет и он спокойно 
найдет .выход и всех остальных. 
Спустя несколько секунд Джо ЧУТЬ 
было не поплатился жизнью, ока- 
завшись один на один в тесной ка- 
мере с какин-то заключеным. 
Вилотную прижав Дхо к стене, он 
принялся душить ёго. Схватка была 
КОРОТКОЙ, но решительной. Силы 
уже покидали Джо Блэйда, когда 
ему удалось, ОтТтТолкКнНУВШИСЬ от 
стены, перепрыгнуть за СПИНУ 
противника и, быстро развернув- 
шись, выстрелить тону в живот, 

Сквозь облако испарений джо 
увидел, что входная дверь заклоп- 
нулась и он оказался в каменном 
ГРОобУ из четырех стен. Пот лился 
градом, а Дхо лихорадочно шарил 
по карманам. Наконец ключ был 
найден. Слава Богу, что он зашел 
сюда с запасным ключом, иначе 
пришлось бы ему послецние десять 
МИНУТ. хизни провести за тюренными 
стенами. Джо снова вышел во внУ- 
тренний двор. Слева от него был 
целый ряд саных разных построек, 
но, Чтобы ПРОНИКНУТЬ ТУДА, НУЖНО 
было пройти нино центрального по- 
ста, а потон ух повернуть налево. 
Бдительный охранник получил свою 
порпию снертоносного луча, когда 
пытался задержать Джо У входа. 
Блэйд подошел к дверям. их было 
две. Он открыл правую и на этот 
раз интуиция не подвела его: в 
одной из трех тесных комнат Джо 
обнаружил комплект боеприпасов 
для распылителя, немного еды и 
уставшего залохника. Полдела сде- 
лано. Ену осталось осмотреть ту 
часть построек, которые находи- 
лись слева от центрального поста. 
дверь еще не успела открыться, 
как в лицо дхо выдохнул перегаром 
стояший напротив охранник. 

- Стой} Кто такой? 

Вопрос в л05. Ответ был досто- 
ин вопроса. За Джо заговорило его 
ружье. Легкое облако быстро раз- 
носил ветер. "Интересно”, - ‘по- 
думал Джо, -”они уже итут меня 
или нет?" Судя по всену, инфорна- 
ция © проникШем на территорию 
ТЮРЬНЫ ПОСТОРОННеМ не поступала. 
дхо застал всех врасплок. Чуть 
больше десяти минут накодится он 
здесь, а кажется, что прошла це- 
язя вечность. 

У входа в первое здание, слева 
от главной дороги, сразу два сол- 


дата угрожающе шагнули к Дхо. он 
выстрелил. Чуть подумав, 
идти через дверь. а влез в окно. 1 

Алинный зеленый коридор пока- 
зался ему сплошным кошнарон. он 
ИЗРЯДНО ПОТРатил Патроны, прехде 
чем добрался до первой двери. 


перенешевия и были нужны, как 
воздух. Три ключа джо оставил в 
запасе для возврашения обратно. 
Вскоре он нашел еше’ двух заложни-| 
ков, 


лке до взрыва, а он еше не нашел! 
последнего, шестого делегата кон- 
ференции. Эх, знать бы, где он! 

А заложник был недалеко, в со- 
седнем здании. Джо не стал ничего 
объяснять. Показав ему дорогу к} 
выходу, он помчался по коридору в} 
надежде найти патроны, Патронов} 
он не нашел, 
пел зарядить еше две бомбы. 
дарок Краксу“, 
"шесть бомб - шесть заложников. 
Неняенся!", - он улыбнулся своим 
ныслям, однако спустя несколько 
секунд понял, что радоваться ра-| 
но. Возврашаясь к центральному! 
посту, Джо наткнулся на вновь! 
прибывшую смену. Не раздумывая, | 
он нажад на курок, но ружье нол- 
Патроны. кончились. 


двое. 


вально перелетел через него. 
бросился сзади, ‘но не 
Блэйд бегал быстрее. 

Три ключа были в кармаке. 
то в глубине самого первого 
ния его дожидаяся спасительный 
мундир. НУЖНО было только успеть. 
Теперь, видино, информация о нем 
дошла и его, наверняка, попытают-| 
ся либо убить, либо взять хивым. | 
Выйти из тюрьмы ему неё дадут... 


коридору к выходу. На него не об-| 
рашайи внимания. Все искали коре- 
настого в штатскон.. 


дверь за попторы минуты до взры- 
ва. Дорожка с которой он начинал 
свою миссию, 
ену слишком длинной. Но все! он 
успевает! 

Черный ЛИМУЗИН УВОЗИТ 
прочь ост обреченной Тюрьмы. В 
нашине, кроме шофера, сн один. 
Все остальные готовятся к конфе- 
ренции и лишь ненногие знают, что 
через МИНУТУ тюрьма Кракса  пе-й 
рестанет существовать. | 

Все остальное будет потом: на- 
града, всеобщее признание, свобо- 
да, наконец. А в эту минУТУ Джо 
Баэйду хотелось ‘одного: откинуУв- 
мись на спинку сиденья, ВДОЕНУТЬ 
глубоко воздух и дохдаться крас- 
ного зарева и раскатов грона над 
ТЮРЬНОЙ. Дяо все еше видел в зер- 
кало заднего вида очертания тю- 
ренных стен и построек. Он молча 
хдал. Шофер тоже молчал. Только 
нягкое гудение двигателя да пю- 
рох шин нарушали тишину. 


о 


И И Е О А 
дячих скелетов, подберите остав- ОТдОянНУВ, ПРОДОЛЖИТе СВОЮ ЭКкСспе-| 
МУТН шиеся от них черепа, Спуститесь дИцИЮ. 
НуЗфогу 10 4Ъе юаб1тЕ на самый нижний этаж и идите вле- 
во к огненному озеру. Там бросьте 111 
АВТОР: №е11 Родуе!1. 1989 эти черепа в пламенные воды. .Из "5сапа1пау1а. Рлуе Нилагеч Ар" 
Фирма: ТНЕ ЗУЗТЕМ ТНКЕЕ пламени возникнет демон. Победив (Скандинавия. 500 год н. 3.) 
его, Вы сможете по возникшему ос- 
Эксперт Матыцын Д, А. ТРОВКУ ДОбРАаться и до четвертого ‘теперь мы попадаем к норманнан! 
г. Москва энергетического шара. На этом же В Древнюю Скандинавию. Очутившись| 
а се островке надо взять мощное оружие на корабле Драккаре в разгар сви- | 
- Трезубец и ИДТИ К ДРУГОМУ оГ- репого шторма, сопровождаютенся | 
Эта игра является довольно ненному озеру. Из середины озера ГрРоНом и молниями, Вы не сразу| 
развитым представителем жанра поднимется островок, который поз- сообразите, что от Вас требуется. 
аркадных адвентюр и требует от волит дойти до гигантского огне- оснотРИиТесь, опробуйте свой| 
играющего как быстрой реакпии и дышашего дракона, победить кото- ОГРОМНЫЙ ТОПОР и МОЖете присту- 


сообразительности, 
кого мышления. 

Фабула игры основана на том, 
что по неизвестным причинам нару 
|шилась ткань времени и в нашу 
эпоху стали проникать мифические 
создания и герои древних легенд. 
| для исследования причины такого 
исмешения Вам поручается провести 
историческую экспедицию и побы- 
вать в некоторых узловых точках 
истории человечества. 

Игра многоуровневая, с пятью 
дозагрузочными этапами. Для пере- 
хода с одного уровня на другой, 
необходимо собрать пять энергети- 
ческих шаров. Первые четыре из 
них обычно находятся довольно 
|йлегко, последний же, как правило, 
|хИТРОУМНО Ззапрятан или зашишается 
могучим стражем. 
| В верхней части экрана индици- 


|руется количество оставшихся по- 
ппыток и очки {слева). 

[| энергия героя и количество со5- 
|ранных шаров (справа), а также 


так и логичес- 


| 
| жизненная 


Когда герой 
80% энергии, его 
изображение. начинает мерцать. 

В начале каждого уровня дается 
обычно‘ один предмет, используя 
который Вы добываете и другие, 
|Смена предмета - нажатием клавиши 
ЗРАСЕ. Кнопка "огонь" совместно с 
“вправо”. или ^влево" позволяет 
использовать текущий предмет. 


т ^ 

"Тне Коач фо Не!1". 

(“Дорога в ад") 
| Итак,› Вы в далеком прошлом. 
|Ват маршрут начинается под старым 
|кладбишем. Единственное’ исходное 
[оружие - удары ногой или рукой. 
Пони выполняются нажатием клавит 
"вправо", "влево" или "вверх" при 
|нахатой клавише "огонь". Ногой 
поткрываются сундуки и разбиваются 
ИСОСУДЫ, ВНУТРИ КОТОРЫХ МОГУТ быть 
| найдены некоторые полезные атри- 
|буты, * восстанавливающие энергию 
дающие временную неуязви- 
дополнительные заряды и 


скелеты, 
извергающие огонь, снер- 
вулканы. Первые ТРИ 


надо выстрелить в 
. Шар. упадет и его можно 
С остальными тарами дело 
обстоит сложнее. ‹ г 
Расстреляв не менее десяти хо- 


РОГО Вам поможет волшебный тре- 
зубец, а боевым трофеем станет 
ключ, которым открывается дверь 
пешеры, в Которой кранится пос- 
ледний шар. 

Последняя задача - переход на 
НОВЫЙ УРОВЕНЬ. Портативный теле- 
портер Вы найдете на нижнем эта- 
же, неподалеку от огненных озер? 
А использовать его надо тан, от- 
куда Вы начинали игру (место от- 
нечено воротами, на которых есть 
изображение Вашего телепортера). 


и 

“бгеесе. Еоиг Нипагед ВС". 

(Греция. 400 лет до н. э. ) 

Пронизывая пласты времени, Вы 
попадаете в 400 год до н.э. И вот 
перед Вами Древняя Греция. Свой 
первый шар Вы найдете без труда, 
а уничтозив мечон пару колонн, 
подберете спрятанные за ними ат- 
рибуты и волшебный мешок. Он при- 
годится впоследствии для транс- 
ПОРТИРОВКИ смертоносной головы 
медузы Горгоны. 

Если Вы сунеете успешно отра- 
зить атаки агрессивных привиде- 
ний и минуете статую льва, то по- 
падете в УЮТНЫЙ Дворик, 
которого отдыхает прекрасная нин- 
фа., Однако, .при Вашем приближении 
она превратится в огнедыташего 
монстра, единственное спасение от 
которого - спрятаться за колонну. 
Вдоволь ‹‚натешивтись. ’ нимфа уле- 
тит, а Вы станете обладателем еше 
двух энергетических шаров. 

С опаской поглядывая наверх, 
откуда начал капать смертельно 
ядовитый дождь, подойдите к пус- 
тому портику. В него можно войти 
и передохнуть, ненадолго присев. 

Ваша следующая задача - медуза 
Горгона, охраняютая четвертый 
шар. Хорошо, что у нас есть брон- 
зовый зеркальный шит - им нмохно 
ПРРИКРЫТЬСЯ ОТ ее испепеляющего 


взгляда. Когда возьмете шар, за- 
одно отрубите Горгоне ее голову 
И Осторожно положите ее в свою 


волшебную сумку. 
ЕСЛИ на обратном пути хорошо 


обыскать ‘пешеры, Вы непременно 
найдете огромного трехголового 
дракона. Быстро достаем голову 


медузы Горгоны и с ее помошью 
уничтохаем одну за одной все три 
головы страшной рептилии. Победив 
дракона и забрав пятый шар, Вы 
без труда вернетесь за телепорте- 
ром в пешеру Горгоны,  возврати- 
тесь к несту старта и, немного 


в конце 


пать к битве с командой корабля. 
Если сражение пройдет нормально и! 
Вы победите главного викинга - 
конунга, то взяв его оружие, Вы| 
снохете приобрести первый энерге-| 
тический шар, после чего окахе-| 
тесь уже на суше. . | 

Здесь Вас ждет толпа злобных! 
гоблинов, вооруженных дубинами. 
Трофеями этой победы будут ножи, | 
которые впоследствии Вам приго- 
дятся. Изредка вашим взорам будут! 
представать прекрасные лесные Феи| 
- брумгильды, но они не менее| 
опасны, чем гоблины. Идя налево и! 
разбивая по пути яшики и сосуды, || 


шар, после чего можно начать ис-| 
следовать праный Фланг. | 

Погасить жертвенный костер Вы| 
сможете. вызвав дождь с | 
заклинания из старинной рукописи. | 
На несте пепелиша Вы найдете ключ! 
от замка скандинавского бога оди- | 
на. | 

двигаясь направо, Вы придете к|! 
третьему тору, но дальнейший путь 
преградит злобный дракон Нидхог, 
справиться с которым Вы сможете! 
только метанием ранее собранных! 
ножей с достаточно близкого  рас-| 
стояния. | 

Четвертый. шар Вы найдете на|. 
подступах к замку одина. Попасть| 
в замок Вы сможете, опустив подъ-| 
емный мост через ров, воспользо-| 
вавшись ключон из жертвенника. В| 
замке вас встречает сам бог Один. | 
ЕСТЬ только один предмет, которын| 
можно его поразить. Интересно, | 
успели Вы найти к этому моненту 
молнию? Если да, то победа и - 
тый шар будут Вашими. | 

Телепортер найдете на обратном! 
пути, а пользоваться им Вы уже] 
| 
| 
| 
| 
| 


умеете. 


ТУ 

"ЕВУР& Тьгее Твоцзапа ВС”. 

(Егинет. 3000 лет до н. 5. ) .| 

На этот раз Вас забросили в| 
историю еше дальше. На календаре 
трехтысячный год до нашеи эры, 
Древний Египет. Выбравшись из ве- 
ликой реки Нил, подойдите к пира 
ниде. Не правда ли, войти туда не 
удается? Как будто неведомая сила 
отталкивает Вас от входа. К счас-| 
тью, ‘в карманах завалялся револь- 
вер и пары выстрелов достаточно, 
чтобы разнести дверь в шепки. Те- 
перь путь свободен! Мы попадаем 
В пирамиду и спускаемся вниз. 

Главный мотив этого уровня - 


+3 


лабиринт. Отсюда пути ведут в 
|разные стороны. Слева - четыре 
| ниши, в каждой из которых начина- 
иется своя часть лабиринта, а 
|справа от развилки - пятая, Кото- 
|рая откроется после прохождения 
|первых четырех ветвей. На каждой 
|ветви Вы найдете по одному энер- 
|гетическому шару и по одному 
| древнему предмету - артеФакту. 

| Начнем свое исследование с са- 
|мого левого хода. Сразу подберен 
первый шар. Уворачиваясь от ос- 
трозаточенных маятников и вскрРы- 
вая по пути сундуки и сосуды до- 
беремся до первого артефакта. 

| Вернувшись назад, пойдем во 
|вторую ветвь и бехим направо. 
|Здесь по шару надо выстрелить из- 
далека. Близко не дайдут подойти 
острые шипы, торчашие из пола. 
Впрочем, после того, как шар упа- 
|дет, шипы задвинутся обратно. За- 
|бираем его и в левом тупике вто- 
|рой ветви берем второй артефакт. 

| В третьей ветви у Вас есть 
интересная возможность восстано- 
вить все жизни своего героя. Это 
делается с помошью магического 
креста. Надо использовать. его, 
йстоя под изображением аналогич- 
|ного креста. Стойт время от вре- 
|мени приходить сюда на "подзаряд- 


ТНЕ ОАЯК. 
МИНЕЕЕ _ 


должение. 
Начало см. в 1Х-РЕВЮ-9г, 
175-176, 218-220, 262-264. 


СТР. 
ГЛАВА 5 


| Выход из подпространства как 
всегда сопровождался тошнотой, 


Легкая дрожь охватила тело. 
перед ними, на ПРИЛИЧНОМ 


он 
свёр- 
Тусклое 
этой системы находилось 
неподалеку. Умирающая звезда с 
ТРУДОМ проливает красный свёт на 


|ппланеты не в силах остановить 
‚этот неумолимый процесс старения 


галактики, 
Да, Ксезавр превратился в нир, 
ив котором уют и тепло ценятся 


|превыше всех благ на свете. Вот 
Где они получат достойную цену за 
|те шанаскилские меха, которыми 
загружен их корабль, 

Как обычно, все шло по раз и 
навсегда установленному порядку: 
|Подходит к концу еше один скучный 
| торговый рейс. Элиссия сладко 
зевнула, а Алекс ввел занеренные 
координаты в автопилот и пригото- 
|зился убить время, необходимое 
для скучного подхода к планете. 
однообразный, установленный 
К Которому Алекс уже 
привык: выход из подпро- 
'странства, медленный перелет, 
Ишвартовка у станции "Кориолис", - 
| и не на что смо- 


у ий 

как и в прочих ветвях, здесь 
Вы также найдете энергетический 
шар и артефакт. 

Четвертая ветвь довольно прос- 
та, стоит опасаться только шипов 
в полу. Берен шар и артефакт, по- 
сле чего возврашаемся на развил- 
ку. 

Вы увидите, что изображение 
глаза в пятом проходе начало мер- 
цать. Встаньте на это место и ис- 
пользуйте такой хе предмет, как 
и глаз - попадете в начало длин- 
ного туннеля. После тяжелой борь- 
бы Вам удастся прорваться к 30- 
лотону саркофагу. Здесь надо вы- 
ложить все четыре артефакта и 
тогда Вы встретите основного про- 
тивника - огромную золотую маску 
Рамзеса. Победить ее можно с по- 
ношью припасенной ранее головы 
Фараона. 

Дальше все просто: взять пос- 
ледний шар, найти телепортер и, 
собравшись с цухон, переходить на 
следующий уровень. 

ПРИМЕЧАНИЕ: на четвертом уров- 
не следует как ножно чаше пере- 
двигаться прыжками, а не бегом. 
Здесь много мест с падающими сте- 


шей быстротой раскачиваться, 
маятники. 


У 
"рие! и1{н Ратегоп” 
(“Дуэль с Данероном") 

Все дальше и дальше мы проНИ 
каем вглубь времени. Уже не видно 
и людей. Вот и Земля куда-то про- 
пала. Мы летим в бесконечном кос- 
носе. Неожиданно перед нами под-| 
нимается злой денон времени - ан- 
гел Хаоса Дамерон. Теперь понят- 
но, кто виновен во всех неполад-| 
кая, Ничего не остается, как сра- 
зиться с ним. Победить его не 
Просто. Уворачиваясь от летятих 
В Вас огненных шаров и ‘ттательно| 
прицеливаясь, Вы порахаете дане-| 
Рона в единственно уязвимое мес- 
то - туда, откуда вылетают его 
шары. 

Но он не погиб, Потеряв значи-!| 
тельный кусок своего тела, он пе-| 
рестраивается и продолжает извер-| 
гать смертельные заряды. Снова и| 
снова отбиваете Вы от него кусок! 
за кускон и, наконец, враг повер-| 
жен, | 
Так заканчивается Ваша истори- 


нами, с шипами в полу, с острыми ческая миссия. Ткань времени вос- 
секирани, которые при би же становлена, цивилизация спасена! 
ВДРУГ "Кобра" вздрогнула, эхон экране, Алекс нацелил ракету. 
в боевой рубке отозвался скрежет С приближении вражеской ракеты] 
разрываемого неталла. оповестил экран, вспыхнув сообше- | 
- У нас компания, - вскрикнуя нием об опасности, впрочем Алекс! 
Алекс. видел ее и так. он немедленно 
Элиссия очнулась от сна и за- привел в действие систему ЕСМ и 
хлопала удивленныни глазами, после тонительных секунд ожидания 
стряхивая остатки дреноты. она ракета исчезла в жаре и пламени. | 
поняла ситуацию в мгновение ока, ТРЯхНУЛО Корпус и Алекс нырнул! 
но осталась неподвижной в своем вниз. Краем глаза он успел заме- 


кресле, Алекс был у консоли и уже 
владел ситуацией, 

В какой-то степени его поймали 
врасплох. И дело вовсе не в эле- 
нентарной невнимательности. Дело 
в том, что атакующие корабли ока- 
зались необычно близко к точке 
выхода из гипертуннеля. Более то- 
го, они занимали положение между 
объектом своей атаки и солнцем, 
так что какое-то вреня оставались 
невидиными и имитировали при этом 
движение астероидов, беспорядочно 
кувыркаясь и дрейфуя в простран- 
стве, 

Алекс в общем-то их видел, 
проигнорировал и теперь 


но 


"Кобра" приняла на себя первый 
зали. 
ПРОТИВНИКИ СГРУППИРОВАлись 


сзади и образовали боевой поря- 


док. Непрерывно сканируя прос- 
транство, Алекс набирал макси- 
мальную скорость. 

— Вот они. . 


вновь заскрежетали энергети 
ческие шиты, на которых заиграло 
лазерное пламя очередного залпа. 

- Лучевые лазеры! Да, эти ко- 
рабли неплохо вооружены, - поду- 


мал Алекс, - но и наша "Немезида" 
теперь им не уступит! 
"Немезида” - такое дранатичес- 


кое имя древней богини мести дали 
Алекс и Элиссия своему кораблю. 
Алекс включил экран заднего 
обзора, подогнал прицельный квад- 
рат и дал две коротких вспышки из 
новехонького кормового лазера. 
Корабли ПРОТИВНИКОВ сломали 
СТРОЙ и разошлись, один из них 
и пока враг был на 


его 


.Он нажал на пусковую клавишу, | 


тить сброс энергии защитных экра- 
нов в первый энергетический отсек 

Элиссия спокойно сидела в сво- 
ем кресле. Адекс уверенно владел 
ситуацией. Прямо перед ними стре-| 
мительно нарастал диск планеты. 


Казалось, что он то взлетал, 
падал, врашаясь при этом с голо-| 
вокружительной скоростью - это | 


Алекс маневрировал, занимая наи- 
лучтую боевую позицию. 

он действовал почти инстинк- 
тивно. Резко развернув свой ко- 
рабль, он вдруг решительно бросил] 
его навстречу ближайшену  пресле-| 


ленс". 


чем, может быть и нет... для со- 
держания такого оборудования не- 
обходима куча денег, а этот ко- 
рабль уже многое повидал на своем 
веку. 

Сблихаясь с пиратом, 
шил применить ракету. 
борту было четыре ракеты, 
одна из них уже бала нацелена. | 
"Кобра" вздрогнула, смертоносный | 
снаряд пошел к своей цели. Она| 
нашла ее и "Фер-де-Ленс" букваль-!| 
но исчез. 

“Может ушел в гиперпереход?" - 
подумал Алекс, - "Вроде не похо-| 
хе". На самом деле он проскочил! 
мимо противника и теперь, включив 
задний экран. увидел огромное от-| 
ливающее сереброн облако, быстро 
расширяюшеёся навстречу звездам. 


7 Отличная стрельба! - вдохно- 
венно откликнулась Элиссия. 
| Из облака пепла и металла про- 
АСТУПИЛИ КОНТУРЫ ДРУГОГО КОРабля и 
| 


Алекс вновь‘ ушел в петлю. Новый 
"лазерный заряд принял на себя 
КоРМОВОоЙ экран. Теперь, когда 
охотник знал, что его жертва об- 
ладает системой подавления ракет, 
|он решил "сесть на хвост" и доби- 
| вать ее лазером. й 
Это тоже была "Кобра". Грузо- 
приемники широко распахнуты,  го* 
товые подобрать контейнеры с дра+ 
пгоценным шанаскилским мехом раз: 
|битого торговца, 
Но у Алекса на сей счет были 


- Не надо, побереги ее, - с 
сожалением вздохнула Элиссия. 

- Я знаю, но нам хватит денег 
]на замену, - сказал Алекс. 

- Тогда не хватит на энергоза- 
борники, - напомнила Элиссия и 
оба от души расхохотались. В та- 
кое время они думали о новых по- 
| купках! 
| До станции с ее системной обес- 
печения безопасности оставалось 
|еше слишком далеко. Алекс сцепал 
Крутой вираж к солнцу и резко 
сбросил скорость.’ Преследователь 
идеально повторил первый маневр, 
|но на несколько секунд запоздал с 
заторно- 
| что 
| Произошло, а охотник и жертва уже 
поменялись местами. 
| - Давай, Алекс, давай! - кри- 
|чала в восторге Элиссия, а Алекс 
Ивгонял один за дРУГИМ лазерные 
| заряды в тело вражеского корабия. 
|"Кобра” на экране крутилась и из- 
но Алекс не думал, 


У Элиссии перехватило дыхание 
| она в восторге смотрела на юно- 
ишу, уверенно державшего в руках 
|их жизнь и судьбу. 
Еше через мгновенье все кончи- 
Пират взорвался, энергии 
завитных полей не удалось 
|сдержать такой натиск. Алекс ус- 
|пел увидеть мелькание спасатель- 
ной капсулы и на мгновенье вспом- 
|нил ту вспышку огня, которая уни- 
чтожила его собственный корабль, 
Пон вспомнил гибель родной "Авало- 
инии". 
ЕГО первой реакцией было бро- 
полунав, он 


|идеи. А вокруг сверкали и КУВЫР- 
|кались ` контейнеры с разбитого 
корабля. 

- Подумать только, какая жа 


лость, что у нас до сих пор нет 
ГрУЗОоЗаборника! с пробурчала 
ИЭлиссия. 

И - Зато мы получим премию за 
пиратов, - ухмыльнулся Алекс, - и 


ты был великолепен. 
тобой между звезд - 


Исказал ни слова. Они даже не упо- 
у тот Факт, что это было 
первое настоящее сражение, кото- 
Йрое он провел без ее помои. 


ГЛАВА 6 

Они уже торговали в течение 
трех месяцев и теперь в "Немези- 
де” трудно было бы узнать ту “Ко- 
бру", которая когда-то была над- 
Ггробным камнем Генри Белла. По- 
крашенная, расцвеченная опознава- 
тельными знаками, оснашенная но- 
выни боевыми надстройками, ‘она 
все более и более походила на 
боевой корабль. 

Три месяца торговли и ни на 
час Алекс не забывал о главной 
цели своей жизни. Кто-то или что- 


то. замаскировавшись под мирного’ 


торговца, убил его отца и сделал 
это преднамеренно. Да, его отец 
вел сложную жизнь и, согласно не- 
писанной галлактической традиции, 
сделал все возможное, направив и 
сына По тому же пути. И Алекс 
Райдер оправдает веру отца. 

Вопросов Перед Алексом возни- 
кало не меньше, чем боли и гнева, 
То же состояние переживала и 
Элиссия, хотя она, как й все жен- 
шины Теорга, редко проявляла свои 
эмоции. Тем не менее, Алекс чув- 
ствовал кипение Горячих чувств 
под холодной внешней оболочкой. 

У них была общая задача. Они 
должны были выжить, стать сильны- 
ми и отомстить. Им предстояло 
долго вместе ждать и оба понима- 
ли, что лучшего и более молчали- 
вого партнёра для своей цели ин 
не найти. В то же время, им обоим 
было нелегко... 

Встреча с пиратами немного по- 
вредила кораблю. Здесь и там по- 
страдала краска, Разболтались 
некоторые панели облицовки. боевых 
надстроек. Это означало необходи- 
мость посешения станции обслужи- 
вания. Впрочем, этой возможностью 
стоило воспользоваться, поскольку 


им, как победителям пиратов, этот 
сервис полагался бесплатно, 

Это сражение для Алекса было 
первым самостоятельно выигранным 


боем, Но это был не первый их 
бой. Если 6ы Элиссия не скрыва- 
лась, она вполне имела бы право 
подавать заявку на равг "Опас- 
ный". А так как ей приходилось 
сохранять свое инкогнито, все 
победы заносились в реестр Алек- 
са. Сегодняшний бой Алекс воспри- 
нял как значительный шаг вперед и 
впервые у него появилось чувство, 
что он по-праву носит тот ранг, 
который ему ПРИСВОЙЛИ благодаря 
успехам Элиссии, 

Он направил свой корабль 
ВНУТРЬ тысячекилометровой — зоны 
Над поверхностью планеты и ее 
диск заполнил собой весь экран 
переднего обзора. Корабль развер- 
нулся на самой малой скорости и 
медленно вратающийся металличес- 
кий куб засвёркал перед нини - 
Планетная станция с распахнутым 
зевом приемного отсека. 

- Кстати о стыковочном компью- 
терРе. ., начал было Алекс, урав 
нивая скорости вращения корабля и 
станции. 

- Пустая трата денег...- пре- 
секла его попытку Элиссия. - Если 
ты не можешь стыковаться так, 
чтобы не ободрать краску с бор- 
тов, тебе вообще нечего делать в 
космосе. 

Алекс был прекрасным пилотом, 
но вход в приемный отсек станций 
типа "“Кориолис” был его самым 
слабым пунктом. Он, конечно, сде- 
пал это и на сей раз, но вздохнул 
спокойно только тогда, когда ко- 
рабль, вошедший в ПРОСТОРНЫЙ ан- 
гар, был подхвачен магнитным на- 


` незамысловатых безделушкая 


НИПУЛЯТОРОМ И ПРИТЯНУТ К свобод- | 
ному стапелю. Тут же ‘стыковочная| 


Пока Элиссия как обычно прята- 
лась в спасательной капсуле, | 
Алекс с интересом расснатривал 
кубическое внутреннее простран- 
ство станций: таможенные, поли- 
цейские, рекламные корабли, ре- 
монтные модули, - все это мед- 
ленно перемешалось в пространст- 
ве. У каждого свое дело, каждый 
знал свой бизнес. 

По каналам автокона Алекс ло | 
ложил о грузе на борту и получил| 
подтверхдение регистрации победы| 
над пиратами и свидетельство на-| 
числения призовых тридцати кре-| 
дов. Это как раз то, что нухжно| 
для покупки новой ракеты. | 

Когда все Форнальности прове 
РОК и перепроверок были законче- 


Им удачно удалось купить 
ханную всего 
само собой разумеется, 
собирались использовать ее пой 
назначению. 

Теперь начались обычные торго- || 
вые процедуры. Сначала продажа, | 
затем обсуждение очередного рейса! 
и, наконец, покупка нового това- || 
ра. 


Торговля во нногом напоминает! 
игру. При известном спросе и быс- | 
ТРОН Обороте всегда можно полу- 


для 
богатых. Но непрерывно возрастаю- | 
шая стоимость обслуживания кораб- | 
ля и потери от периодических сты- 
чек очень скоро съедают эту скро- 


МНУЮ, с таким трудон полученную 
прибыль, после, чего все предприя- 
тие становится практически бес-| 


смысленным. 
иные 


ценах 
связи следует очень тяжелое нака-| 
зание. 
Естественно, цены нестабильны. 
во всех системах, даже в самых| 
бедных, орудуют сети спекулянтов. 
Еше вчера за тонну пустореснични- | 
ка, купленного на Реортв за три! 
Креда давали на Цейнзийе по во-| 
семь, а сегодня с трудом покупают 
всего за два. И дело восе не в 
том, что спрос на пустовесничник 
сократился. Просто банда слеку- 
лянтов сыграла свою игру и пой 
няла рынок. | 
до сих пор Алексу и Элиссии| 
везло. Они перевезли варгорнские | 
шелка от Рексебе на Инеру и удво- | 
или свою первую сотню кредов. По- 


несту назначения с удивлением об-| 
наружили, что всепланетная мута- 
ция изменила вкусовые железы оби- 
тателей... и поставила последних| 
перед проблемой поиска новых де- 
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ликатесов. Достаточно ‘близко под- 
ходили для этой цели ароматичес- 


Переброска оборудования из вы- 
сооразвитых миров в среднеразви- 
тые оказалась весьма прибыльным 
делом, Алекс и Элиссия быстро 
поняли также, что на развиваюних- 
ся промышленных планетах всегда 
мохно иметь хороший доход от тор- 
говли предметами роскоши. Но са- 
мой прибыльной обешала стать опе- 
Рация с продажей шанаскилского 
меха на Ксезавре. Они купили ‘его 
по тридцать кредов за тонну и 
сейчас Алекс в нервном напряхении 
ожидал ответа на запрос биржевых 
сводок по нехам. 

Он не удержался и в триумФаль- 
ном жесте вскинул руки, когда по- 
что они с Элиссией уТРОИЛИ 
свой капитал. На зтот раз ин 
улыбнулось настоящее счастье. 

Мех они продали без проблем и 


свои стандартные 
Алекс 


Топливо ‘и совершенно 
энергогрузозаборное 
Устройство обходились в пятьсот 
двадцать пять, а энергетическая 
бомба стоила еше вдвое больше. 
Конечно, энергозаборники обе- 
шали большую экономию. Ножно бу- 
дет в дальнейшем не тратиться на 
горючее, а пополнять баки, под- 
питываясь от звезд. Это было ко- 
рошее вложение, даже при том, что 
пены здесь были на сотню выше, 
чем обычно. Алекс заказал одно 
устройство. На доставку и монтаж 
уйдет примерно двадцать часов 
{один стандартный день). Заправив 
корабль, Алекс приступил к изуче- 
нию списка Ксезаврианских делика- 
тесов. У них еше оставалось трис- 
та двадцать кредон - сумна, с ко- 
торой чувствовать себя было не- 
УЮТНО. С ДРУГОЙ СТОРОНЫ, Корабль 
имел дополнительную энергетичес- 
кую зашиту, лазеры с четырех на- 
правлений, полный боекомплект ра- 
кет и грузозаборник, Пройдено 6о- 
лее половины ПУТИ преврашения 
Торговой "Кобры" в боевой крей- 
сер. 
Элиссия тохе внимательно изу- 
чала список. Удивительно, но ксе- 
заврианцы, больтие любители экзо- 
тики, мало что могли предложить 
в этом плане. Так, например, все- 
го два вида наркотиков было на 
рынке: арктурианский лопнитрав и, 
как ни странно.., табак. Алексу 
было над чем подумать. 
- Думаю, что с табаком ножно 
было бы попробовать. .. 
- Не-а, - промолвила Элиссия. 
Никотин смертелен в 


- Все равно опасно. 

Широко предлагались минералы, 
но цены были не те. дюрасьон - 
руда, из которой после очистки и 


по восьми за тонну. 
тельно хорошо продается на Лейве, 


но до Лейва отсюда столько свето- 
вых лет! Не подкодит. 

Драгоценные . камни? Предлага- 
лись каштанит и серебристый спек- 
тонал. Еще были красно-зеленые 
эмеронды. Но пираты учуют такую 
добычу даже за пару световых лет. 

Чисто из любопытства Элиссия 
обратила внимание на продаху дву- 
хсот окаменевших костей дироно- 
Факсаурина по сорок кредов за 
ШТУКУ. 

- Когда нибудь слышал о них? 

Алекс ответил: - Даже видел 
одну в музее у себя дома. Они жи- 
вые и поют, Им более сорока мил- 
лионов лет и, тем не менее, они 
поют. Непонятно, чего они хдут. 
То ли им нужна какая-то наседка, 
то пи шдут изменения климата. Это 
тазовые кости, так что возможно, 
что они служат чен-то вроде инку- 
бационной камеры, но толком никто 
ничего не знает. 

— А они ценятся? 

- Очень, хотя точную цену я не 
знаю. 

- Проверь по списку запрешен- 
НЫХ ГРУЗОВ. 

Алекс проверил. Никаких из- 
вестных ограничений на импорт 
этих окаменелостей он не нашел. 


- Кажется, это интереснее, чем 
еда. 

- Это ух тбчно. 

- Так берем..? 

- Пожалуй. .. 

Но не гепел Алекс набрать на 
клавиатуре заказ торговому цен- 
Тру, как вспыхнул экран “Получено 


сообшение. ..”. ` 

- РейФ, - радостно сказал 
Алекс. Элиссии тоже понравилась 
перспектива повидать РейФа зетте- 
ра и поговорить с ним еше раз. 

Но вовсе не старый космический 


торговец появился на экране, ког- 
да Алекс вышел на связь. 
Изображение на экране явно 


принадлежало человеческону сущес- 
твУ, а не гунаноиду. Но его лицо 
не поддавалось никакому описанию. 
ЕСТЬ масса способов изуропсвать 
человека до неузнаваемости и пре- 
вратить его в подобие ночного 
кошмара, например пролететь слиш- 
ком близко от звезды, слишком 
часто подвергаться воздействию 
нехзвездного вакуума, поработать 
в некоторых рудниках... Но сей- 
час, глядя на бугристые серые 
опухоли, покрывающие плоть чело- 
веческого лица, Алекс не мог себе 
даже представить что произошло с 
его собеседником. 

Губы, как обрывки паутины, за- 
трепетали на серой плоти. Скеле- 
тообразная скрюченная рука, 
СКВОЗЬ КОТОРУЮ ПРОСВеЧИвали крас- 
ные кровеносные сосуды, коснулась 
тонкой пряди волос, ПРИЧУДЛИВО 
спадавмей с деформированной голо- 
вы. 

- Ты Райдер? 

По крайней мере, голос был 
нормальным и притом мужским. 

- Назовите себя. 

игнорируя вопрос, незнакомец 
продолжал. - Чем сегодня торгуешь? 
Нинералы? Специи? 

- А Вам зачен? 

- Не знаю твоих планов, но что 
бы ты ни делал, у меня есть для 
тебя предлохение получше. 

- Не стал бы с тобой торговать 
даже ради спасения от суперновой. 

- А Рейф Зеттер бы стал. Чего 
это ты такой нервный? 


- Ты знаешь Рейфа? - удивился 


‘мести не опасному, а смертовосно- 


Алекс, озадаченный упоминанием 
знаконого имени. 


- Ияи пол Вселенной. - Изу- 
РОоДОоВанный человек наклонился 
вперед. Черты лица заняли весь 
экран. - Это паразиты. 

- Не понял?! 

- Я говорю, это паразиты, - 


незнакомец прикоснулся к лилу. - 
Личинки пауков. Я работал на дик-!| 
СТре, где’ и пришелся по вкусу! 
этим червякам. Здесь их пара мил- 
лионов. Период инкубации примерно 
десять лет - это и будет моим 
концом. Хотел бы я быть на тор- 
хественном обеде у своего недру-1| 
га, когда меня разорвет, но так! 
ТРУДНО Все Точно рассчитать! В 
общен, парень, я не виню тебя за 
то, что ты мне не доверяешь, но 
не надо судить только по внешнос- 
ти, Алекс. Ты ведь Алекс, не так 
ли? Я имею в виду, скажи ради 
бога, туда ли я попал? 

- Да, я Алекс Райдер. 

- Ая Патрик Нак Греви. Я хочу 
сказать ‘тебе только две вещи. 
Первое: убей змею. Прилохи это 
привидение, которое преследует 
меня целых пять лет. Я не пилот. | 
Кто я, не имеет значения, но та- 
ких, как я, больше, чем подсол- 
нечных семечек, которые ты пере- 
вез за свою жизнь. Мы ядем воз- 
нездия и не можем получить его! 
сани. Убей змею и ты поможешь 
всем нам. 

Алекс не смог сдержать усмешки| 
на своем лице, хоть и понимал, | 
что менее всего сейчас пристало! 
улыбаться. Он чувствовал, что им 
манипулирурт. Им управляют, как 
запрограмнированным роботом, зас- 
тавляя ходить по замкнутому бес- 
смысленному кругу. Что проискодит 
ВОКРУГ него, Черт побери?! Еще 
ТРИ месяца назад его счет побед 
фиксировался только на инитаторе. | 
Краска на его лицензии еше не вы- 
сохла и, тен не менее, какие-то| 
силы выбради именно его. орудием 


ну ПРОТИВНИКУ, 

За ним наблюдают много людей и 
все они затаив дыхание чего-то| 
ждут. ‘Почему он?! Почему именно 
он?! И как сюда встраивается Эли-| 
ссия? 


- Хорошо, спокойно сказал он, | 
- Яя понял. Но ты сказал: "Две 
веши”. 

- Иненно. Скажи, это Рейф по- 


советовал тебе провернуть опера- 
цию с манаскилскин мехом, как 
только ты сножешь ее осилить? Я 
прав? | 

Он был прав. Это был один из 
последних ценных советов. РейФа, и| 
Алекс его не забыл. | 

Мак Греви продолжал: - Дав те-| 
бе такой совет, Рейф тем самым 
послал ‘тебя ко мне. Тебе нужно 
подковать свою клячу. Ты должен 
взять на борт что-то действитель- | 
но стоящее. Лети в Саут-Сити, 
найдешь центр частной торговли в 
комплексе Нагеллана. 

- Я уже подковал свою клячу. | 

- Это ты так считаешь. Тем не| 
ненее, лети ко мне. Не упусти хо- 
роший шанс. Саут-Сити, Комалекс| 
Нагеллана. .. 

Алекс колебался недолго. Он 
глянул на Элиссию. Пожав плечами, 
она кивнула, и Алекс принял пред-| 
пожение. 


{Продолжение следует). 


та 


РЕВЮ 


№3, №4 1999 


НКН “ИНФОРКОМ” 121019, Москва, Г-19, а/я 16 


внинанию читателей! 

С этого номера мы начинаем пуб- 
ликацир адресов пунктов, где Вы| 
нодете приобрести наши материалы: 

г. Воронеж. Студия компьютер- | 
НЫХ ИГР БАН-БАН. Магазин-салон 
“Электроника”. Тел. 14-00-73. 
г. Днепропетровск, ул, Шевчен- 
34. Фириа "экоС”. 
г. Нижний Новгород, ул. Горь- 
кого, 146. Маг.  "ФОТОЛЮБИТЕЛЬ". 
ИНА "Ф-ПЛЮС". Тел. 35-07-18. 


ко, 


Внинанию дистрибуторов! 
Адреса наших оптовых. покупате- 
лей публикуются бесплатно. 


СЛЕКТРУМ 
В ШЕОДЕ 


этот раз мы предлагаем учеб- 
|Ную программу по матенатике, но 
прежде, чем переходить непосредс- 
птвенно к програнме, остановимся 
|вот на каком вопросе. Выполните: 
ПРЕ1Т 10000000. На экране, как и 
| следовало ожидать, будет напеча- 
|тано: 10000000. теперь выполните: 
|РЕТНТ 100000000. Сейчас число ва 
экране выглядит иначе; 1+8. Вы 
|видите особенность вывода на эк- 
ран числовых значений большой ве- 
| личины, Для большинства случаев 


этот вариант подходит, а может 
быть и более удобен. Но прецс- 
|тавьте себе, что Вы создаете 


]} программу по бухгалтерскому учету 
или по математике и надо, К ПРИ- 
|меру, точно знать результат сло- 
|хения двух десятизначных чисел с 
точностью до последнего знака. 


| .Попробуйте выполнить ПРОСТУЮ 
|Бейсик-програнму: 
| 10 БЕТ А-100006001 

20 ТЕТ В-100000000 

30 РЕТНТ А; "-"; В; "="; А-В 


|на экране Вы увидите: 
1Е+8-16+8-1 


пА желательно было бы видеть: 
| 100000001 -100000000= 1 
посушествимо ли это? 
| В качестве прмера, показываю- 
|пего, как практически достигается 
}Ю такой результат, ны приводим 
|учебную програнну по математике, 
которая будет заниматься разлояе- 
нием чисел на сомножители. В тон 
`Йслучае, если число ни на что не 
пделится, то значит оно является 
Программа называется 
(что в переводе означает 
“простое число"). Ее можно ис- 
пользовать как для разложения чи- 
сел на соннокители, так и только 
для поиска простых чисел, для че- 
го в предлагаемой програнме пре- 
дуснотрен специальный режим. Нак- 
симальная величина числа, для 
которого можно получить результат 
1с точностью до последнего знака, 
равен 2 в степени 32, что состав- 
ляет 4294967296. 


Программа русифицирована по 


методике, приведенной в "#Х-РЕ- 
ВЮ"-9ё, Н1,2; стр. 29. Итак. текст 
програмны: 

1 60 ТО 100 

а СЬЕАВ 64599: ОАр "свг"СОрЕ 
54500 

4 ву 


5 ЗАМЕ "РЕМЕ”ЛИЕ 2: ЗАУЕ "с 
ВГ"СОБЕ 64600, 768: 5ТОР 
8 РОКЕ 23606, 88: РОКЕ 23601, 2 
ВЕТУЕН 
9 РОКЕ 23606,0: РОКЕ 23607, 60 
КЕТИВК 
20 РРЛЫТ #0; АТ 0,0; * 
НИЕ - ЛЮБАЯ КЛАВИША 
ОГО ЧИСЛА - 15РАСЕТ" 
22 РАЦЗЕ 0: 1НРИТ ; 
29 ВЕТОРН | 
40 ВЕТ Н-1ИТ (Н/1Е5) 
42 1Е НОТ Н ТНЕН РЕШТ м; : 


51: 


ПРОДОЛЕЕ 
ВВОД НОВ 


ВЕ 


РЕТНТ Н; (57$ (Н-165%«(Н-1)) 
(а то); р 
РАРЕК Т: ТИК О: С 
110 РОКЕ 23658, 8 

120 60 558 8 
130 РЕ1НТ АТ 
икА” 

180 РЕТЫТ АТ 
СОМНОЖИТЕЛИ" 
200 РЕТИТ АТ 
СОННОЖИТЕЛЕЙ" 
210 РЕТЯТ АТ 
ПРОСТЫХ ЧИСЕЛ” 
220 РАЦЗЕ 0: ТЕ 1НКЕУ$‹>"5” АНБ 
ТЫКЕУ$<>"Р” ТНЕК СО ТО 220 

300 ШЕТ 13=ГМЕЕУ$: С1.5 

500 1НРУИТ АТ 0, 0; "ВВЕДИТЕ ЧИСЛО 
<:4294961296 

"; 1: МЕТ ИЕ 

1000 РОВ 4=1 ТО 10 

1010 ГЕТ Н=Н 

1020 60 508 2060 

1030 ТЕ НГ ТНЕМН 60 508 20: 
1НЫКЕУ$=" " ТНЕН 60 ТО 500 
1040 БЕТ Н=И+1 

1050 МЕХТ Л: РЕШИТ 

1050 СО 508 20: ТЕ ТМКЕУ$ -"' “ТН 
ЕН 60 ТО 500 

1100 СО ТО 1000 
2000 ВЕЗТОВЕ 2800: 
№ 60 $558 940: ПЕ 
2010 БЕТ Р=0; ВЕТ 0-0 

2020 ЕОЕ В=0 ТО 52 

2030 РБАП 7: ГЕТ 0=0+2 

2160 БЕТ @=Н/Р: ТЕР 9<р ТНЕН 60 
ТО 2200 

2110 ТЕ 1$-"Р* АНБ О-1ЫТ О ТНЕН 
БЕТ Н=Н+1: ГЕТ Н-М: 60 ТО 2000 
2120 1Е 1$="5" АНУ О-ТЫТ 9 ТНЕН 


2, Т: "КАТЕНАТ 
$, 4; "РАЗЛОЖЕНИЕ НА 
12,4; "{5} - ПОИСК 


14,4; "[Р} - ПОИСК 


ТЕ 


Т# 1$-"5" ТНЕ 


РЕТНТ “-“ АМО НОТ Е; р; "="; : 
Е:1; БЕТ. Н-0: 60 ТО 2100 
2130 НЕХТ В 
2140 ВЕЗТОВЕ 2$00; `РЕТ В=4: НЕХТ 
В 
2200 ТЕ 13-"Р" ТНЕН 60 $08 40 
2г10 ТЕ НОТ Е ТНЕН РРНТ тк 2 
;" ПРОСТОЕ ЧИСЛО"; 
2гго 1Е ЕР ТНЕН 60 50В 40 
2300 ТНК 0: РЕТЫТ : РЕТОЮН 
2800 ВАТА г, 1. 2,2,4 
2900 РАТА г, 4, 2,4, 6, 2,6, 4, а, 4, 6, 
5,2,6,4,2,6,4,6,8,4,2, 4,2, 4,8, 6, 
4.6, а, 4,6, 2,6, 6,4. 2,4, 6,2, 6, 4,2, 
4,2, 10,2, 16 
АВТОСТарт програнны происходит’ 
со СТРОКИ ‘@, где загружается сим-| 
вольный набор, после чёго выполу! 
няется переход на начальную стро-| 
ку програнны. Фактическое начало 
ПРОГРаНМЫ - Строка 100: В строке 
120 проискодит включение режима 
САР$ 1ОСК, это позволяет упрос- 
тить опрос клавиатуры при помоши 
ТНКЕУ$. й 
После подготовительных опера-| 
ций на экран выводится главное 
меню программы, В КОТОРОМ два 
пункта: } 
"ПОИСК СОМНОЖИТЕЛЕИ” 
"ПОИСК ПРОСТЫХ ЧИСЕЛ” 


БЕТ 


нажав “5” или-“Р“, мы перехо- 
дин на СТРОКУ 300, где продолжа-| 
ется работа програмны. В перемен- 
ной 1$ запоминается выбранный ре- 
хин. В СТРОКе 500 предлагается! 
ввести исследуемое число. Анализ! 
его начинается в строке 1000. 
введенное значение числа присваи- 
вается переменной Н, которая яв-| 
ляется входной величиной для под-| 
программы С0 508 2000, которая! 
выполняет  пойск сонножителей и! 
вывод результата на экран. После 
этого програнма делает паузу. Те- 
перь, если нажать "5РАСЕ", можной 
вернуться к запросу нового чисна. || 
Если нахать любую другую клавишу, 
то анализ чисел будет продолжен 
со следующего числа (бодьшего ‘на 
1). То есть, ножно как анализиро- 
вать числа но одному, вводя их по! 
Запросу, так и анализировать нас- 
сив идуШших подряд чисел, введя 
значение начального числа. Вой 
ВТОРОМ случае вывод результатов 
будет производиться блоками по ‘10| 
чисел ‘определяется переменной | 
В строке 1000). После вывода  каж-!| 
дого блока результатов можно  на-| 
хатием "5РАСЕ" опять вернуться на 


45 


запрос нового числа, 
НУЖНО, 

перед вызовом подпрограммы 
2000, значение числа НМ присваива- 
ется временной перененной Н. Это 
необходино делать, так как в ре- 
зультате работы подпрограмны 
2000, значение ее БХОоДНОЙй цере- 
менной Н будет испорчено. 

Переменная гв подпрограмне 
2000 является Флагом, переключаю- 
шинся из О в 1 в ТОМ случае, если 
найден хотя бы один сомнохитель 
для данного числа, то есть если 
число не простое. Перененная 1 - 
это возмолные сонножители. Весь 
ряд сомнохителей получается путем 
увеличения очередного значения р 
на величину снешения, полученного 
Из СТРОК БАТА. Действительно, ес- 
ли попробовать получать значения 
2 при помоши ФОРМУЛЫ в строке 
2030, то получим числа возможных 
сомножителей: 2, 3, 5, 1, 9.., и 


если это 


так далее. Это ничто иное, как 
Ряд простых чисед. 
Строка 2100 проверяет, все ли 


вознохные сонножители проверены. 
Если все, то переход на строку 
2200 для вывода результата. Стро- 
ки 2110 или 2120 (в зависимости 
от заданного рехина) проверяют, 
делится пи исследуеное Число на 


МАЛЕНЬКИЕ 


ХИТРОСТИ 


Вы, 
Нногих программах 
*стилизованные” шрифты. 


видели. как во 
применяются 
Утолшен- 
ные, наклонные и другие разновид- 
носи придают програмнам особую 
привдекательность. Если для этой 
цели приненять загрухаеный сим- 
вольный набор, который занимает 
почти килобайт памяти, то требу- 
ется соответствующее вреня при 
загрузке програмиы, которая порой 
меньше, чем сам символьный набор. 
Ноэтому для получения орнгиналь- 
ых шрифтов ножно воспользоваться 


наверное, 


загрузки получается только в тон 
случае, есии используется син- 
вольный набор ПЗУ, ПОСКОЛЬКУ 
русский шрифт все равно приходит- 
ся загружать. Однако в обойк слу- 
чаях появляется возиожность раз- 
нообразить програниу, используя 
юдин базовый символьный набор и 
оригинально модифицируя его. Нап- 
Ример, в одном режиме работы 
программы вывод осуществляется 
Утолшениым шрифтом, в другон - 
накаонным, в третьем - готическим 
и’ т.д. Для этого ве надо загру- 
жать такое число символьных набо- 
ров, а все их ножно получить из‘ 
новного - базового, 


сомножитель без остатка. В режине 
анализа всех чисел, в тон случае, 
если делится без остатка, то зна- 
чит найден один из сомномителеи, 
Происходит вывод его на экран и 
установка Флага Е {строка 2120) и 
далее  выполияется продолжение 
анализа остатка от деления для 
поиска остальных соннохжителейя. В 
режиме поиска только простых чи- 
сел, заФиксированное деление без 
остатка говорит о тон, что это 
число не простое. поэтому даль- 
нейвий анализ не нузен и выподня- 
ется переход проверке следующего 
чисаа (строка 2110). 

Строка 2200 выполняет печать 
исследуемого числа и всех его 
сонножителей, если они есть или 
печать сообщения о том, что число 
простое. Собственно печать чисел 
выполняется подпрограмной 60 598 
40. Здесь, если число меньше, чек 
100000, то происходит обычная ‘его 
печать, а если больше, то печать 
выполняется в два приема. Сначала 
печатается то, что выходит за 
пределы 100000 (переменная н, 
строка 44), затем, для того, что- 
бы напечатать млаадыие разряды, 
ПРОИСЕОДИТ преобразование значе- 
ния числа в стринг. Поясним про- 
искодяшее на примере. Пусть нан 


нало вапечатать число 49000000027. 
Сначала берутся старшие разряды 


числа:  Н:40000. ‘теперь вычисля- | 
ется “остаток”, увеличенный вай 
100000, 


и происходит печать его! 
за старшими разрядами: | 


надо: 4000000027Т 
печать!: 40000 <- число 
печать2; 10002т <- СТРИНГ 
ны единица не вы-| 
водится, так как полученный! 


стринг печатается (г То). 

В заключение отнетим. что пос-| 
кольку програнна производит нно- 
гократные вычисления при поиске! 
сомножителей и рассчет выполня- 
ется в Бейсике, то получение ре- 
зультата для больших чисел нохет! 
занять достаточно продолжительное. 
время. Представьте себе, сколько! 
соннохжителей надо перебрать для 
того, чтобы убедиться в том, что 
десятизначное число является! 
простын! Напринер, для числа 
4294961291 - требуется 8 минут! 
Поэтому в качестве усовершенство- 
вания этой програнны мы ножем по-| 
советовать читателям попробовать | 
скомпилировать подпрограмну сок 
строки 2000 для ускорения выпол-!| 
нения вычислений. 


В качестве примера, поясняюще- 
го сказанное, приводим простую 
Бейсик-програниу, построенную на 
использовании машиннокодовых про- 
цедур в основе которых лехат опе- 
рации с  битани. Преобразования 
выполняются с символьным набором 
ПЗУ, но Вы можете использовать 
изйоменные принципы и для иодифи- 
капии загрухаемых ‘символьных на- 


боров. 

4 60 то 100 

8 РОЖЕ 23606,0; РОКЕ 23607, 11 
71: ВЕТОЕН 


9 РОЖЕ 23606,0: РОХЕ 23607, 60 
ВЕТОЮЯ 


` ада, 201 


40 ГОР п-64 ТО 121: РРТНТ СИЗ 
п;: МЕХТ п: РЕТТ *’: ВЕТОВН 

50 ВЕБТОВЕ 50: РОВ п-30000. ТО 
30029; КЕАО а: РОКЕ п.а: НЕХТ п 

55 БАТА 33,0, 61, 17.0, 118, 1.0, 3 
‚2ЗТ, 176, 33, 0, 116, 1Т, 0, 3, 126, 79, 
203, 65, {7Т, 119, 35, 21, 1ге, 119, зг, 


59 60 то 80 

60 БЕЗТОКЕ 50: РОБ п-30000 ТО 
30041: ВЕАР а: РОЖЕ п, а: НЕХТ п 

65 РАТА $3, 0, 61, 17, 0, 118,1,0,3 
‚ 237, 116, 33, 0, 118, 14, 96, 6,2, 126, 
203, 63, 203, 63, 119, 55, 15. 247, 6,4, 
126, 203, 63, 119, 35,16, 249, 35, 35.1 
3, 32, 231, 201 


Подпрогракна Со 508 60 создает утолщенный символьный набор: 


1530 2100302 10 #.#3000 
7533 110076 10 5Е.47600 
7536 010003 12 85. #0300 
7539 ЕБВО ие 
210076 10 #,.#7600 
110003 10 Е, #0300 
ТЕ ро А 
ЧЕ о са 
СВЗЕ ЗР. А 
в: © с 
;т.е. 
77 102 @.А 
2з тс не 
1в РЕС ЗЕ 
ТА 10 Ар 
вз 0 Е 
2024 Ле: н2. #75 
с9 ВЕТ 


; Переброска базового 
; символьного набора 
:в адрес 7600Н (30208) 
здля нодификации. 
: Начиная сначала, 
‚ного набора, 
; загрухается в аккумулятор, 
`; сохраняется в регистре с, 
:гается вправо на один пикселя и объеди- 
зняется по “ИЛИ” 
включенные пикселы так и.оста- 
;вутся включенными, 
‚те, которые получены путем сдвига. 
; Полученное значение записывается 
: Назад в символьный набор. 
Переход к следующей ячейке, 
; следующей линии символьного набора. 
;Проверха на достижение конца символь- 
;ного набора т.е. нуля в счетчике ри. 
1 ; Если нет, 
зЕсаи да, 


Листивг 1. 


кажлый байт синволь- 
т.е, каждая ливия символа 


затен сдви- 


с прежним значением, 


во включатся еше и 


т.е. к 


то повторение процедуры. 
то возврат в Бейсик. 


69 60 ТО. 80 
ТО ВЕБТОКЕ 10; РОР п=30000 ТО 
30035: `ВЕАВ а: РОКЕ п,2: МЕХТ п 
75 БАТА 533,0, 61, 17,0, 118, 1,0, 3 
‚ 2ЗТ, 176, 33,0, 118, 6, 96, 197, 35, 35 
‚35, 35, 6.4, 126, 19, 203, 63, 177,119 
‚ 35, 16, 247, 193, 16, 231, 201 . 
80 КАНРОНТ2Е 056 30000: 60 ТО 


40 

100 ВОББЕВ Т: РАРЕВ 7: КО: С 
ЕАК 29999: РЫТЕТ АТ 1,0; 

110 60 558 9: 60 508 40: с0 50В 
8 

120 60 З9В 50 

130 60 508 60 

140 Со 598 ТО 

150 РОКЕ 30027,0: РАСЗЕ 20: 60 
508 80 


160 РОЖЕ 30026, 59: РАЦЗЕ 20: 60 
Зов 80 
170 РОЖЕ 30021, 117: РАЦЗЕ 20: С 
© 508 80 
200 60 508.9 
После набора запустите прог- 


рачму конандой ВМ. Вы увидите на 
экране различные символьные на5о- 
ры (См. РИСУНОК). 


ФАВСОЕРСНТУКЕМНОРОАЗТИОЧХУ: 
арсче гэ9нт К (шпорагз 1ушхУу 
ФАВСОЕЕСНТ.КЕНМОРОВ 5" 

Фаьсче Р9БЕ К ‘епорагзтиуухч: 


ФЗВСБЕРЕБТИКЕ НУОРЯЯ 5ТООЧХУ. 
ЕаБСвЕХУ: ; А (врорчгатнуииху. 


ФАВСОРЕРЕНКЖАИНОРОЯЗТОЗЬХУ: 
фобсце гов ь 55 свора тЬчьхУ 


ЗАВСЬЕР СИ оКоМНОРОЯ Л Зои ХУ 
ВА ААА 


т 
ь 
ФРВСОЕРБНЕЛКЕНЫЮРОНУТ ИЛИХУЕ 
и 
3 
= 


мм 


Варсче (9НЕ А ЕПОРАСЕ {бЫыХу 
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© ок. аев:1 


Подпрограммы со строк 50, 60, 
70 - формируют в памяти ‘с адреса 
30000 (71530Н} и выполняют проце- 
которые 
символьный набор, 
После этого происходит вывод на 
экран Фрагнента полученного сим- 
вольного набора при помощи поди- 
рогранмы сс строки 49. 

Переключение символьных набо- 


вольный набор, а вторая - син- 
вольный набор ПЗУ. 
Рассмотрим подробно, что же 


происходит ПРИ работе блоков в 
натинных. подах с символьным набо- 
Ром, 


программы символьный набор, за 
счет смешения нихней части впра- 
во, получается как бы наклоненным 
влево. Некоторая мнодификащия этой 
програнмы, а именно, замена ко- 
манды ов С в ячейке Т54ВН, коман- 
дой НОР, позволяет получить толь- 
ко наклон символов, без 
расширения нижней части. Это вы- 


Полученный при помоши третьей ` 


готический: . 
210030 
110076 
9019003 
ЕОВО 

210076 
0Ебо 


те 
гр 
и 
у 9 
10 
ьр 
гр 
р 


При покоши подпирограмны С0 595 10 получается шрифт; напоминающий 


НЕ, #3500 
ПЕ, #7500 
ВС, #0300 


НГ, #7600. 
С, #50 
В, #02 
А 
А 

А 

НМ, А 
ну 
$71542 
В, #04 
А, (1) 
А 

(НЫ), А 
р 
#758 
нь 

ны 

с 

НС, #7540 


‚ ;Мовторение для второго байта. 


листинг_г 


‚Переброска базового 

‚свивольного набора 

:в адрес 1600Н (30208) 

;для модификации. 

‚Начиная сначала 

гдли всех символов сиив. набора 
берутся две вержних линии (г байта). 
‚Байт записывается в аккумулятор 

‚у; сдвигается вправо 

‚на два пиксела 

;и записывается назад в память. . 
; Переход к адресу следующего байта. 


{:Берутся четыре следующих линии. 
‚Байт заносится в аккумулятор, 
‚сдвигается вправо на один пиксел 
; и записывается назад в цамять. 

; Переход к адресу следующего байта. 
Повторение для всех четырех линий, 
Оставшиеся две линии из восьми 

; не изменяются. 

;Счетчик символов уменьшается на 1, 
‚Повторение цикла для следующего 

; символа. 

Возврат в Бейсик. 


Оригинальный шрифт. получается, 
нижнюю часть синвола, оставив верхнюю без изменения: 


210030 
110076 
010003 
ЕРВО 
210076 
9660 
с5 


23 
23 
23 
23 
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ТЕ 
ЧЕ 
5 
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м, 
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1ОРТ 
с1 
10ЕО 
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го 
гр 
о 
В 
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йн 
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тс 
тыс 
тяс 
ТАС 
ий 
о 
о 
5 
ов 


Г 
тыс 
р 
РОР 
рух 
РЕТ 


НИ, #5000 
РЕ, #7500 
БС, #0300 


НГ, #7600 
в, #60 
ры 


(НЫ). А 
НЕ, 
#7547 
вс 
#7540 


\ 
листинг. 3 
если утолщенной сделать только 


‚;Переброска базового 

; символьного набора 

:в адрес 7600Н (30208) 

: для модификации. 

:Начиная сначала 

;для всех синволов символьного набора 
; запоминание счетчика цикла ча стеке, 
:так как регистр В участвует еше 

;ув одном, внутреннем цикле. 

;Четыре верхние 

:линии символа 

; оставляем 

; без изменения. 

;Ццикл для четырех оставшихся линий. 
:Байт заносится в аккумулятор, 
‚сохравяется в регистре с, 

;‚ сдвигается вправо на. один пиксел 

:и объединяется с прежним значением. 
; (это выполняется аналогично 

; первой програмие). 

Полученное значение заносится в память 
:и переход к адресу саедуюмего байта. 
‚Пювторение цикла для 4-х НИМНИЕ линий, 
; Повторение дикла для всех остальные 
; символов сиивольного набора. 
;Возврат в Бейсик. 


‚полняется в строке 
сик-програнмы. Наклон ножно полу- 
чить и в правую сторону. ‘Дая 
этого нужно использовать в ячейке 
Т549Н внесто сдвига вправо ($81), 


сдвиг влево (51.А), 
ся в строке 160. 


ется, 


150 


что выполняет- 
Наклон вправо с 
расширенной нижней частью получа- 
если восстановить конанду 
ов С в ячейке т5АВН, 


сохранив ко- 


Бей- манду сдвига влёво в ячейке 
7549Н. Это делается в строке {70 

Этин, конечно, не исчернывают- 
ся возножности по модификации 
символьного набора. Ны только по- 
казали, как практически  мозно 
достичь простейших эффектов. Уве- 
рены, что читатели разовьют эту|. 
тему и придумают новые оригиналь- 
ные Варианты такой модификации. 


У 


стюзрте. Нк с 


Перевод с английского: 


пашорин в. и. 


1собы, 


гранме 1. 8. 


Чтобы 
О 


СТРОКУ, 
кодах. 


зовать, 


выполняеного 
1КЕУЗСАН) 


ен. 


При выводе ‘данных на экран 
весьна полезной пля вас может 
оказаться`одна процедура из ПЗУ, 
[находящаяся там по адресу 3654. 
Юна позволяет удалить заданное 
число строк с экрана, причем ‘от- 
счет строк начинается с 23-й 
|строки, т.е. |с ее помощью Вы ‹ мо- 
Пщете как стирать инфорнацию в 
Исистеннок окие, так и на основном 
экране. Пользоваться этой проце- 
дурой придется, по-видимому, 
Кочень часто. 

Перед вызовом процедуры необ- 
|ходино записать в регистр В число 
|удаляемых строк. Атрибуты экрана 
постаются такими, какие записаны. в 
систекной переменной АТТЕ-Р. Так. 
например. нижние две строки экра- 


ПРИМЕНЕНИЕ ВССЕМБПЕРЯ ДЛЯ СОЗДОНИЯ 
БыЫСсТрРОРАБОТающих ПРОГРАа„мы 
Продолжение. - те — 
| (Начало см. в“7Х-РЕВЮ-93" Н 1,2) листинг 1.8 
АДРЕС НАШ. КОД АССЕНБЛЕР КОНМЕНТАРИИ 
}  Оаканчивая рассмотрение вопро- окб гзт60 
(сов выдачи информации на экран, 23750 ЗЕ ЕО Л А, 253 ; Подготовка к открыванию 
ны должны еще обсудить вознох- . :канала. 
ность печати в нижней части экра- 23752 Ср 01 16 САМ, 5633 ‚Открываем канал “систен- 
т.е. в строках с номерани 22 . ‚ного окна конпьютера” 
23765 11 ЕА 5С 11) РЕ, РАТА :Апрес начала выводимых 
Для этого применяют те хе спо- ‚ данных. ` 
что были описаны выше для 23768 01 1Е 00 2 вс, 30 ‚длина данных с учетом 
вывода на гланаую часть  экрава. ‚ управляющих кодов. / 
Ютаичие состоит лишь в том, что 23771 со 3с го САМ, 8252 :Вызов процедуры ПЗУ для 
для вывода в нижнюю часть экрана ‚печати сообщения. 
|необходино открывать другой ка- МАТ ‚Начало процедуры "задерх- 
прежде чем применять команду ‚:ки”, аналогичной РАЦЗЕ 0. 
нечати рт 16. Как это сделать, 23774 75 НАСТ ;Прекражение работы про- 
‘показано в демонстрационной про- ‚пессора до прихода сис- 
‚темного прерывания. 
| Здесь для вывода в нижнюю 23715. РО СВ 01 бЕ ВТ 5, (1У+1) ;Проверка пятого бита сис- 
часть экрана сначала открывается ;темяой переменной Е1.Аб5. 
|канал с номерок “минус 3% (253). 23119 28 Е9 58 мт ‚ЕСЛИ ОН выключен- клавиша 
инфорнационное сообщение ;не нажималась, то возврат 
появляющееся после ;метку ЧАТТ. 
исполнения программы ке переме- 23781 Ер СН 01 АЕ `ВЕЗ 5, (1У+1) Если он включен, то вы- 
|стило выведенную нами на экран ‚елючаен его и продолжаем 
необходино иметь эквива- } работу. 
лент команды РАЗЗЕ О в нашинных 23755 с9 ВЕТ ‚Выход из процедуры. 
останов программы можно реали- ОАТА аг 00 10 ‚Аналог “АТ 0, 10° - 
если использовать коман- . 73 18 80 85 84 ‚Текстовое сообщение 
ду АССЕИБЛЕРА НАЕТ, которая при- 32 76 73 18 69 -  :"ТАРУТ СТЫЕ 0”, зависан- 
останавливает работу процессора 32 48 ‚ное в кодах А5С11. 
до очередного прерывания (до оче- 2г 01 10 ‚Аналог "АТ 1, 10“ 
Редного скавирования клавиатуры, 73 78 ВО 85 84 {Текстовое сообщение 
процедурой ПЗУ З2 76 73 78 59 ;"ТЫРУГ 11НЕ 1“, записая- 
для реализации конанлы, 32 49‘ ;ное в кодах А5Стт. 
паналогичной РАУЗЕ 0, необходино ь 
осле команды НАТ выполнить про- : 
верку состояния 5-го бита ‘систен- листинг 2. 1 
ной пёревевной Е\АС$, который АДРЕС НАШ. КОД АССЕНБЛЕР КОМНЕНТАРИЙ 
включается при нажатии произволь- овес 23750 
ной клавиши. Если этот 5ит сбро- 23760 ` 06 Тр 12 В, 125 ‚координата у:125. 
то выполняется возврат к 23762 бЕ 4в 0 С,75 :Координата :75, 
команде НАБТ, в противном случае 23154 Ср #5 22 САБ 8933 ‚Печать точки (125.15). 
программа выполняется дальше. 06- 23767 с9 ВЕТ ; Возврат. 
Ратите внимание на то, что здесь й 
гг-я строка считается вулевой а на могут быть очишены с помошью Пиксел, координаты которого! 
23-я - первой. следующей короткой програнны; равны 0,0, находится в нижнем ле-!| 


гр ва 
САМ, 3652 
ВЕТ 


2. КОМАНЛЫ РОТ, 
ВРАЧ и СТЕСЬЕ 


РОТ 

Команда РОТ х.у позволяет по-. 
ставить на экране точку {включить 
пиксел), координаты которой опре- 
деляются значениями х иу, а цвет 
зависит от установленного значе- 
ния ГИК, Координата х определяет 
номер стойбца, а координата У - 
номер строки той точки экрана. 
где будет включен пиксел. 


вом углу экрана, а пиксел с коор-1 
динатами 175,255 - в верхнем пра- 
вом углу экрана. й | 

для этой пели в ИЗУ компьютера 
имеется процедура РОТ. у которой! 
есть цве возможные точки входа, 

Первая точка входа ынеет адрес| 
$3933 ПЕС (22Е5 НЕХ}. Перед вызо-| 
вом этой процедуры по | команде| 
САШ. 89335, необходимо в регистр! 
В записать значение координаты! 
У (0... 115), а в регистр с - зна-й 
чение координаты х (0...255).1 
Иринер записи показан в програн-| 
ме а. 1. й 

Использование десятиричиых чи- 
сел вместо шестнадцатиричных мы] 
применяен только для того. чтобы 
начинающие читатели быстрее адац- 1 


48 


‘тировались к сути работы в машин- 
нон коде. Они более наглядны, ес- 
ли применяется раздельная загруз- 
ка регистров В и С. Однако, если 
записывать координаты сразу же в 
регистровую пару ВС, то лучше все 
же использовать шестнадцатиричные 
числа - при такой записи проше 
представить пололение пиксела на 
экране, 

Вторая точка входа инеет ад- 
рес 8924 ПЕС (г2грС НЕХ). При этом 
значения координат хи У должны 
быть предварительно записаны не в 
регистровую пару ВС. а на стек 
так называемого встроенного каль- 
кУлятора, причем’ значение у долх- 
но находиться на вершине стека, а 
значение х - под нин. 

Начинающим програмнистам надо 
сказать и несколько слов о стеке 
калькулятора. 

Для работы с действительными 
числами (числами с десятичной то- 
чкой) целочисленных регистров 
процессора явно недостаточно. Бо- 
лее ношные машины применяют для 
этого натематический сопроцессор. 
В “Спектруме" же реализован дру- 
гой, более удобный и дешевый под- 
ход - в ПЗУ внедрена обширная 
програнна-калькулятор, имеющая 
свою оригинальную систену команд. 
Когда Вы работаете в БЕИСИКе, 
калькулятор работает автонатичес- 
ки и для Вас все происходит неза- 
метно. При работе в машинном коде 
приходится пРрОоГРамнировать его 
ВРУЧНУЮ. 

основным местом для хранения 
исходных данных и результатов 
расчета калькулятора является его 
стек, котя кроме этого калькуля- 
тор имеет еше и несколько ячеек 
памяти. Подробно с использованией 
калькулятора Вы Ножете познако- 
миться в нашей книге 


Остается, правда, пока  откры- 
тым вопрос, а как же записать 
координаты своей точки на стек 
калькулятора? Очень просто. Для 
этой цели тоже используется про- 
дедура ПЗУ компьютера? Она нахо- 
дится по адресу 11560 РЕС (2028 
НЕХ). Вам нужно поместить хелае- 
мое число в регистр А процессора 
и вызвать эту процедуру. Число 
будет передано на стек. Чтобы от- 
править туда два числа, операцию 
надо сделать дважлы. Естественно, 
что то число, которое будет пе- 
редано последним и будет разме- 
шено на вершине стека. 

На первый взгляд кажется, что 
работа с первой точкой входа на- 
много удобнее, т.к. не надо ниче- 
го перебрасывать через стек каль- 
кулятора. Но это только на первый 
взгляд. На самон зе деле во про- 
граммах очень редко приходится 
чт-то печатать в заранее извест- 
ных координатах. Почти всегда 
программа сама и рассчитывает эти 


АССЕМБЛЕР 
08 23750 
1 А, 75 
САМ. 11560 


№ А, 125 
САМ, 11560 
СА, в9г4 
БЕТ 


листинг 2.2 
КОННЕНТАРИЯ 


;Координата к=Т5. 

; Поместили х на стек каль- 
;кулятора. 

; Координата у-125 
;Поместили ее на стек, 
‚Печать точки (125,715). 

; Возврат. ыы 


АССЕМБЛЕР 
ОВС 23750 
ГР А, 3 

ГО (1У+87), А 


го в,40 
10 с, 25 
САМ, 8933 


ХОВ А 
ЬО (ТУ+8Т), А 
КЕТ 


Листинг г. 3 
КОММЕНТАРИИ 


Включение двух нладших 
‚битов сист. перем. р_РЬАб 
;Координата =40. 
:Координата х-25 

‚Печать точки (40, 25)в ре- 
; жиме ОУЕЕ 1. 

‚очистка регистра А. 
:Восстановление Р_Р\.Аб. 

; Возврат. _ 


ОЕ 50 


АССЕМБЛЕР 
оеб 23760 

О 1, 64 

о н, 00 

АБО НЕ, НУ. 
АБП НЕ, НЕ, 
АБО Н, НЕ, 

10 БЕ, (23606) 


АБО ., БЕ 


гр в, 8 
`РУЗН Н. 
о с, 8 
10 А, 


РУ5Н ВС 


ЕО ВС, (С0ОЕР) 


ЕТА 


РОЗН АР 


В ВС, 23192 


10 (С00ко), ВС 


Листинг 2.4 
КОМНЕНТАРИИ 


{Номер символа "9"-64 БЕС. 
;Теперь в паре Н. число 6% 
:Уннохили его на 2. 
;умножили его на 4. 
;Унножили его на 8. 
;Загрузили в ПЕ адрес, на 
‚который указывает систен- 
‚ная переменная СНАЮ$. 
;Прибавили к нему "смеще- 
;нме" нашего символа от 
‚начала синвольного набо- 
‚ра, ранее вычисленное в 
‚регистровой паре Н.. 
‚счетчик строк в шабло-. 
‚не символа, равный 8. 
‚;Запоннили адрес начала 
‚шаблона на наминном стеке 
: Счетчик столбцов в шабло- 
‚не символа, равныя 8. 
Принимаем в аккумулятор 
байт шаблона символа. 
;Запонниля содержиное ВС, 
;чтобы освободить ВС кая 

; других дел. л . 
Ввод в ВС координат пози- 


: 
‚ротация регистра (А влево. 
‚Содержимое старшего бита 
‚при этом переходит во 
Флаг САХЕУ регистра Р. 
‚;Запомнили регистры А и Е 
‚на машинном стеке. 

Если Флаг САББТ выключен, 
:то точку печатать не надо 
;делаен обход печати. ° 

; Перед печать» точки запо- 
;минаем координаты. 


:Переход к очередному 
; стоябцу синвоаа. ) 
‚заномнили новую позвивно 
; печати. ; 


ВАА, 


координаты. Делается это с поно- 
шью встроенного калькулятора и 
потому взять результаты расчета 
со стека и использовать их напря- 
мую оказывается весьма удобно. 
Программа 2.2 показывает ис- 
пользование процедуры РОТ со 
Второй точкой входа 3924 ПЕС 
{220С НЕХ). Процедура РЬОТ снимет 


Числа на 
этом не сохраняются. 

использование калькулятора 6у- 
дет еше обсухлаться более подроб- 
но ПРИ рассмотрении  програмны 
2. 8. А пока расснотрим программу 
2.3, в которой показано, как в 
машинных кодах реализовать конан- 
ду 


стеке при 


РТОТ ОУЕВ 1; к. У. 

В этой программе перей вызовом 
процедуры РОТ необходино вклю- 
чить нулевой и первый биты сис- 
темной переменной Р-РЫАС (1У+8Т), 
а затек, после вызова процедуры 
РТОТ. восстановить прежнее значе- 
Если этого не 
сделать. то и все последующие то- 
чки и символы будут выводиться на 
экран в режиме ОУЕЕ 1, 

Включение режима ТНУЕЕЗЕ ана- 


$-ий биты системной переменной 
|Р-РЪАС, Т.е. надо записать в эту 
переменную число 1г. 

Используя точку входа 8933, ны 
ножен написать программу для 
построения символа в любом месте 
экрана по точкам. При этом код 
А5СТТ символа должен быть в диа- 
пазоне 32...127, а шаблон символа 
(его конструкция) должен быть 
задан в участке символьного набо- 
ра (сн. програнну 2.4). 

Чтобы определить, где кранятся 
КОНСТРУКЦИИ (Шаблоны) символов, 
слУхиТт систенная перененная СНАК5 
(23606 БЕС = 5С36 НЕХ). Тот ад- 
рес. который в ней хранится, ука- 
зывает на 256 байтов нихе, чем 
начало синвольного набора. 

В програмне г.4 код выводиного 
на экран символа записывается в 


синвола использовано по 8 байтов) 
и результат суммируется с числом, 


. Вы знаете, что первые 32 сим- 
вола (с 0 по 31) являются непе- 
чатныни, поэтому очень удобно, 
|Что СНАК5 указывает на 256 байтов 
нихе. чем вачало набора, т.к, 
благодаря этому они-то как раз и 
оказываются пропушенными 
(32*8=256). 

Теперь регистровая пара НГ, ис- 
пользуется как указатель адреса 
очередного байта, а регистровая 
вара вс - как счетчик эленентов 
иатрицы 8=8 битов, описывающей 
Форму символа. Здесь в В хранится 
номер текушего ряда, ав С- 


Предолхение листинга 2. 4 


НАШ. КОД АССЕИБЛЕР КОНМЕНТАРИЙЯ 
Е РОР АР ‚Восстановление пары АР. 
с! РОР ВС ‚Восстановление счетчиков 
:в вс 
ор рЕС С ‚Уменьшение счетчика 
; стоабдов. 
20 ЕЗ ЗЕ 2, 23718 Если он еше не обнулился 
‚возвращаемся для печати 
; соседней точки в ряду, 
с5 РОЗН ВС ‚Если же он равен 0, то с 
;этим рядом закончили и 
‚надо переходить к новому. 
;Сперра временно запомним 
; счетчики, 
ЕР 4В 0Е 50 Ьр ВС, (С00вр) ; Возьмем координаты. 
05 ЕС В :Уненьшим номер ряда, 
ЗЕ Р8 ГЛ А, 248 ; Число 218 - зто то же 
‚самое, что и "минус 8". 
81 АБР А, С ;В результате сложения из 
й ;содержиного С (коорд. я) 
; будет внчтено 8. резуль- 
‚тат оставлен в А. 
4Р ГР С.А ;Перенёсем его в С 
ЕР 43 0Е 50 Ш (СоОвЬ), ВС :;и запомним в переменной ` 
; СбОвр. 
с! РОР ВС ;Восстановияи счетчики ря- 
;дов и столбцов. 
вы РОР НЕ ; Восстановление указателя. 
гз тс нь ;Приняли из символьного 
‚набора коиструкцию оче- 
‚редного ряда. 
10 11 рум гз7та ;‚ Уменьшаем на единицу сче- 
:ТЧиК рядов в Ви если он 
‚еше не обнулился, то воз- 
‚ врашаемся назад. 
с9 ВЕТ :Ваход 
ОЕРВ 100 ; координата у-100 
ОЕРВ го ;кКоордината х-20 
листинг г. 5 
ВАИ. КОД АССЕМБЛЕР КОМНЕНТАРИИ 
Окс 23760 
о ь, 87 Новер символа “\"-87 БЕС. 


с9 


Е8 


4В 
8 


43 


11 


ОЕ 51 


_бЕ 50 


10 (60080), ВС 
РОР АР 
РОР ВС 
рЕС С 


ТЕ НЕ, 23778 


РОЗН ВС 
10 ВС, (С00вр) 


ГО (С0080). ВС 
РОР ВС 


РОР НИ. 


ТИС нь 
Ор 231174 


ВЕТ 


РЕРВ 100 
РЕРВ 20 


Этой пРОГРаммы соответ- 
ствуют програине г. 4. 
Переход к очередной стро- 
:ке экрана. 
;Запомнили позицию печати 
; Восстановление пары АР. 
Восстановление счетчиков. 
: Уненьшение счетчика 
; столбпов. 
Если он еще не обнулился, 
:возврашаенся для печати 
: сосещней точки в ряду. 
‚Переходя к очередному ря- 
; ду, запомнили. счетчики. 
; Возьием координаты. 
;Уменьщим номёр ряда. 
‚Уменьшение координаты 
:у на 8. 


: Строки 23762... а37т91 


‚; Запоннили координату. 
;Восстановили счетчики ря- 
:дов и столбцов. 
‚Восстановление указателя. 
; Очередной ряд: 

‚Уненьшаен на единицу сче- 
;тчик рядов в Ви если он 
‚еще не обнулился, то воз- 
; врамаемся назад. 

} Выход 


‚Боордината у-100 
‚Боордината х=20 
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номер столбца. Регистр А исполь- 
зуется для манипуляций с текушим 


например, одной из нани- 
пуляций является ротация байта 
влево конандой ВЬА, которая про- 
изводит циклическое смешение всех 
битов байта влево и перенос седь- 
мого бита во Флаг САВЕЯ. Если 
этот бит равен единице, то Флаг 
САВЕУ включается, следовательно 
будет включен и соответствующей 
пиксел на экране, если же бит ра- 
вен 0, то нё включатся ни Фааг, 
ни пиксел. Конанда ВЬА выполня- 
ется но 8 Раз для каждого из 8 
байтов, описываювих шаблон син- 
'вола. 

После каждой конанды ВЬА ко- 

ординаты очередного пиксела из- 
меняются. Начальное значение этих 
координат соответствует верхнему 
левому ‘углу матрицы 8*8 битов, 
храняшей Форму символа. Понятно, 
что при этон начальное знчение 
координаты у должно быть в диа- 
пазоне 7...175, а значение коор- 
динаты х ножет быть в диапазоне 
О...255. Если же это значение 
окажется больше, чем 255, то это 
равносильно тону, что значение 
равно 0,’ так как есии С=255 и 
выполняется конанда 16 Сс, то 
результат будет С = 0. 
Эта программа может быть легко 
модифицирована для вывода на эк- 
Ран символа, развернутого на 90 
градусов протиз часовой стрелки 
(сн. програнну а. 5). 

В этой программе начальные 
значения координат х, у соответст- 
вуют нижнену левому углу матрицы, 
кранящей Форму символа и иссле- 
дование байта идет не по горизон- 
тали, а по вертикали. 

С этого момента ны ножен прий- 
ти к очень интересным `решениям. 
дело в том, что одной из первых 
проблем, встающих перед начинаю- 


аким пользователем *Спектруна" 
является печать нестандартными 
шрифтами. 


почему компьютер печатает только 


6%8 и даже 
как например в программе 
®ТНЕ ВАТ \0ВО 2". Почену нельзя 
печатать символани 17Х18? Нохет 
быть для тех, кто пишет нрогранму 
ва японском языке это было бы 
очень удобно. 

оказывается, если Вы нечатаете 
из БЕИСИКА или из нашивного кода 
командой Е5Т 16 или процедурой 
которая опирается на ЕЗТ 15, 
Вы действительно ограниченн сис- 
темным требованием размера 8Х8. 
Так уж заложено в системных про- 
медурах ПЗУ. Но если Вы выполня- 
ете графическую печать, то есть 
как бы не печатаете свои ‘символы, 
а рисуете их по точкам, то можете 
обойти эти процедуры и создать 


5 О\УЯЕ 0: ТНК 0: РАРЕЕ 6: ВОЕ: 
10 БЕТ х=24: ЦЕТ у-=19: 


Листинг г. б 


3: ©1$ 


ТЕТ В=5: БЕТ м =ё: БЕТ а$-"5ТОР ТНЕ ТАРЕ" 


15 14Е 2: ВАНРОНТРЕ 058 32393: РАЦЗЕ 100 
20 1ЕТ 4-8: ЬЕТ уУ-150: БЕТ х=0: 1ЕТ а3-"РЕОТ* 
30 тк 1: 


КАНРОМТ2Е 958 32393 


250 РЕТНТ АТ 8,0; “Высота 1-22? 


: БЕТ у=140: 1ЫК 1: КАКООНТУЕ 958 32393 


“Ширина 1-52? ть 


"Х-коорд. 0-255? “, "У-коорд. 0-195? ___", “СООБЩЕНИЕ?",, 
У И О КН 

260 РЬТИТ ОУЕЕ 1; АТ 8,0; 2$ 

26г 1НРОТ В: РЕТНТ АТ 8,14; Ь;" ”; ОУЕВ 1; АТ 8,0; %3 

265 РЕЛЫТ О\УЕВ 1; АТ 9,0; 2%: ТЫРУТ м: РЕТИТ АТ 9,14; м: **; 


О\ЕВ 1; АТ 9,0; $ 
210 РЕТИТ ОУЕВ 1: АТ 10,0; 73: 
ОУЕВ 1; АТ 10,0;9$ 


ТНРУТ х: РЕТИТ АТ 10,17; х;" *; 


212 РЕТЫТ ОУЕВ 1; АТ 11,0; 2$: ТЫРУТ У: РЕТНР АТ 11,17; у;* 7; 
ОСУЕЕ 1; АТ 11,0; 53 
213 РЬТИТ ОУЕВ 1; АТ 12,0; 2$; АТ 13,0; 2%: МРОТ аз: 
РЕТИТ АТ 13,0; а$; : РОК К=ЬЕН а$ ТО 31: РЕШИТ # ";: 
КЕХТ К: РЕТНТ ОУЕВ 1; АТ 12,0; 9%; ОУЕВ 1; АТ 13,0; У 
215 РЕТШТ ОУЕВ 1; АТ 14,0; 2%: ТНРОТ 1: РЕТНТ АТ 18,0; 
ТНК 1; ОУЕВ 1; 1$ 
280 РАОЗЕ 50: (15: 1НЕ 1: РАНРОМТ2Е 058 32393: ЯКО 
300 РЕТИТ +0; АТ 0,0; *@ - конец работы"; АТ 1,0; 


”Прочие клавиши - повтор” 
310 РАОЗЕ 0: 
320 С1.5: 60 ТО 250 


ТЕ 1.КЕУ$-"9” ОР ТЫКЕУЗ - “9” ТНЕН 5ТОР 


свои, которые позволят Ван делать 
все. что захотите. 

Освоив способы вывода по точ- 
кам произвольного символа, ны но- 
жем перейти к нашей первой серь- 
езной программе, позволяющей вы- 
водить по точкам на экран в про- 
извольном месте целое сообщение, 
высота и ширина символов которого 
нохет быть выбрана нани. 

Эта програмна состоит из двух 
боков. Первый блок - 
ный, он выполнен на БЕЙСИКе, Т. к. 
от него не требуется быстродейст- 
вие. Второй блок - основной. он 
выполнен в нашинных кодах. Связь 
мехду блоками нухна для передачи 
основных параметров: 
ширина символов (н,м), начальные 
координаты сообщения (х,у) и само 
сообшение (а$). И эта связь осу- 
щшествляется благодаря тому, что 
эти параметры в БЕЙСИК-программе 
являются заданы пргранмными пе- 
ременными, а св подпрограмиу в 
машинных кодах передаются с по- 
мощью с’ помошью команд РОКЕ. 

Нохжет быть. Вы желаете исполь- 
зовать только программу нашмнных 
кодах, тогда БЕИСИК-програнну 
можно’ опустить, передавая при 
этон необходимые параметры прямо 
в область памяти, зарезервирован- 
ной для буфера принтера. это вы- 
гаядит более профессионально, но 
наличие БЕНСИК-програнмы позволя- 
ет упростить работу и дает чита- 
телю возмохность поэксперементи- 
Ровать с различными значениями 
выпеупомянутых параметров. 

Бейсик-программа приведена в 


настроеч- о. 


высота и. 


листинге г. 6. 

Блок в машинных кодах приведен 
в  дистингах 2.Т.1 - 
представляет собой 
версию програнны 2. 4. 

мМашиннокодовый блок включает в 
себя следующие процедуры: РИО, 
ЕТ, ЗТАБТ, РОТ и ЗЕЯР. Для про- 
стоты расснотрин ия по отдельнос- 
ти. 

Процедура Р1НО (32335 - 32380) 
приведена в листинге 2.7.1. Она 
выполняет поиск значения БЕНСИК- 
переменной по ее имени, которое 
должно быть предварительно зада- 
но. У нас имя искомой переменной 
задано в ячейке паняти 23728. 

Это нужно сделать для того, 
чтобы передать из БЕИСИКа в на- 
шинный код параметры х,у,в,м и 
сано текстовое сообшение. 

‘Сама по себе задача передачи 
паранетров из БЕИСИКа в машинный 
код - весьма интересная и важная. 
Дия этого существуют нного разных 
способов. Наиболее распространен- 
ный приен - через параметры Функ- 
ции пользователя ЕН () мы рассно- 
трели в нашей книге “Элементарная 
графика” (“ИНФОРКОН", М:, 1992г, 
&. В: ` 

Здесь С. Николс предлагает при- 
ен передачи параметров через БЕЙ- 
Сих-перененные. Вот их поискок и 
занимается процедура ЕН. Если! 
вам покажется сломнын то, как она 
это делает, значит Вы не впонне 
знакомы с Форматом К-пере- 
ненных, в котором они кранятся 
в паняти компьютера. Тогда посио- 
трите *7х-РЕВЮ-92” на с. 166. 
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Процедура 5ЕТ (32381-32392) 


приведена в листинге 2.7.2. Она 
СЛУЖИТ для ТОГО, чтобы передать 
параметры х, у, В, мч, разысканные 


процедурой ЕТНО в области БЕЙСИК- 

перененных в область буфера прин- 

{весьма удобное место для 
хранения данных, обычно ничен не 
занятое в компьютере. Эта область 
расположена всегда в адресах 
23296-23551). Сюда же передается 
и количество синволов в выводимом 
на экран сообщении, а также коды 
символов сообщения. Наша основная 
программа будет работать с пара- 
метрами, беря их из обдасти 6уФе- 
ра принтера. 

Выполнение машинного кода в 
программе 2.7 начинается с адреса 
32393. Это стартовый адрес пропе- 
дуры ЗТАКТ. Оча приведена в лис- 

тинге 2. Т. 3. Сначала (32393... 

32418) регистровая пара ВС опре- 
деляется в качестве указателя 6у- 
фера принтера, после чего вызыва- 
ется процедура $ЕТ для записи ко- 
да перененной в ячейку 23728. 
Затем (32419... 32442) определя- 
ется количество символов в пере- 
ненной 2$ и переписываются коды 
всех символов в буфер принтера. 
Процедура (32443... 32458) прове- 
ряет текущее значение координаты 
У. Если это значение будет боль- 
ше 175, то выполняется операция 
У-176 и новые значения координат 
х и у записываются в ячейки 
г3728/9 и 23296/Т. 
. Процедура РЬОТ (Листинг г.Т.4} 
представляет собой расширенную 
версию процедуры вывода символа 
на экран по точкам с добавлением 
циклов вывода на экран точки ви- 
|риной м пикселов в В строках под- 
ряд. у 

Обратин внимание на то, что 
здесь иеиспользуеные — “Спектру- 
мом” ячейки паняти 23728/9 служат 
для хранения текумик ‘экранных 
координат позиции печати, а не 
идя того, для чего они использо- 
вались в процедуре Р1НО. 


АССЕМБЛЕР 


АДРЕС НАЯ. КОД АССЕНБЛЕР КБОМНЕНТАРИЯ 
08 32335 й 
РИО 
32335 2А 4В 5С р НЕ, (2з62Т) ;2362Т - адрес системной 
; перен. УАЕ5, в которой 
‚хранится адрес, с которо- 
:го начинается разнешение 
‚перененных БЕЙСИКа. 
2 я 
32338 ЗА ВО 5С 0 А, (23728) ;Код имени БЕЙСИК-перемен- 
;вой. ` ь 
Згза1 ВЕ СР (Н) ‚Сравнение и выход, если 
згз4г св ВЕТ 7 ‚ переменная найдена. В №, 
‚остается ее адрес. 
32343 СВ бЕ ВТ 5, (Н.) :Есам пятый бит в имени 
32345 20 08 зв аа ; перененной равен нулю, то 
З2347Т 23 тс н. ; это дибо нассив, либо 
32348 5Е ГО Е, (НЫ) :; символьная строка. Нас 
32349 23 тыс м, ;они не интересуют. их на- 
32350 56 то р. НЕ ; до пропустить. Следующие 
32351 19 АБО НЬ, БЕ ‚два байта содержат их 
згз52 23 тс н, ‚длину. На нее ны и пере- 
; скакиваем. ‘ ь 
3гз53 18 ЕЕ 12 ‚Возврат на повтор поиска. 
м ь 
32355 СВ 76 ВЕТ 6, (Н.) :Если шестой .бит не равен 
згз5т го ос `В 7,13 :Нудю, то зто либо одно- 
:синвольная переменная, 
‚либо параметр пикла. Вы- 
:ясвии это, перейдя на 1,3. 
32359 23 тис в, Если хе это нногосим- 
3гз60 ТЕ ГР А, (Н) ‚вольная переменная, то 
32361 СВ ТЕ ВТ 7, (НЫ : пропускаем и ее и воз- 
32363 28 РА < 12, -6 ; врашаенся для дальнейших 
32355 11 06 00 10 ВЕ, 6 ; проверок на метку 1.2. 
32368 19 АБО НЕ, РЕ ; 
32369 18 р ле 12 ; 
Г3 
зг371 СВ ТЕ ВИТ 7, (Но) :Если седьмой бит равен 
згзтз 28 Еб 27. -10 ‚нудю, это односимволь- 
‚ная реременная (хоть и 
‚не нама. ) Вернемся на | 
;323655, пропустин 6 байтов!| 
ри повторим поиск с 12. 
32375 11 13 00 ЬО ре, 19 ‚Седьмой бит равен единице 
32578 19 у АБО НЕ, ГЕ ;- это. параметр цикла. 
у ‚ ;В этом случае пропускаен 
;19 байтов и повторяем 
32379° . 18 55 ет ^ ; поиск с 12. 


листинг г. 7. 1 


10 (237128), А 


СО 4Р ТЕ 


23 
23 
2з 


0 А, (НГ) 
О (ВС), А 
БЕТ 


Листинг 2.1.2 
КОНМЕНТАРИИ 


:;В стандартном ”Спектруме” 
‚ячейки 23728/9 не исполь- 
;зуются. Вы храним в НИХ 
;иня переменной (х,у,»...} 
;Поиск значения переменной 
; по ее имени. 

;За именем переменной в 
‚Бейсике кранится ее зна- 
:‚ чение в пятибайтной Фор- 
:ме. Для целых чисел не- 
зныших 255 это Форма: 


;Вот пля чего нужны три 
; команды 14С №. подряд. 
; Переброска паранетра в 
: буфер принтера. 

; Выход из процедуры. 


‚. завершает подпрограмну. Она ведет 


- Процедура 5Ё1Р (Листинг 2.7.5) 


учет изменения экранной коордива-| 
ты позиции ‘печати. В частности, | 
она осуществляет переход к следу- 
ющей строке, а когда достигнут! 
низ экрана (1>175), она выполняет! 
переход на первую строку за счет 
операции "у-1715”. 


Выще мы отметили, что в нроде- 
дуре ПЗУ РОТ имеется еше одна} 
точка входа по адресу 8924, с по- 
мощью которой нохно напечатать на} 
экране точку, координаты‘ которой| 
заданы на вершине стека калькуля-!| 
тора. Мы говорили о том, что это 
ножет быть удобным при печати 
результатов расчета калькулятора. 

Не углубляясь в подробности 
Работы процедуры сагси‘ТОВ, 


использует адрес 8924 для входа в| 
процедуру РЕЁОТ. 


АССЕНБЛЕР 


Ьр ВС, 23296 
ТО А, 120 
САМ, БЕТ 

тис вс 

БО А, 121 
САБЫ, 5ЕТ 

тс вс 

[О А, 104 
СА. ЗЕТ 

нс вс 

ГОА, 119 
САШ, 5ЕТ 

ГО А, 65 

10 (23128), А 
САМ, ЕТ 
нс ни, 

О Е. (НГ) 
НС НЬ 

Бр р, (ны) 
(1.2 23300), РЕ 
РОЗН РЕ 

РОР ВС 

тс нь 

ГО РЕ, 25301 
ГВ 

ГОН, (23296) 


ХОЕ А 


12 А.Н 
5БС А, 176 
«® С, +4 


Гр Н,А 
10 (23296), НЕ 
102 (23728), НЕ 


ГО Н., 23301 


РОЗН НЬ 
10 А, (Но 
п: 
Р.А 

АБО НЕ, НЕ, 
‚АБО. НЦ, НЕ 
АБР НГ. НЬ 
О РЕ, 15360 
АБР Н.Е 


о в, 8 


РОЗН. ВС 
10 вс, (азг9ту 


ГР А, (НЕ) 
РОЗН НЫ 
РИН ВС 
ьр в. 8 


Гр НЕ, (23299) 


КЛ А, (23728) 
АБО А, Ё 
2 (23728).А 
3Р 5ЕР 


Листинг 2.7.3 
КОМНЕНТАРИИ 


:Точка входа в програмну. 
{Начало буфера принтера. 
#120 - код буквы “к”. 

:В 232965 - коорл. "к". 
Очередной байт буфера. 
#121 - КОД бУКВыЫ У, 

;В 23297 - кобрд. "у". 
Очередной байт буфера. 
104 - код буквы Ь. 

;В 23298 - высота "в*. 
:Очередной байт буфера. 
$119 - код буквы м. 

:В 23299 - ширина “м”. 
:65 - код буквы А. 
‚Подготовка и проведение 
‚поиска перененной Аз. 


;В РЕ пометается длина 
‚нашего сообщения и пере- 
‚дается в буфер принтера 
;по адресу 23300. 
;Цереброска длины сообще- 
гния из ОЕ в ВС. 
;Переброска саного текста 
‚сообщения в буфер принте- 
‚ра начиная с 23301. 

; В Н. - координаты к, у, 

; Причем у находится в Н. 
‚Сброс Флага переноса (это 
‚необходимо перед' опера- 

: цией 58С). 

;Координата у, 

{Проверка на ›- 176. 

;Если нет, то переход на 
‚адрес 32456 (все 0.К. } 

;В ПРОТИВНОМ СлУЧае остав- 
;ляем ”у минус 176” и за- 
; поминаем копию в 23728/9. 
; Итак. в 23728 - “х"; 

; В стая: = "9170", 
{Указание на начало текста 


:Запомнили начало текста. 
; Взяли символ. 

;Код символа передаем 
вщи 

‚унножаем его код на 8. 


‚Нашли адрес, начиная с 

: которого в ПЗУ хранится 
:‚ шаблон этого символа. 

; Счетчик байтов в шаблоне 


; Запомнили его. 
В "В" - высота символа; 
В "со его коорд. м 


;Байт шаблона символа. 
;Завоннили его: 

; Завомнили “р” и "у". 
; Счетчик битов в байте 
; шаблона. 


; Запомнили текуший байт. 
:Ротация байта 

;Запомнили результат рота- 
;ции вместе с Флагани. 
‚Если Флаг переноса вклю- 
;чился, переходим на 32505 
‚для печати точки. 

В. регистр “1.” помешается 
;ширина "м". 

;кКоордината "х", 

‚Нашли "ки" 

;Запоннили в 23728. 

; Обход. 


55 


Програмна 2.8 демонстрирует. 
построение по точкам синусоиды, 
описываемой формулой > 


‚| 88 + ВО%ЗТЯ(АЛ1ев РГ) 


с применением процедуры “САЬСИГА- 
ТОК. 

С помошью этой процедуры нож- 
но выполнить сложные арифметичес- 
кие операции, используя так назы- 
ваеные коды калькулятора. Обычно 
при вызове этой процедуры выпол- 
няется операция над двумя числа-\. 
ни, являющимися верхвини на каль- 
КУЛЯТОРНОМ Сстеке, но возможны 
операции и над синвольными  вели- 
чинами. 

Например, если на. вершине  сте- 
ка записаны два числа: 1234 и г. 
а после 


4 (ОЕЕВ 4), то эти два чисаа бу- 
дут изваечены из калькуляторного 
стека, перемножены между собой, а 


го стека. Теперь на. стеке будет 
записано только одно число, 
ное 2468, если до этого там кроме 
сомножителей ничего не было запи-|. 
саво. ‚ . 

Целые положительные числа но- 
гуг быть занесены на стек следу- 
юшини способами: 

БТАСК УАГ А --- САМ, 11560 

БТАСК УЛ ВС -- САМ. 11565, 
т.е. число предварительно записы- 
вается в регистр А или регистро- 
вУЮ ПАРУ ВС, а затем вызывается 
соответствующая процелура. 

В программе 2.8 используется 
вызов 5ТАСК УАГ А для разненения 
на стеке чисел в следующем поряд- 
ке; ‹ 

` переменная А 

88 

80 
переменная А 
12в 

Вызов  пронедуры ° САГСУГАТОЕ 
осушествляется.по конанде #5780. }. 
Байты, записанные после этой‘ ко- 
нанды, определяют вид выполняемой 
операции. В програние г.8 сразу 


байт. равный 5, что означает *Де- 
ление". При этом из стека извае- 
каются два верхних числа,  выпол- 
няется деление ‘одного числа на|. 
другое и результат записывается 
обратно в кадькупяторный стек. | 
Следующий байт - 163 яваяется 
кодом операции “зфаск РТ/2“- (он 
переписывает на’ стек значение 
РТиг, кранимое в ПЗУ. Затен сле- 
дует код 49 (Чир11сафе фор уашше) 
- он дублирует верхнее число на 
стеке, а код 15 “ааа фор 4мо 
уа1иез” производит суммирование 
ивух верхних чисел и записывает 
результат обратно на стек. Те- 
перь на вершине стека записано 
число Р1. Следующий код 4 (1-1 
{1Р1У фор 140 уа1шез) перенножает 
два верхних числа, т.е. число Р1 
и А/128, и результат возврашается 
на стек. Код 31 (51. ор {ор 
уа1ие) определяет синус числа на 
вермине калькуляторного стека, а 
последующие коды 4 и 15 заверша- 
ют расчет по записанной Форкуле. 
Последний код 56 “епа са1с” вы- 
полняет выход из процедуры, т.е. 


АССЕНБЛЕР 


10) ВС. (23298) 


РИН ВС 

12 ВС, (23298) 
РОЗН ВС 

САМ. 8933 


РОР ВС 

тыс с 

Гр (23728), ВС 
РОР ВС 

РЕ Р1 


Листинг 2.7.4 
КОННЕНТАРИИ 


‚Процедура печати точки. 
В "В" - ширина "м" 
:в "С" - высота "Ъ". 


; Запомнили на стеке. 
;Повторили на стеке еше 
; раз. 

Вызов процедуры печати 
; точки. 

; Переход к соседней 

; точке. 

}Запомнили текумую коор- 
; динату. 

Если не все точки напе- 
; Чатаны, возврат на 32509 


дура РЕОТ(САМ, 8924) 


10 А, (23296) 
10 8, 23728 
ГО (НН), А 


тыс в. 
ХОЕ А 
ГЛ А, (НЕ) 


Е НЕ, +2 


Го (Н), 176 
БЕС (нь) 


`РОР_ ВС 


РОР НЫ 
РУН2 ЕРЗ 
тс нь 


РОР ВС 
2.7 ГР4 


ЬО А, (23299) 
АБР А, А 
АБО А, А 
АБО Л, А 
Тот, А 
12 А, (23728) 
АБО А. 1, 
12 (23296), А 
1. (23728), А 
10 А, (23297) 
10 (23729), А 
РОР Н. 


тыс ны 
1.0 А, (23300) 
ОЕС А 


ВЕТ 2 


ЬР (25300), А 


‚; так, 


Листинг 2.1.5 
КОМНЕНТАРИИ 


;Восстановили текуший байт 
; шаблона. 

;Восстановили счётчик 
;Уненьшили его и, если он 
‚не обнулился, возврат 
;на (Ре для последующей 

; ротации, 

‚Координата ”х“. 

; Принимаем “х" в качестве 
;текушей экранной коорди- 
:наты. 

; Указание на “У”. 

Сброс Флага переноса. 
;Координата "у". 

;Проверка на "у>115". 
Если так, переход к 32548 
28 

; Переход на 32556. 
Утв. 

‚Проверка на ”ноль“. 

:Если не 0, переход на ад- 
рес 32555; 


‚Переход к следующему бай- 
; ту шаблона. 

;Восстановили счетчик. 
:Если он еще не обнулился, 
: переход на 1 4. 

; Ширина символа. "м". 

; Умножаен 

: ее 

;на 8. 

; Запомнили в [.. 

;Новая экранная коорд. "х" 


; Запомнили ее. 


Новая экранная коорд. “у“ 
} Запомнили ее. 
Восстановили указатель на 
; текуший символ, 

: переход к новому синволу. 
; длина сообщения. 

; Уненьшаен ее на 1. 

; Проверка на конец. Если 
то выход. 

:Запомнили новую длину. 
Возврат на печать очеред- 
ного синвола. 


как бы выключает калькулятор и| 
осушествляет возврат в программу 
в машинных кодах. 

Сушествуют еше много других 
кодов калькулятора, которые могут! 
быть использованы в Ваших про-| 
Гранмах для различных целей. С 
некоторыми из них ны еше познако- 
нинся в следующих главак. | 

И еше одно важное замечание. | 
Перед возвратом в ВАЗ!С-систенву! 
после применения процедуры СА!.-| 
СУТЪАТОЕ необходимо полностью очи- 
стить калькуляторный стек от всек 
записей. В програмные 2.8 после 
последнего кода 56 на стеке все 
хе остаются два числа: неременная 
А и результат вычисления по Фор- 
муле 88+80*51Н(А/128иРТ). Проце- 
извлекает 
эти два значения, тем санын пол-| 
ностью очищая стек и использует 
эти два числа как координаты для| 
пиксела. 

Код проГграмкы для построения! 
синусоиды приведен в листинге 


Две точки входа в ПЗУ сушест- 
вУют и для реализации команды 
ОРАМ х.У. Для входа через первую 
точку (САМ, 9402) необходимо, 
чтобы в регистре В было записано 
АВЗ (У), а в регистре С - АВЗ (к). 
Регистровая пара ПЕ служит для 
хранения знака прирашения коорди- 
нат хи у. Регистр р хранит знак 
прирашения по х (56СН ах), а ре- 
гистр С - знак. прирашения по У 
(1, если число положительное и! 
255, ебли число отрипательное). 
Програина 2.9 является модиФици- 
рованной версией програнны 2. 8, 
которая денонстрирует реализацию 
команды ОВАУ. Обратите внимание, | 
что церед вызовом‘ процедуры РВАМ, 
начальное значение ‹ регистровой 
пары Н’1.’ (альтернативная) должно 
быть сохранено. для этого содер- 
жимое этой пары записывается в 


} машинный стек. 


Начальное значение регистровойй 
пары Н’1’ не должно быть потеряно 
в ходе выполнения програмны, на-| 
писанной пользователем, иначе при| 
возврате в ВАЗТС-систему произой-| 
дет сбой в работе конпьютера. На-| 
чальное значение регистровой пары 
Н’1.’ восстанавливается после ко- 
манды ВАМ. Команды ОУЕК и! 
ТНУЕВ5Е включаются такин хе обра- 
зон, как и РТОТ ОУЕЮ/ТНУЕВ$Е, 

Для реализации конанлы| 
ОРАМ х,у Через вторую ‘точку входа! 
(САМ. 9335) необходимо, — чтобы 
значения х иу были записаны в| 
калькуляторном стеке, причем зна-| 
чение у должно быть верхним в| 
стеке. Чтобы использовать эту 
точку входа. необходино прочитать 
главу Т, для ознаконления со спо- 
собон записи 5-ти байтных чисел в| 
калькуляторный` стек. 


ОВАМ х, У, а 

Точкой входа в ПЗУ для реали-| 
зации этой конанды служит адрес 
9108. В этон случае необходино, 


НАШ. КОД 
АР 

Е5 

Ср г8 20 
ЗЕ 58 
ср 28 г9 
ЗЕ 50 

` Ср 28 г 
Е 

Е5 

Со 28 гр 
ЗЕ 80 
ср гв гр 
ЕР 

БЕЕВ 05 
РЕЕВ 163 
РЕЕВ' 49 
РЕЕВ 15 
РЕЕВ 04 
РЕЕВ 3} 
РЕРВ 04 
РЕЕВ 15 
РЕЕВ 56 
ср вс г2 
Е1 

с 

ЕЕ 00 

20 05 
с9 


АССЕМБЛЕР 


ХОБ А 


РОЗН АР 
САМ, 11560 


В А, 88 
САШ, 11560 
| А, 80 
САМ, 11560 
РОР АЕ 


РОЗН АР 
СА, 11560 
ЕО А, 128 
САБ, 11560 
К5Т 40 
$1у1310п 
зтаск рт/ё 
Зир11сафе 
ааа 
ПАРУ 


.31й 


пи 1 1Р1У 
ааа 
епаса!с 
САМ, 8924 
РОР АР 

ТС А 
СРО 

8 Н2, 100Р 


ВЕТ 


Листинг 2.8 
КОННЕНТАРИИ 


; Обнуление аккумулятора. 


;Запомнили его на стеке. 
;На кальк. стеке - текумее 
; значение аргумента. 

;На кальк. стеке - 

$88, А. 

На кальк. стеке - 

$80, 88, А. 

;В акк-ре текушее значение 
; аргунента. 

;Запомнили его на стеке. 

$ А, 80, 88, А. 


$ 128, А, 80, 88, А. 
:Включение калькулятора. 

; А/128 , 80, 88, А. 

; РШУВ, А/128, 80, 88. А. 
3 Рё, Р1Ма, А/128, 80. 88, А. 
; РГ, А/128, 80, 88, А. 

; РТЖА/128, 80, 88, А. 

$ 51 (А/1ё8иРГ), 80, 88, А. 
$ ВО%ЗТЫ(А/1ев=РТ), 88, А. 
} 88+80%"5ТН(А/128*РТ), А. 
; Выключение калькулятора. 
Вызов ПГСПОдДУРЫ РЬОТ, 
;Текушее Значение‘ аргумен- 
;та, 

;Прирашение аргумента. 

; Проверка на конец экрана. 
;Возврат для расчета и 

: печати следующей точки. 
:Выход из процедуры. 


АССЕМБЛЕР 


Ьр В, 95 
го с, 00 
САГЛ, 8933 


гр в, о 
172 С, 255 
о в, 1 

ГО Е, 1 
САМ, 9402 
ЕХХ 


РОР НЕ 
ЕХХ 


ХО А 


РОЗН АР 
САЫ, 11560 


ТО А, 120 
САМ. 11560 
ГЛ А, 40 
САЫ, 11560 
РОР АР 


РОЗН АР 


САШ, 11560. 


Листинг 2.9 
КОННЕНТАРИЙ 


;Координата “у”. 
;Координата ”х”. 

; Печать исходной точки. 
‚Включение регистров аль- 
; тернативного набора. 
‚Сохранение пары Н’1.’. 
‚Выключение альтернатив- 
‚вого набора. 

;Прирашение по "у"=0. 
;Прирашение по “х”=255. 
;Знак прираш. по "х"-="+*. 
;Знак прираш. по "у"="+". 
;Рисуен прямую линию. 

; Включение регистров аль- 
; тернативного набора. 
Восстановление пары Н’!”. 
{Выключение альтернатив- 
;вого набора. 

; Обнуление аккумулятора. 


:Запомнили его на стеке. 
На кальк. стеке - текушее 
; значение аргумента. 

:На кальк. стеке - 

$120, А. 

;На кальк. стеке - 

$40, 120, А; 

;В акк-ре текушее значение 
; аргумента. 

;Запоннили его на стеке. 

$ А, 40, 120, А. 


. ОТ 0 до 999 999, необкодино заре- 


чтобы значения х,Уу иа были зави- 
саны в калькуляторный стек в та- 
ком порядке, чтобы значение “а” 
было верхним на стеке. опять хе, 
начальное значение регистровой 
пары Н’1.’ (альтернативной) должно 
быть сохранено. 


СТВСЬЕ х, У, Г 
Точкой входа в ПЗУ для реа- 
лизадии этой команды слухит адрес 
9005. ПРИ этом необходимо, чтобы 
значения х.у, и г были записаны в 
калькуляторном стеке. Начальное 
значение регистровой пары Н’1’ 
должно сохраняться в отдельном 
месте в течение работы процедуры 
СТЕСЬЕ. 
Программа 2.10 демонстрирует 
нетод рисования концентрических 
окружностей. Обратите внинание на 
тот Факт, что эта програнна в ма- 
шинных кодах выполняется также 
медленно, как ‘и на языке ВАЗТС. 
Это потому, что процедура СТЕСЬЕ 
в ПЗУ достаточно длинная. Если В 
Вашей програнме возникнет необхо- 
ДИМОСТЬ ПОСТРОИТЬ ОКРУЖНОСТЬ, то 
будет быстрее, если вы будете 
Строить ее по точкам. используя 
для постановки пиксела координа-| 
ты, записанные как последователь- 
ность байтов с именен РАТА. 
Нашинный код процедуры пред- 
ставлен в листинге 2.10. В качес- 
тве аналога выступает следующая. 
БЕИСИК-программа: 


10 БЕН СТЕСЬЕ х,у.Гг 

20 РОВ Ъ- 1 Та 

30 РОБ а= 1 ТО 21 5ТЕР 2 
40 СТЕСГЕ ОУЕВ 1; 128, 88, А 
50 НЕХТ а 

60 НЕХТ Ь 


3. СЧЕТ 


Во многих игровых програмная 
необходино постоянно вести счет, 
например, ‘счет очков, потерянных 
“жизней”, времени и т.д. Извест- 
ны. по крайней мере, три способа 
организации счета в программах и 
вывода результатов счета на эк- 
ран. 
Первый настолько непригляден`и 
занинает так много паняти, что ны 
расснотрин его кратко, лишь В 
общих чертах. Способ этот позво- 
ляет организовать счет в програм- 
ме от 0 до очень большого числа. 
Наксинально возножное число опре- 
деляется только количествон бай- 
тов, зарезервированных для пред- 
ставления этого числа. Например. 
для того, чтобы получить счетчик 


зирвировать 6 байтов, т.е. для 
каядого разряда числа нужен 1 
байт. Поскольку показание счет- 
чика выводится на экран как зна- 
чение символьной переменной, то’ 
на экране в начальный номент вре- 
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Продолжение листинга 2.9 


с 


ВРЕТ 


НАШ. КОД АССЕЙБЛЕР. КОММЕНТАРИЙ 
ЗЕ 10 ЕЛ А, 16 
ср 28 20 Сма, 11560 $ 16, А, 40, 120, А. 
ЕЕ Е5Т 40 Включение калькулятора. 
ФЕРВ 05 31918101 $ А/16, 40, 120, А. 
РЕРВ 163 з+аск рРГ/ё ; РУ/ё, А’! 6, 40, 120, А, 
БЕРВ 49 Зрисаце ; РТИ, РТ/а, А/1 6, 40, 120, А. 
РЕРВ 15 ааа ; Р1, 4/16, 40, 120, А. 
РЕРВ 04 Пару ; РУкА’16, 40, 120, А, 
ЕКВ 31 вл ; З1Ы(А/ЛбУРГ), ‚40, 120, А. 
ЗЕРВ 04 ШИР У $; ЗО%5ТЫ(А/1бЕРТ), 120, А. 
БЕКВ 15° ава ; 120%+40%5$ ТЫ (А/16 РГ), А, 
ОЕЕВ 56 епдса1с ;Выключение калькулятора. 
со ос а САМ, 8924 ‚Вызов процедуты РОТ. 
р9 хх ‘’’кючение альтерн. набора 
Е5 РУБН НЫ ; Сохраняя Н”Ь’. 
р9 ЕХхХ ;Выключение альтерн. наб. 
06 з2 о: ;Прирашение по “ум. 
ОЕ 00 р С.0 }Приращение по "х*. 
16 ЕР Ыр р, 255 ‚знак прирашения по "у" - 
} "МИНУС". 
1Е 01 10 Е, 01 ‚Знак приращения по "х" - 
; “Плюс”. 
СВ ВА 24 САМ, 940а ‚Рисование линии. 
09 ХХ ‚Включение альтерн. набора 
#1 РОР НЕ ‚Восстановление пары Н’1,’. 
99 хх ‚Выключение альтернатив- 
: ного набора. 
Е! РОР АР ; Текущее значение аргумен- 
; та: 
зе ТС А :Прирашение аргунента. 
РЕ 00 СРО :Проверка на конеп экрана. 
20 05 ЗВ №2, БООР ‚Возврат для расчета и 
‹ печати следующей точки. 
с9 ВЕТ :Выхоц ИЗ ПРОЦЕДУРЫ, 
мы ЧО -^. т 
Листинг 2, 10 
МАШ. КОД АССЕНБЛЕР КОММЕНТАРИЙ 
06 02 гр в,2 РОВ Ь:1 ТО2 
с5 РУЗН ВС - 
ЗЕ 01 О А, 1 РОВ а:1 ТО... 
Р5 РУЗН АЕ } 
РО 36 57 03 12 (1у+87Т),3 } ОУЕВ 1 
ЗЕ 80 О А, 128 
ср 28 2 САД, 11560 ;На кальк. стеке - 128. 
ЗЕ 58 10 А, 88 
СО 28 25 САМ, 11550 ‚На кальк. стеке - 88, 128. 
РА РОР АР ;Текушее "а". 
25 „РОЗН АЕ 
Св 28 20 САМ, 11560 На к. стеке -‘а, 88, 128. 
29 БХХ , 
Е5 РИЗН НЫ Сохранение Н’1.”, 
9 ЕХХ 
СВ 29 23 САМ, 9005 САМ. СТЕСЬЕ 
9 ЕХХ, ‚ 
Е1 РОР_Н, ‚Восстановление Н’1.”. 
рэ ЕХХ 
Е! РОР АР ‚Текущее "а". 
3С ТЫС А 
С ПСА ; ТЕР 2 
Е 17 СР) ей 
20 С ЭК. НИ, 11 ; Цикл не завертен, 
с у : Цикл по ”а” завершен. 
10 26 РАМА №2 $ Конец цикла по "Ь". 
7р 36 57 00 р (1У+87).0 - ОУЕВ 0. $ 
с9 Выход. 


нени будет 6 нулей: 000 000 
тем. с увеличением значениу на 1, 
изменения произойдут только в 
разряде единиц. Если хе последнее 
зависанное в этом разряде число 
равно 9, то с добавлением 1 этот 
разряд обнулится, а едийица доба- 
вится К числу в следующем разря- 
де, Процедура проверки значения 
числа выполняется для каждого 
разряда ‘и, если во всех шести 
разрядах записано число 9, то 
дальнейший счет  прекратается. 
для того, чтобы шаг счетчика был 
больше, чен 1, необходино  вклю- 
чить в процедуру счета специаль- 
ные циклы, т 
ВТОРОЙ —С10соб — используется 
лая создания счетчиков, показания 
которых не выходят за пределы ли- 
апазона 0... 65535. — Реализация 
этого способа показана в програй- 
ме 3.1. В этой программе исполь- 
зуется одна из процедур ПЗУ, поз- 
воляющая выводить на экран значе“ 
ние числа, записанного на вершине | 
калькуляторного = стека. Вызов 
Этой пропедуры  осутестваяется 
командой САМ. 11747, При этом 
текущее значение счетчика может, 
например, храниться в неиспользу 
емой системной переменной 23728, 
Значение счетчика извлекается из 
этой систенной переменной, увели- 
чивается на 1, а затем вновь за- 
писывается в эту перененную и на 
вершину калькуляторного стека. 
После этого определяются паранет- 
Ры РВТНТ АТ и вызывается процеду- 
ра 11563, печатающая содерхиное 
стека калькулятора. 


листинг 3. 1 


го вс, 0 
ВЕСТИ 

1} (2зтг8), вс 
САМ. 11563 


; Инициализация 
:счетчика. по 

: адресу 25728, 
;Переброска на 

; стек калькулятора 


ЬО ^,е Открыли канал 
САМ. 5633 ‚печати на экран. 
|2 А, 22 | 

Е5Т 16 ; Аналог... АТ её 
Ыр А, 16 ) 
Е5Т 16 ; Аналог АТ 22, 16 
САБ, 11747 ‚Печать счетчика. 
10 ВС. (23728) ; Вызов счетчика. 
нс вс ; Прирашение. 

10 А, В ; Проверка на 

ок с ; обнуление. 

ВЕТ 2 ;Выкод, есши 0, 


ВИТ 5, ‹1\+1) ;Проверка не была 


: ли нажата клавиша 


3% 7, ВЕСЫ Повтор, если не 
:было нажатия. 
ВЕТ :Выхой, если кла- 


:виша была нажата. 


Если в регистровой паре эначе 

чнсйа о становится равным 
возврат 
В эту  програнну 
пронедура  ЕХТ 
.23806), благодаря 


ние 


65535, то осушествляется 
В 'ВА51С- систему. 
включена также 
(Строки 23195 


т 


которой имеется возможность пре- 
рвать счет и вернуться в ВАЗТС- 
систему, если нажата какая-нибудь 
клавиша. Это удобно, так как счет 
от 0 до 65535 выполняется нес- 
КОЛЬКО МИНУТ. 

Третий способ также основан 
на использовании калькулятора. 
выше, когда мы говорили о каль- 
кУлЯяторном СсТеке, мы не останав- 
ливались на детальном рассмотре- 
нии способа записи и хранения 
чисел в стеке. Числа в стеке хра- 
нятся в 5-байтной Форме, что поз- 
воляет калькулятору легко выпол- 
нять действия с ними. Более под- 
РОбНо 05 этом будет сказано в 
седьмой главе. Здесь же приводим 
программу, которая выполняет счет 
от 0 до бесконечно большого числа 
с шагом 250. При достижении пока- 
зания счетчика 99 999 999, Форма 
вывода на экран меняется на 
Е-ФОРМУ (1Е+9). Однако счетчик, 
У которого диапазон представляе- 
мых чисел достигает 100 нлн. впо- 
лне пригоден для большинства про- 
грамм и на этот Факт ножно не об- 
рашать внимание. 


В програные 3.2 есть много 
важных процедур, которые необхо- 
димо объяснить. Начальное значе- 

равное нулю, запи- 


ние счетчика, 
сывается в стек с помомью кода 
калькулятора 160 (зфаск_2его). 
Это число занимает 5 верхних 
байтов стека, содержимое которых 
затен копируется в буфер принте- 
ра, используемого как "хранилище" 
для счетчика. Копирование выпол- 
няется командой |ЛУЮ. Значение, 
записанное в регистровой паре НН 
ре этом считается равным . 

ЗТАСКЕНО- 5. 
Значение счетчика 

экран с помошью процедуры 
Я Затем в стек записывается 
число 250 (шаг изменения показа- 
ния счетчика и число из "кранили- 
ша” в 5-байтной Форме, Следующая 
команда вызова калькулятора в5Т 
15 (ааа) 


выводится 


40 и код калькулятора 
обеспечивают сумнирование ДВУХ 
чисел, записанных на вершине 
стека, и осушествляется переход 
на начало цикла для передачи но- 
вого значения в "хранилише” и вы- 
т этого значения на экран. 

В этой програмне предусмотрена 
ры процедура преждевременного 
выхода из цикла счета, если будет 
нажата любая клавиша. Перед воз- 
[орон в ВАБ5ТС-систену после 
окончания счета стек обнуляется 
путем перемещения последнего 
писанного тан значения. 

Для создания счетчика, 
ние которого с каждым 
а необходимо в 


за- 


значе- 
шагом 
стек 


первоначально записать максиналь- 
ное значение счетчика (запись в 


стек чисел больше, чем 65535, по- 
казана в главе Т), а вместо кода 
калькулятора для сложения - 15 


(а94) следует использовать код 
для вычитания - 3 (за1гас1). не- 
обходино поннить, что при вычита- 
нии верхнее в стеке число вычита- 
ется из числа, записанного в сте- 
ке вторым. После каждой операции 
вычитания проверяется достигнут 
ли 0 (либо включен ли Т бит ре- 
зультата) и если это так, то счет 
прекрашается. Перед выводом оче- 
редного значения счетчика необ- 
ходино очищать экран, чтобы из- 
бежать ошибок, связанных с уста- 
реванием экранной информации. На- 
пример, если экран не очищать, то 
при изменении значения счетчика с 
1000 на 999 на экране будет изоб- 
ражено не 999, а 9990. 


Е У. 


листинг 35.2 


об 23760 
ЕТ 40 ;Включили кальк-р. 
РЕЕРВ 160 ;На стек - 0. 
РЕЕВ 56 ‚Выключили кальк-рР. 
11 
ЕР БЕ 23296 —;Начало буфера 
; принтера. 
Го ВС, 5 ;Число перебрасы- 
; ваемых байтов. 
БОТВ ; Переброска. 
ТО А, & ;Канал экрана. 
САЫ, 5633 ;Открыли канал. 
10 А, 22 а ВК 
В5Т 16 , 
ВО А, 11 .АТ 22, 11 
в5Т 15 
САШ, 11747 ‚Печать показаний 
; счетчика. 
1.0 А, 250 ; Шаг счетчика. 
|Слы, 11560 — :;Поместили его на 
‚стек кальк-ра. 
Ьр НЬ, 23296  ;начало буфера 


|} 


; принтера. 
23653 - системная 
; Переменная $ТКЕНО. 


12 БЕ, (23653) 


р ВС. 5 ; Число перебрасы- 
;ваеных байтов. 
рт ; Переброска. 
Ь) (23653), РЕ ; Новое значение 
; ЗТКЕНО. 
Е5Т 40 ;Включили кальк-р. 
РЕЕВ 15 ‚Кол сложения (ааа) 
РЕЕВ 56 ‚Выключение к-ра, 
ВТ 5(1У+1) ; Проверка не была 
;ли нажата какая- 
‚либо клавиша. 
2 ;Если нет, то 
} ПОВТОР. 
БР НЕ, (23653) ; (5ТКЕНО) 
БЕС НЫ 
РЕС НЬ 
РЕС НЫ 


Продолжение листинга 3.2 
РЕС. нь 

рЕС нь 

14 {23653}, Н1.; (ЗТКЕНО} -5 

ВЕТ ; Выход 


Й завершимн мы натериал этого 
номера небольшой игрой, в которой 
объединик то, © чем вы сегодня 
прочитали. Програниа 3.3 показы- 
вает вознохность использования 
счетчика для изнерения скорости 
вашей реакции. 

Программа состоит из двух час- 
тей: первая часть написана на 
БЕИСИКе и служит в качестве ин- 
терфейса между пользователен и 
компьютерон. Она не требует ско- 
рости в работе. Машинный код 
служит для выдачи сообщений и 
запросов нестандартным шрифтом и 
для измерения скорости реакции. 
Печать нестандартным шриФфтон вы- 
полняется с помошью блока нашин- 
ного кода, приведенного в листин- 
ге 2.7, расснотренного ранее. Он 
должен быть подгружен, начиная с 
апреса 32335. Измерение скорости 
реакции выполнит процедура 3. 3.2, ` 
приведенная ниже. 

Измерение скорости Вашей реак- 
ции производится следующим обра- 
зом. Сначала процедура г.7Т нари- 
сует на экране большую букву от А 
до 7, после чего будет включен 
режим САР5 1.0СК и Ван надо нажать 
соответствующую клавишу. Время 
Вашей реакции замерит процедура 
Бе: 

В ней применен один хитрый 
прием. дело в том, что рисование 
с помошью РЬОТ буквы на экране 
происходит не очень быстро. И за 
то время, пока идет этот процесс, 
Вы ножете в принципе догадаться, 
что это за буква и подготовиться 
к нажатию соответствующей клави- 
ши. Чтобы этого не было, буква 
рисуется желтым цветом 1НК-6 по 
желтону Фону РАРЕВК=6 и ее на 
экране не будет видно. Когда же 
дело дойдет до измерения Вашей 
реакции, процедура 3.3.2 включит 
на экране цвет пикселов 1НК-1 
(черный). Произойдет это с ог- 
РОМНОЙ СКОРОСТЬЮ и буква появится 
мгновенно. 

БЕИСИК-програмна стартует со 
СТРОКИ 9800, в которой записана 
подгрузка модулей в машинных ко- 
дая. Поэтому набрав БЕЙСИК выГгРУ- 
зите его на ленту со строкой ав- 
тостарта. 9800: ` 


ЗАУЕ “сошиег” 11НЕ 9800 


2 


| ВЕЗТОВЕ 


РАРЕВ 6: С15 

АТА ВТ, 143, 1,2, "СОММТ" 
АТА 95, 63, 1,2, "50м" 

РАТА 71, 63, 1, 2, "АУЕКАСЕ" 
РАТА 95,63, 1,2, “бобр” 

РАТА 65, 63, 1,2, "УЕКУ 600р" 
АТА 63, 63, 1,2, "ЕХСЕБСЕНТ" 
РАТА АТ, 63, 1,2, "МОТ ТВУ1Нб” 
АТА 0, 31, 1,2, "АНОТНЕЕ 60? 


РАТА 
РАТА 
РАТА 
РАТА 


55, 125, 5,2, "ТНАНК УОЦ”" 
103, 79, З, 2, "хог" 

71, 50, 5, 2, "РЬАУТНЫС" 

24, 19, 5,2, "5ТОР ТНЕ ТАР 


15, 167, 1,2, "ВЕАСТТОН ТТ 


15, 164, 2,2, 


120 РАТА 24, 15, 1,2, "РЕЕЗ$ АНУ КЕ 
у" 
125 ВЕЗТОКЕ 100: РОВ а-1 ТО 4; 


РАОЗЕ 25: 1НК 2: 60 508 9000: 


|| НЕХТ а 


180 РАОЗЕ 0: ВОКОЕЕ 5: РАРЕВ 6: 
тк о: 615 

190 КЕЗТОВЕ 105 
60 $98 9000 

290 РЕ1МТ АТ 20, 5; 
ЖЕУ ТО РЕЛУ” 

300 1Е 1НКЕУЗ‹>"" ТНЕН СО ТО 300 
302 1Е ТНКЕУ$-"" ТНЕМ 60 ТО 302 
310 С1.5: ВЕЗТОЮЕ 105: ТНК 1: 
1|с0 5ИВ 9000; 1нк 5: 60 ЗиВ 9000 
330 ВЕЗТОЮЕ 15: ТНК 2: 
|160 50В 9000 
|| 350 ТНК 0: РЬОТ 102, 114: 
РЕАМ 50,0: БВАЧ 0, -38 
РЕАМ 50,0: РВАМ 0, 38 

380 ТЕТ 2:1НТ (®Мр"а6+65) 

390 1ЕТ х=114: БЕТ У:111: 
БЕТ В:4: БЕТ 4-4: ТЕТ а$-СН$ 2 
400 ТНК 6: [ЕТ с:05В 32393 
КОБ а-1 ТО ЕНОк200+50: НЕХТ а 

420 {МК 0: БЕТ с-05Е 30000: 
ПЕТ а-РЕЕК 23728+256*РЕЕК 23129 
450 {Е а>-140 ОК а-0 ТНЕН ‘ 
20 
а<140 ТНЕН ВЕЗТОКЕ 20 
а‹120 ТНЕН ВЕЗТОВЕ 30 
а‹100 ТНЕН ВЕЗТОВЕ 40 
а‹65 ТНЕН ВЕЗТОВЕ 50 
а‹70 ТНЕН ВЕЗТОКЕ 60 
ЗВ 9000 


Тик 0: 


"РВЕ5$ АНУ 


460 
470 
480 
490 
500 
510 


ИЕ 
Е 
ТЕ 
кН 
ТЕ 
со 


71000 
1010 


ВЕЗТОВЕ 90: ТНК 1:60 50В 9000 
ТЕ ТНКЕУ$ <> "" ТНЕН 
с0 то 71010 
1“ ТНКЕУ$ = 
60 ТО 7020 
СЕТ 9$ = 1КЕУ$ 
ТЕ 4$ <> "у" ТНЕН 60 ТО 8000 
7050 ГЕТ с:058 30082: 60 ТО 350 
8000 ВЕЗТОКЕ 95: РОКЕ 30083, 20: 
БЕТ с-05В 30082: РОКЕ 30083, 18 
8030 РОБ а-1 ТО`3: 60 $08 9000: 
МЕХТ а: $ТОР 
9000 ВЕАШ х, у, В, м, а$: 
БЕТ с-058 32393: ВЕТУВМ 
9800 СЬЕАВ 29999: БОАП “"СОБЕ: 
бо ТО 12 


"" ТНЕНЧ 


71030 
71040 


а т 
листинг 3. 3.1 | 


АОИ аа 


листинг 3.3.2 


й 
| 
| 
| АДРЕС НАШ. КОД АССЕНБЛЕР КОММЕНТАРИЙ 
| 30000 ЗЕ ТА ГР А, 122 ‚Код буквы "2" 
| 30002 01 81 5С ЬР ВС, 23681 : для хранения параметра “2” 
; выбирается неиспользуемая 
:В стандартном "Спектруме" 
‚ячейка 23681. 
| 30005 СВ ТЬ.7Е САР, 32381 ‚Параметр "2” перебрасыва- 
| ;ется\в 23681 (см. проце- 
| Упуры а, 1.1, 2.1.2.) 
| 30008 КО СВ 30 РЕ  ЗЕТ 3, (1У+48) ‚Включение 3-го бита’ сис- 
| :темной переменной ЕЬАС52 
| : (23658) эквивалентно вклю- 
;чению режина САРЗ ГОСК. 
| 21 00 58 0 Н,, 22528 ‚Первый байт области цвето- 
;вых атрибутов экрана. 
уй 
30015 ТЕ БО А, (НЫ) ; Проверка этого байта. 
30016 БЕ 36 СР 54 ;| Переключение атрибутов 
30018 20 оа В Нл, ьа ;| экранной области с ре- 
300г0 36 30 Бо (НВ, 48 ;| жима РАРЕВ = 6, 1НК=6 
|2 на режим РАРЕВ -6, 
30022 23 тыс НЕ. Е 
30023 7С 10 А, Н В Ранее нарисованная бук- 
30024 РЕ 5В СР 91 ; ва мгновенно "проявля- 
30026 20 ЕЗ УВ Н7, 11 ; ется" на экране. 
30028 01 00 00 тр вс, 0 ; Инициализация счетчика. 
3 
30031 с5 РУЗН ВС 
30032 ср 2в гр САЫ. 11563 ;Понешение его на стек 
; калькулятора. 
30035 ЗЕ 02 ЬО А, а ; Открываем канал печати 
30037 ср 01 16 САМ, 5633 ‚на экран, 
30040 ЗЕ 16 гр ^,аг `Аналог о АТ...) 
30042 07 В5Т 16 
30043 ЗЕ 06 ГР А, б ‚Аналог... АТ б,... 
30045 рт В5Т 16 
30046 ЗЕ 0Е ЕО А, 18 
30048 рт В5Т 16 ‚Аналог ...АТ 6, 14 
30049 Ср ЕЗ гр СА, 11747 ‚Печать показаний счетчика. 
30052 [о РОР ВС 
30053 03 1нс вс ‚Увеличение счетчика. 
30054 18 12 А.В ‚Проверка счетчика на об- 
30055 В! ов с ; нуление. 
30056 гв ог У 7, ЕЮ ;Выход, если он успел обну- 
злиться (достиг 256). 
30058 ГО СВ 0! 6Е ВТ 5, (1У+1} ‚Проверка не была ли нажата 
‚какая-либо клавиша, 
30052 28 рЕ УК 7,13 ‚Если нет, то возврат на 
; повтор. 
30054 ЗА 08 5С 1 А, (23560) ‚Код нажатой клавиши. 
30057 21 81 5С Гр нЕ, 23681 ‚Код буквы. которая была 
; показана на экране, 
30070 ВЕ СР (НЫ) ;Сравнили их нежду собой. 
30071 20 06 „Л М7. 1.3 ; Если’ они не совпадают, 
‚значит нажата не та клави- 
;ша, следует повторить по- 
; ПЫТКУ, 
ЕО 
30073 ЕР 43 ВО 5С тр (2зт2г8), вс ;Результат испытания пере- 
; дается из ВС в адрес 23728 
30077 РР СВ 30 9Е РЕФ 3, (1У+48) :Выключается ранее включен- 
‚ный рехин САР5 10СЕ. 
30081 с9 . ВЕТ ;Выкод из программы. 
30082 06 12 ЬО В, 18 ;Эта вспомогательная проце- 
30084 СО 44 оЕ САЫ, 3652 ‚пура служит для очистки 
30087 С9 ВЕТ К НИЖНИХ СТРОК экрана, где 
;К-число, установленное в 
; адресе 30083 (исходно 18). 


и 
[2 


Опыт показывает, 
что лучше всего освоение прохо- 
дит, когда берешь какую-нибудь 
несложную готовую программу в на- 
шинных кодах и пытаеться понять, 
что и как там делается. 


почему так? Может номно все это 
сделать по-другому?” Начинаеть 
пробовать сделать по-другому и 
выясняется, что по-другому не вы- 
ходит. Тогда становится понятно, 
почему автор организовал ирогран- 
му именно так, а не иначе. но 
иногда встречаются ситуации, ког- 
да приходят действительно ценные 
идеи. Именно потому, что "ход 
мысли” начинающего еше не оФор- 
мился в каких-то рамкая, он не 
что “ножно*, а что “нель- 
Я он пытается выполнить за- 
дачу по-своему, а это зачастую 
приводит к находке новыя, ориги- 
нальных решений. 


| прессора, 


УПОМЯНУТО ВЫ. 

Александр приводит результаты 
сравнительных испытаний ДВУХ 
конпрессоров для взятых наугад 
нескольких экранов игровых прог- 
ранн. Вот полученные длины сконп- 
рессированных блоков (в байтах) 
соответственно для двух вариантов 
компрессоров: 


«“реахь 54аг” 4619 и 3936 
*самлагоп” 3228 и 2821 
*5сооБу оо" 5958 и 5265 
*ХЕНО" 8985 и 43712 
«“баьохенг” 402Т и 3474 
Вариант конпрессора, который 


приводит Александр, заинтересовал 
нас и мы гровели тестирование 
присланного им блока кодов, кото- 
рое подтвердило основные моменты, 
излохенные выше. Но выяснилось, 


что полученный сконпрессированный 
блок кодов. нельзя загрулать для 


деконпрессии под любой адрес, а 
только под адрес. в котором он 
был скомпрессирован. Это серьез- 
ное ограничение для пользовате- 


лей, которое может свести к нулю 
преимущество нового варианта 
компрессора. Хотя проблена в об- 


шен-то решается довольно просто. 
те, Кто регулярно читают "РЕВЮ", 
наверняка знают, как осумествить 
привязку к конкретным адресам 
загрузки. 

Мы сделали такое усовертенс- 
твование программы, присланной 
Александром, Изненения коснулись 
програмны деконирессии (она стала 
длиннее на 7 байтов), из-за чего 
пришлось на Т байтов отодвинуть 
программу конпрессии в сторону 
нладших адресов. В такон усовер- 
шенствованном виде мы предлагаен 
программу читателям (сн. Лист. 1) 


Александр Баламов из г. 
ково Тверской обл. пишет нан © 
том, Что он начал заниматься нма- 
шинными кодами совсем недавно. 
Исследуя програнны компрессии и 
декомпрессии, опубликованные в 
"2Х-РЕВЮ" Н 1-2 за 1991 г., Алек- 
сандр обратил внимание, что под 
счетчик числа одинаковых байтов 
используется двухбайтный регистр 
ВС. Учитывая организацию экранной 
области “Спектруна”, он превполо- 
хил, что выгоднее. видимо. ис- 
пользовать один байт, так как 256 
байтов перекрывают 8-ю штрихами 
третью часть экрана и старший 
байт двухбайтного регистра ВС 
используется лишь при практически 
пустом экране. Число; записанное 
в этом регистре занимает в ском- 
]прессированнон блоке 2 байта, 
один из которых почти всегда в 
нуле. , 

Этот Факт побудил Александра 
разработать свою программу комп- 
рессии, в которой под счетчик 
числа одинаковых байтов он ис- 
пользовал только’ регистр В. Этот 
вариант позволяет получать длину 
скомпрессированного блока на 
10-20% меньшую. — Лижь при почти 
незаполненном экране, когда длина 
скомпрессированного блока неньше 
300-400 байтов, длина его ском- 
прРессированной Картинки равна 
или уступает указанному варианту 
компрессора. Кроме того, его ва- 
риант не приводит к сбоям, кото- 
рые ногут иметь место при опреде- 
менных ситуациях в варианте ком- 


кона- 


ТР8В 210040 102 н.. #4000 
ТРВЕ 010018 р ВС, #1800 
71291 110080 10 РЕ, #8000 
ТРЭ4 105 РУ5Н БЕ 

7Е95 1В РЕС ПЕ 

7296 13 10 1С Е 

ТЕЭТ 18 11 Ш АВ 

ЛР98 в: ‚с 

7299 2828 38 2, ЯТЕСЗ 
ТРЭВ ТЕ р А, (Н) 
ТЕ9С ЕТАО Бот 

ТЕ9Е ВЕ СР нь) 
ТЕЗЕ 2026 38 К, #ТЕ9Т 
ТЕАЗ1 ОО ЕС С 

ТРАё 0С с с 

ТЕАЗ 2004 УР 12, #ТРАУ 
ТРАЗ 05 ЕС В 

ТРАб 04 тс в 

ТРАТ 281А 3 7, ЯТЕСЗ 
ТРА9 12 ва 1 (РЕ), А 
ТРАА 13 ТС БЕ 

ТРАВ 08 ЕХ АЕ, АЕ* 
ТРАС 3200 12 А, #00 
ТРАЕ 3С 13 ШС А 

ТРАЕ 28Е5 3 7.7796 
ТЕВ1 12 р (ФЕ), А 


Листинг 1. 


;В НЫ указатедь адреса в экранной 
; области. | 

:В ВС счетчик байтов экрана. 

:В ОЕ задан адрес, куда будет 

; производиться компрессирование. 
;Он запонинается на стеке для то- 
:;го, чтобы потом можно было вычи- 
;слить длину полученного скомпрес- 
: сированного блока. 

;ЭТа операция выполняется ввилу 
;того, что при возврате из опера- 
;ции подсчета повторов и сравнений 
‚байтов в РЕ должен находиться 
‚адрес первого байта пустого места. 
; Проверка ВС на ноль. то есть опре- 
: деление конца компрессировавия. 
‚Если нодь, то переход на ЕНО1 

;В аккумулятор заносится байт из 
‚экранной области и переносится по 
‚адресу, который указан в ПЕ. Ен 
:НЬ увеличиваются, а ВС - уменьша- 
‚ется на единицу. 

; Сравнение следующего байта с 

; предыдушин. 

;Если не равны, то возврат на 1.1. 
‚Проверка ВС на ноль (конец). В 
‚данном случае нельзя использовать 
‚аккумулятор. т.к. в нем находится 
‚байт из экранной области, который 
‚сравнивается со следующим, 

; 

Загрузка первого повторяющегося 
‚байта в приемник. 

;Прирашение ОЕ для того. чтобы ор- 
‚ганизовать по этому адресу счет-‘ 
;ЧИК ПОВТОРОВ. ОДИМ повтор ухе 
‚есть. поэтому сразу заносится еди- 
‚;ница, а не ноль. Это оказывается 

; удобнее при декомпрессировании. 

; Сохраняем в А экранный байт. вы- 
‚зываен альтерн. регистр для орга- 
‚низации в нем счетчика повторов. 
‚как было сказано выше, в счетчик 

: сразу заносится единица. Здесь 67- 
‚дет организован счетчик повторов: 
;Проверка на переполнение. Макси- 
‚;мальное число повторов - 255. 
‚Запись в приемник числа повторов. 


ТЕСЬ 


1 ТЕЛО. 


ТЕЗ 
ТРО4: 
ТЕОб 
ТРОТ 
71208 
ТЕР9 


агЕ5ТЕ 
012600 
АЕ 


ЕБЗА 
Е5 


и 


03 
[2:2 


7. #ТЕСА 
АЕ, АЕ’ 


«Н,) 

К7,, #ТР9б 
АР, АЕ 
#ТРАЕ 


БЕ 


г (#ТЕЕБ) , НЫ 
102  вС,#0026 


ХОЮ А 
АС Н.. ВС 
РУЗН Н, 
РОР ВС 
нс вс 
ВЕТ ь 


Продолжение листинга 1 


;Переход к следующему байту экрана. 
‚Уменьшение счетчика байтов экрана. 
‚Проверка ВС , 

;на ноль 

; без 

; задей- 

‚ ствовования 

; аккумулятора. 

‚Обратный обмен регистров для срав- 
‚нения текушего байта с предыдущим. 
; Сравнение. 

Если не равны, то возврат на 1.1. 
‚Если равны, то восстанавливаем 

; счетчик повторов и переходим на 
:.3 для нарашивания счетчика, 

;Эта операция нужна для того, чтобы 
:при выходе из програмны конпрессии 
;в ОЕ содержался адрес последнего 
‚байта скомпрессированного блока. 
;Берен последний байт из ре, 
;‚инвертируем его 

ри записываем в ‘следующий адрес; 
‚это сделано для упрошения декодру- 
;ющей процедуры, т.к. в ней нохно 
;будет избежать лишней проверки 

: счетчика на ноль. 

Обмен ПЕ и Н. для сохранения РЕ. 
:Возвращаен со стека начальное 

; значение Е. 

;Сброс Флага переноса, необходино 
:для выполнения следующей команды. 
‚отняв от конечной величины ПЕ (ко- 
; торая теперь в НЕ) начальную, по- 
:лучим число байт скомпрёссированн- 
;ной области, но без учета послед- 
‚него контрольного байта, который 
‚является инверсной копией предно- 
; следнего. 

‚;Подставляен полученное значение в 
; Програмну деконпрессии. 

‚Смешение, учитывающее длину 

; декомпрессирующей процедуры. 

Сброс Флагов. 

Получение в М, суммарной длины 
‚блока кодов с учетом декодирующей 
‚процедуры. Перезапись полученного 
‚ значения в регистр Вс и увеличение 
‚его на 1 для учета последнего 

; (контрольного) байта. 


Последняя часть программы (с ТЕПОН) позволяет получить выходной 
параметр в удобном для последующего использования виде. Для этого он 
был предуснотрительно помешен в регистр ВС. Подав команду РЕТНТ 958 

|| 32651 (7Р8ВН) результат работы конпрессирующей процедуры (из регист- 
|1ра ВС) будет выведен на экран: длина скомпрессированного блока (с 
учетом контрольного‘ байта) плюс длина деконпрессора, А при подаче 
команды БЕТ 1.=058 32651 - результат будет понешен в переменную 1. На 
нагнитную ленту должен быть выгружен блок кодов с адреса 32730 
(ТЕАН), длиной 1. 


ТРЕБА 
ТЕРО 
ТЕБЕ 
ТЕОЕ 


ТРЕО 


ТРЕЗ 


ТЕЕА 


ср7соо 
зв. 


Е! 


САЫ, #007С 
РЕС 5Р 
ЕС 


‚;Так выполняется привязка к 


: адресу загрузки. В результате 
:в №, получается адрес начала 

; сконпрессированного блока кодов. 
Оно образуется в результате 

; увеличения адреса загрузки на 
‚величину, занимаемую програнной 
; деконпрессни. 

‚Сейчас здесь ноль, но при работе 
; програмны компрессии сюда будет 
; подставлена длина скомпрессиро- 
; ванного блока кодов. 


Аля того, чтобы ножно было 
компрессировать экраны, записан- 
ные без заголовка, Александр ре- 
конендует дополнить програнну| 
компрессора процедурой загрузки! 
блока кодов без заголовка, кото-й 
рая использует процедуру 13661 
(0556Н) ПЗУ: | 


ТЕТЕ 00210040 10 тХ, #4000 
ТР82 110018 10 10Е, #1800 
ТЕ85  ЗЕРЕР 12 А, РЕ 
ТЕзТ з7 5СЕ 

7ТР88 С05605 САМ, #0556 


ЭФФективность той или иной | 
програнмы во многом зависит от 
того, насколько продунана Бейси- 
ковая ее часть. Ны приводин вари-1| 
ант програнмы “Конпрессор", кото- 
рая в основе содержит программу, 
присланную Александром. Она руси- 
Фицирована способом, которым ны 
постоянно пользуемся (см. "7Х-РЕ-| 
ВЮ"-92 Н 1,2, стр. 30). 


1 60 ТО 100 

2 СГЕАВ 32000; ГОАВ "сьг"СОЕ 
64600 

3 РОВ Н-32638 ТО 32767: ВЕАБ 
Н: РОКЕ Н,Н: НЕХТ Н 

4 вон 

5 5АУЕ "СОНРЕ" ГТМЕ 2: 5ТОР 

8 РОКЕ 23606, 88: РОКЕ 23607, 2 
51: ВЕТУВН 

9 РОКЕ 23606, 0: РОКЕ 23607, 60 

РЕТОЕН 

100 ВОБРЕЕ 7: РАРЕК 7: ТНК 0: С 
15 ‚ 

110 60 508 8 

200 РЕТИТ АТ Т,1;"<1> - ЗАГРУЗК 
А ЭКРАННОГО ФАИЛА"^ТАВ Т; "С ЗАГО 
ловкон" 

210, РЕТНТ АТ 10, 1;"‹2> - ЗАГРУЗ 
КА БЛОКА КОДОВ” *ТАВ Т; "БЕЗ ЗАГОЛ 
ОВКА"*ТАВ 7; "С КОНТРОЛЕМ СЧИТЫВА 
ния" } | 

220 РЕТНТ АТ 14,1;"‹<3> - ЗАГРУЗ | 
КА БЛОКА КОДОВ" ‘ТАВ Т; "БЕЗ ЗАГОЛ 
ОВКА"^ТАВ 7; "БЕЗ КОНТРОЛЯ СЧИТЫВ 
АНИЯ" | 

300 РАОЗЕ 0: 1Е ТНКЕУ$<>"1" АНО 

ТНКЕУЗ‹>"2" АНР ТНКЕУ$<>"3" ТНЕ 
н сото 300 

310 БЕТ 1$: 1КЕУ$ 

400 С1.5 : РЬЛНТ #0; ТАВ 11; ЕЪА5 
Н 1;" ЗАГРУЗКА *: 60 508 9 

410 ТЕ 13-"1" ТНЕН ГОАР ""СОРЕ 
16384, 6912: ТЕТ 1:05 32651 

420 ТР 1%$-"2" ТНЕН РОКЕ 32649, 
г: РОКЕ 32650, 8: 1ЕТ 1.058 32638 

430 1Е 13-"3" ТНЕН РОКЕ 32649, 
86: РОКЕ 32650,5: ЕТ 1,=05Е 3263 
8 

500 60 5МВ 8: РОТ ;: РЕТЕТ 30 
} РАРЕВ 0; ТНК Т; ВЕТСНТ 1; ЕЬА$ 
НЕ" ДЛИНА", 

510 ВЕЕР .1,20: РАЦБЕ 400 ` 

600 РЕГЕТ АТ 21,0; “ИНЯ ФАИЛА ДЛ 
Я ЗАПИСИ: *; 60 508 9: ТНРОТ РЗ. 

610 5АУЕ ЕЗФСОЮЕ 32730, №, 

700 вон 

900 БАТА 221, 33, 0, 64, 17, Ч, 27, 62 
‚255, 55, 205, 86, 5 


910 БРАТА 33, 0, 64,1, 0.27, 17,0, 12 
8. 213, 27, 19; 120, 11Т, 30; 40, 126 
} 920 ПАТА 23Т, 150, 190, 32,246, 13, 
12, 32, 4, 5,4, 80, 26, 18, 19, 8, 62,0 
930 РАТА 60, 40, 229.18, 35, 11:13. 
12, За, 4. 5, 4, 40, 8, 8, 190, за, 214, 8 
940 ВАТА 24,235, 27, 25. 4Т, 19, 18, 
[а35, 209, 115, еЗТ, 82. 34, 229, чет, 1, 
#38. 0, 175, а3Т, 74,229, 193, 3, 201 
| 950 ПАТА 205, 124.0, 59, 59, 225, 1, 
135, 0, 9, 1, 6,0, 11,0, 64, 120, 117,200 
| 960 БАТА 126,231, 160, 190, За, ат 
|, 35, 197, 70, 18, 19, 16, 25а, 195, 35,1 
1, 11,24, 234 

Со строки 200 выводится неню 
|програмны. ‹ Возножны три варианта 
загрузки: Певвый - обычная заг- 
рузка экрана, ‘записанного & заго- 
|ловком, Второй и третий - загруз- 
йка экрана, ° записанного’ без 
заголовка. Эти два режима ногут 
оказаться довольно удобными. так 
как во нногих играх встречаются 
блоки кодов-экраны, записанине 
без заголовка. Режимы загрузки 
экрана без заголовка отличаются 
еду собой тем, что в одном слу- 
чае для загрузки вызывается полн- 
рогранна 2050 из ПЗУ, которая в 
случае ‘ошибки выводит сообщение: 
|"Таре 1оаашив еггог”, ‘а в другои 
‘случае используется подпрограмна 
11366 ПЗУ, при этом работа Бейсика 
1не  прекрашается независино от 
правильности считывания. 
Сразу же; после окончания” заг- 
Грузки внизу экрака Вы увидите ре- 
зультат работы  конпрессирующей 
|програмны: длину сконпрессирован- 
ного блока кодов. После нажатия 
любой клавиши программа предложит 
Ван ввести имя для записи’ полу- 
йченного результата вместе с прог- 
|ранной деконпрессии в виде едино- 
го Файла. ‘после ‘записи ножете 
загружать скомпрессированный блок 
в произвольный адрес АБВ. Вывод 
ва экран - РАНРОНЕХЕ 05 АЮВ. 


Другой вариант компрессии. 

| Продолхая разговор’ © комирес- 
сорах экрана, приведем еше одну 
программу: 

бы Очень часто при разработке ка- 
ких-либо {например обучающих) 
программ, приходится решать воп- 
рос размешения в памяти компьюте- 
[ра большого количества граФфичес- 
1кой инфорнации, рисунков, схем и 
|. д. Причем во многих случаях 
|графка занинает не весь экран, а 
скажем, только средний сегмент 
|й экрана. При этом верхний и вихний 
псегменты используются для других 
| целей, Поэтому за счет компрессии 
ине полного экрава, а лишь одного 
рего сегиента, ‚можно значительно 
[сократить длину скомпрессиронан- 
вного блока кодов. Кроме того, при 
йлеконпрессии ножно вызывать сег- 
менты из памяти независино один 
рот ДРУГОГО, не нарушая соседние. 
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Продолжение аистинга 1. 


; Адрес приенника - экрана. 
; Проверка ВС 

‚на ноль. 

;Выход, если ноль. 

;В аккумулятор заносится байт из 
; сконпрессированноя области. 
‚Перезанцись байта в экран и пере- 
‚ход К следующену байту экрана и 

‚ приемника. | 

; Сравнение его с предьдуин, 

‚ЕСЛИ не равен, то переход на №0 и || 
‚повтор операшии перезаписи и срав- 
; нения, 

‚Переход к следующену байту, в ко- 
‚тором находится кол-во повторов, 

; Счетчик запоминается на стеке. 
:Организуен в В счетчик повторов, 
‚число которых берется из НЕ. 
‚Запись байта в экран. 

‚Переход к следуюмену байту экрана. 
: уменьшение счетчика, если не 9 - 
{то продолжение перезаписи байта 
:из аккунуаятора в зкран: 

:Снимаем ВС со стека 6ез проверки 
‚на ноль. т.к. переход в цикл за- 
}ГрУзки одинаковых байтов нозет 
‚быть только из положительных зна- 
‚чений ВС (нудевой байт инвертиро- 
‚ван по отношению к последнему). 
:Перехоц к следующену байту ском- 
; прессированной области. 

; Теперь БС указывает на байт в Н., 
:в котором находится число повто- 
;РОВ и тоже не может быть в нуле. 
‚Уменьшение счетчика. 

‚Переход на проверку ВС и нерё- 
‚запись байтов, 
;Сконпрессированный блок. кодов. 


конпрессирование проводить за два 
отдельно пля дисплейной 
так как мехду 


этапа, 
части и атрибутов, 
ними появляется разрыв. 


Декомпрессирующий блок являет 
ся единственным для всех сконп- 
При таком 

получать 
т9 но- 
пе- 
запуском деконорессирующей 
програмны надо номер нужного эк- 
рана занести в систенную ячежку 
декомпрессора при помощи РОКЕ. а 
затен вызывать декодирующую про- 


рессированных экранов. 

подходе в памяти можно 
десятки (а если небольших. 
шет быть даже сотни) экранов. 
ред 


педуру. 


В основе приводимой программы 
содержится известный вногим поль- 
"Спектруна“ блок колов 
“сотргезз"СОрЕ 28000, 650. Но Бей- 
сиковая часть сделана практически 
что позволило пользовать- 
большим удобством 
мы 
приводим два варианта програнны: 
для нагнитофона и для дисковода. 

Этот вариант компрёссора явая- 
ется более изошреннынм, чен приве- 
до сия пор програмны. 
{достаточно обратить внимание на 
длину его кодового блока!) Однако 


зователян 


заново, 
ся программой с 


и удовольствием, Кроме того, 


денные 


не говорит. Ведь вахна длина ко- 
печного продукта - скомпрессиро- 
ванного экрана шиюс программы де- 
конпрессии. Этот вариант компрес- 
сора позволяет получить более вы- 
сокую степень компрессии. ‘чем те, 
которые мы приводили до сих пор. 
Мы провели срайнительные испыта- 
ния этого компрессора для тея хе 
экранов. 


3185 байт 


“реазь 54аг“ 
"сашлагоп“ 2128 байт 
"5сооьу Бо" 3946 байт 
"КЕНО" 3439 байт 
"Баъокетг” 2545 байт 
Кроме более высокой степени 

конпрессии, этот вариант конпрес- 


сора позволяет получить следуюмие 
режимы, недоступные друГИМ прог- 
раниам: 

Возможно конпрессирование как 
всего экрана, | так и произвольно 
взяты одного дюбого или двух с0- 
седних сегментов экрана. Програм- 
ма анализирует расположение гра-|’ 
Фической информации на экране и 
выбирает, в зависимости от этого, 
наиболее выгодный способ конирес- 
сирования. При этом во вреня де- 
компрессии Вы можете увидеть, что 
некоторые экрайы разворачиваются 
сверху вниз, аналогично тому. как 


|Правда в’ этом случае придется 


эта длина сана ло себе ни © чем 


-: Н 
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это происходит при загрузке. А 
другие экраны ‚ - разворачиваются 
{что несоиненно 
усиливает зрительный  эФ4ект). 
Правда работает эта программа 
медленнее, чем другие варкаиты 
компрессоров. Компрессия полного 
экрана занинает порядка 1-3 се- 
куни (однако это время не имеет 
значения для конечного продукта). 

Так как кодовый блок програини 
(ны его полностью приводин нихе) 
расположен с адреса 28000, при 
использовании программы с диско- 
водом Вам может не хватить сво- 
бодного места. Для этого в прог- 
ранме используются приемы по сок- 


частности. занена числа 0 на НОТ 
РТ, числа \ - на $Сн РТ, исполь- 
зование вместо числа выражения: 
УАГ. “число”. Без таких преобразо- 
ваний оставлены только строки 
програнмы, реализующие работу не- 
ню, чтобы не замедлять вреня вы- 
поянения этих операций. Все эти 
приемы могут оказаться излишниии 
для магнитофонного варнанта, но 
они обязательны для дискового. 
Текст Бейсик-програнны вначале 
приведен для магнитоФфонного вари- 
анта. Затем будут даны дополни- 
тельные строки, которые позвоаят 
Вам получить дисковый — вариант 
програнны. 

Вот Бейсиковая часть програн- 
мы. Она традиционно русифипцирова- 
на по известиой Ван схеме. 


1 60 ТО Ум. *100- 

2 ВОВРЕК У. “Т”: РАРЕВ УАЬ ” 
|1": ТЫК НОТ РГ: СЬЕАР УМ, *27999 
*: ТЮАБ *СсЬг"СОРЕ 64600 

3 [ОАБ “сошргезз"СОрЕ 28000, 
650 

8 60 1ТО ВОТ Р! 

5 5АУЕ “СОИРВЕЗ5"ЬТНЕ 2: ЗАУЕ 
]"сошргезз"СОРЕ 28000, 650: ЗТОР 
8 РОКЕ УАЕ "23606, МА! "88*: 
РОКЕ УМ. “23607“, УА, "251": ВЕТО 
ЕН 

9 РОКЕ УМ. *23606*, НОТ РЕ: РО 
КЕ УАЕ "23607", СОРЕ *<*;. КЕТУЮН 
30 ВОРПРЕВ 1: РАРЕБ 0: ТНК т: С 
15 : 60 508 8: 60 598 240 

31 РОК Н:=1 ТО НЕ: РЕАР №$: РЕГ 
КТ ТНК б)АТ (У0+(Н-1) иру}, ХО; Н$ 
: МЕХТ Н: РАНТ ТАК 4; АТ 1,3; " 
'ЗРАСЕ, ПОМИ, ЦР, ЕНТЕВ, ВВЕАК" 

За Е НМ‹1 ТНЕН ЕТ НН-ЧН 

33 1Е МНН ТНЕН БЕТ ВН: 1 

34 РЕШИТ АТ (99% (НМ-1) = 0У), ХО- 
ОХ; РАРЕВ 1; 1ЫК 2; ВЕТСНТ 1; ОУ 
ЕВ 1;5$: ВЕЕР. 03, 2#НИ+10 

35 РАШЗЕ 0: ЕТ 1: (1НКЕУ$-” ® 
ОВ 1НКЕУ$-"6* ОК СОРЕ ТЫКЕУ$- 10) 
+ (ТЫКЕЯ$-"7" ОБ СОБЕ ТНКЕУ$-11)1 
2+ {ТЫХЕУ$ "0" ОР СОРЕ ТНКЕУ$-12 
ЮЕ СОБЕ 1НКЕУ?$-13}и3: СО ТО (35+ 
Г) 

ЗТ РЕТНТ НК Б;АТ (90+ИН-1)* 
У), ХО-ОХ; ОУЕЕ 1;5$: ВЕТ НЫ-НИ- 
2*1+3: 60 ТО за 
$8 РОВ Н:1 ТО ВН; РЕТНТ  РАРЕВ. 


8; ТЕК 8; ВЕТСНТ 8; РАЗН (МНН 
); ОУЕВ «Н-МН):АТ (90+ (М-1)=0у), 
ХО-0Х: 5$: НЕХТ Н; ВБЕР . 1.365: РА 
У5Е 10: ВЕТУЕН 

40 РЬТНТ АТ 2, 9; “ЧИСЛО ЭКРАНОВ 

*; 5СВ 

42 РЕТЯТ АТ 3. 3; "КОНПРЕССИЯ СЕ 
ГИЕНТА : "; ВЕС; : 1 ЕЖО‹>ВЕС ТНЕ 
М РАШТ АТ 3,2}; "ОВ"; АТ 3,26; "- 

*; ЕО } 

44 РЕТНТ АТ 4, 6; “СВОБОДНОЙ ПАМ 
ЯТИ : “;65556-1А5Т 

49 БЕТОЕН 

50 ВОЕРЕЕК УАГ *7”: РАРЕК УА, =" 
Т":; ЗИК НОТ Р!: ©1.5 

52 РЕШЫТ АТ УМ. "21", КОТ РГ; "И 
НЯ ФАЙЛА: ": СО 50В УАЕ, "9": ТЫРИЫ 
Т Е$: С1$ 

59 ВЕТИУВН 

100 ЕТ ВЕС-56Н РГ: БЕТ ЕЮ УАЕ 

”3": ГЕТ 5СВ-НОТ РГ: ЬЕТ РИРЗТ: 
УМ. "28350": ЦЕТ ШАЗТ-УАЕ “28650 
*; БЕТ 5=НОТ РЕ 

190 ШЕТ ИН:5СН Р1 

2С0 ОАТА “ЗАГРУЗКА ЭКРАНА”, "РЕК 
ИН КОНПРЕССИИ“. "ПРОСНОТР ЭКРАНА“ 
‚ "УДАЛЕНИЕ ЭКРАНА”, "ЗАПИСЬ ФАЙЛА 
. 

201 ВЕЗТОВЕ УМ. "200": 3ЕТ НН:У 
АГ "5": ТЕТ ХОЗУЛЬ "8": ПЕТ 90-У 
АГ *9*: ЦЕТ ВУ-$6Н РИ: ВЕТ ОХ-УА 
Е * 3": ВЕР 50:* 

*: ВЕТ У1-УАЬ “19°; 
А, *30* 

210 ТЕ ЗСВ-НОТ РТ АНР МН>-МАТ. = 
3" ТНЕВ РВТЫТ %8ОТ РГ РАЗН 56 
НР: " НЕТ ЭКРАНОВ! 

*: ВЕЕР 56Н Р1, НОТ РГ: РАЦ 
ЗЕ УАГ.` "100": СО ТО УД. "190" 

220 СО ТО УМ, “1ЕЗ” "НИ 
‚ 300 РАТА " ВЕСЬ ЭКРАН®. “СЕГМЕНТ 
Ы 1-2”, "СЕГМЕНТЫ 2-3", " СЕГМЕНТ 

1", ” СЕГНЕНТ 2”,“ СЕГМЕНТ 3" 

301 КЕСТОВЕ УАГ “300”: ВЕТ НН-У 
М. *6*: ТЕТ ХО-УА, "10": ТЕТ 90: 
УАЬ "8": ТЕТ РУ-56Н РГ: БЕТ ОК-У 
А. "3»: ЕТ 53: " 

*: БЕТ У1-УА, “19”; 60 508 УАЬ 

*30”;: БЕТОН 
1000 С0 508 Ум, "50% 

1010 ТОАР ЕФСОБЕ 16384, 6912 
1030 РОКЕ УА. "26005", ТНТ. (ВАЗТ/ 
УАТ, *256“): РОКЕ УД. *28004", 145 
Т-УАЬ "256"="РЕЕК УАЬ “28005“ 
1040 РОКЕ УАГ. *28006*, ВЕС-5СН Ру 
; РОКЕ УАЬ “28007", ЕВО- (ВЕС-5СН 
РГ) 

1050 КАНРОНТЕЕ 956 УА. "28010" 

1060 ЦЕТ БЕН-РЕЕК УА!. "28008" +УА 
1, "256" «РЕЕК УЛ, “28009"; БЕТ ЁА 
5Т-ВАЗТ+ЬЕН+56Н РГ: ТЕТ $СЮ-5С8+ 
5СН Р1; БЕТ 5:5С8-5СН РТ 
1070 60 5В УАЬ *8": РЕТНТ ЯЮОТ 


Со 59 У 


РТ; РАРЕК НОТ РГ; ТНК УЛ "1"; В’ 


ВТСНТ 5СН РГ; РЬАЗН 5СН РП" д 
ЛИНА-“; БЕ; * “ 

1080 РАЦЗЕ УАЬ "400* 

1090 60 ТО УМ, "200" 

2000 ТЕТ НИ-5СН Р1: 60 50В УАг * 
300* у 

2010 КЕЗТОКЕ УАГ. "2000*:; РОВ Н:5 
СН РТ ТО МН: КЕАБ ВЕС: ВЕАР ЕЖр: 
НЕХТ и р 

2020 60 ТО Ум, “190” 

2100 БАТА $6Ы РТ. УАГ "3", 565 РТ, 
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УАХ, "2", УМ, "2. АГ *3*, СИ РТ, $ 
СН РТ, МАЕ "2", УА, "2", УЖ, “3, УА 
А | 
3000 1ЕТ 535* (5<5С9) + (5<-8Сй) 
3010 ТНРОТ.("НОНЕР ЭКРАНА {1-”; 5 
СВ; *: 5; : =); СИЕ РВ РР 
$<>*" ТНЕН ТЕТ 5=УАЬ 2% 

3020 ТЕ $<56Н РТ ОВ $5>5СЕ ТНЕН 
60 ТО Ул, *3010* 

3030 ВОЁРЕК УЛ! “Т“: РАРЕК УАЬ “ 
7": ТЫ НОТ РЕ; ©15 

3040 РОКЕ УМ. "28352", 5: ВАНРОМТ 
ХЕ 056 УАЕ "28350": РАОБЕ НОТ РТ 
3050 60 ТО ЧА “г00- 

4000 ТР 5Си:ЗЕН РТ ТНЕН ТЕТ №АЗ 
Т-УАЬ "28550"; 60 ТО УАБ "4100* 
8010 ГЕТ А-НОТ РГ: ЪЕТ С-А: БЕТ 
ГЕН:УАЕ “28649*: РОВ Н-5СН РТ ТО 
$СВ: ТЕТ ГЕН-ГЕН+А+СКУА!. *256*+ 
ЭСН РГ: БЕТ А-РЕБК ГБН: 1ЕТ С-РЕ 
ЕК (ТЕН+5СН РГ): НЕХТ В: 1ЕТ 145 
Т-ЬЕН 

4100 ТЕТ 5СВ:5СВ-56Н РГ: ЕТ 5:5 
СВ-5ЕН РЕ 

4110 60 ТО УАЬ "200" 

5000 60 $0В УА1. *50> 

5010 ЗАУЕ ЕЗСОПЕ 28350, ГАЗТ-ЕТР5 
* 

5030 УЕРТЕУ ЕЗСОПЕ 

5050 60 508 УМ, "8": РЕТНТ НОТ 
РГ; ТУУЕВЗЕ 5СИ Р!;” ЗАПИСЬ и 
ВЕРИФИКАЦИЯ - ОЕ. “ 

5060 БЕЕР УМ. ". 1", МАЕ "26"; БЕЕ 
Ро УАЕ =. 1", АЕ *20": РАИБЕ УАЬ " 
100” 

5070 60 ТО УАЬ "190* 


Програнны. подобные этой, Вы 
уже встречали ‘на страницах *РЕ- 
ВЮ", поэтому не буден подробно 
останавливаться на каждой ее час- 
тя. Перечислим ‘только основные 
Фрагменты: 

Строка г - автостарт, загрузка 
кодовых блоков. 

Строка 5 - санозапись, програн- 
ны на нагнитную ленту. 

Строки 8 и 9 - переключатели 
шрифтов, соответственно русского 
к латинского. 

Строка 30 - поипрограина рабо- 
ты меню. Она была попробно расс- 
мотрена в "7:-РЕВЮ” Н 9-10 за 
1992 г., стр; 19т: 

Строка 40 - вывод основных ре- 
хинов и состоякия конарессора. На 
экран выводится следующая инфор- 
нация: число  скомпрессированных 
экранов, режин компрессии - какие 
сегиеяты заданы для компрессиро- 
вания, количество оставшейся сно- 
бодной памяти компьютера. 

Строка 50 - ввод имени Файла 
пия загрузки и записи. Если при 
выполнении загрузки в ответ на 
запрос имени нажать ЕНТЕЮ, ничего 
не вводя, ‘то загрузится первый 
встретиваийся кодовый файл. 

Строка 100 - инициализация. 

Строка 200 - главное меню 
програнны. задаюшее резины работы 
компрессора. 

Строка 300 - Второе меню. ‘за- 
цающее сегменты для компрессиро- 


Строка 1000 - загрузка очеред- 
ного. экрана. 
Строка 2000 - задание сегмен- 


компрессии (вызов 


второго меню). 

Строка 3000 - просмотр сконп- 
|рессированных экранов. Здесь сле- 
пдует отнетить организацию ввода 
|нонра просматриваемого экрана. 
|ПРи запросе предлагается вариант 
по соглашению. Если предложенное 
ичисло Вас не устраивает, введите 
|свое значение, если устраивает - 
просто нажните ЕНТЕЕ. Предложение 
|варианта по ° соглашению (строка 
13000) организовано так. что после 
загрузки очередного экрана к 
| ПРОСМОТРУ предлагается этот пос- 
|ледний экран; После его просмотра 
|по соглашению в следующий раз бу- 
|дет предложен первый экран, после 
|его просмотра - второй и так да- 
плее до последнего, затем опять 
|первый и так далее. Так можно 
| просмотреть всё экраны, ничего не 
вводя, ‘а ножно в любои момент 
| вмешаться в этот порядок и ввести 
|свое значение. 

Строка 4000 - удаление экрана. 
Надо ли здесь организовать запрос 
для подтверждения Вашего решения? 
|организуйте его сами, если хоти- 
|те. Удаляется всегда только пос- 
|педний экран. Это может создавать 
|некотрое неудобство. Хорошо, если 
бы можно было удалять любой из 
скомпрессированных экранов, но 
это потребует вмешательство в 
|блок кодов. В общем-то ничего 
| принципиально сложного здесь нет. 
|Надо только рассчитать место уда- 
пляемого ‘экрана, определить. его 
длину и организовать при помоши 
|машиннокодовой команды №1В пе- 
реброску ‘следуюших экранов на 
место удаляеного. Все, что необ- 
|ходимо для такого рассчета, нахо- 
|дится в строках с 4000. Ножет 
Ибыть кто-нибудь из читателей и 
исделает такое усовершенствование. 
Строка 5000 - запись всех 


| 


с програмной декомпрессии в виде 
единого Файла. Если при задании 
имени Файла нажать ЕНТЕК, ничего 
[не вводя, то програнма вернется в 
|режин основного меню (см. строку 


работе с  БЕТА-диском, 
должны быть изменены строки, свя- 
|занные с загрузкой и выгрузкой. 
Мы приводим ниже вариант строк 
"для адаптации программы под дис- 
Вы можете набрать и хра- 
|нить их отдельно, а при адаптации 
Пподгрузить к основной  Бей- 
|сик-программе при помдши МЕКСЕ. 


2 ВОЕРЕЕ УАГ, "Т": РАРЕВ УА " 
Т": ТК ВН : СЬЕАВ УАГ "27999": 
ВАНРОНТ7Е 05 УАГ, "15619": ВЕН 
БОАБ "СсЬг"СОРЕ 64600 
3 ВАНООНТИЕ 058 УА, "15619": 
БОАБ "сошргезз"СОБЕ 28000, 


5 60 508 УАЁ "90": 5ТОР 
6 РАНПОМТУЕ 958 УАГ. "15616" 


Т $ТОР 

90 КАНПОМТ2Е 058 УА, "15619": 
ВЕН : ЕБАЗЕ "СОНРВЕ5$5" 

92 КАНРОНТ2Е 95К УАЬ "15619": 
КЕМ : бАУЕ "СОМРЕЕЗ5" 11МЕ 2 

99 ВЕТОКН 
1000 СО $0В УАЬ "50": 
НЕН СО ТО МАЕ "200" 
1010 ГЕТ ЕВЕ-У5В УАЬ "15619": ВЕ 
М : ГОАО РЗСОБЕ 16384, 6912 
1020 ТР ЕКВ<>НОТ РТ ТНЕН 60 ТО У 
АГ "1500" { 
1500 СО $98 УАГ "8": РЕТНТ АТ УА 
Г "10", УАЬ "9"; ЕЬАБН_56Н РТ;“ 
ОШИБКА "; ЕВЕ; "” "”’ РЪАЗН НОТ Р!* 
" ВЫВОДИТЬ КАТАЛОГ ДИСКА? (У/Н)” 
1510 ВЕЕР 56Н РТ, НОТ РГ: РАОБЕ Н 
ОТ РГ: ТЕ 1НЕЕУ$<>"у" АНР ТЫКЕУ$ < 
>"У" ТНЕН 60 ТО УА "200" 

1520 60. 59В УАГ "9": КАНРОМТЕЕ Ц 
5 МАЕ "15619": ВЕМ :. САТ 

1530 РАЧЗЕ УАГ "400" 

1540 60 ТО УАЬ "200" 

5010 ГЕТ ЕВВ-0$Е УАГ "15619": ВЕ 
Н : 5АУЕ ЕЗСОБЕ 28350, ГАЗТ-ЕТЕЗТ 
5020 ТЕ 'ЕКЕ<>НОТ РТ ТНЕН 60 ТО У 
А, "1500" 

$5030 ГЕТ ЕЕЕ-05Е УАГ "15619": КЕ 
М : УЕВТРУ ЕЗСОБЕ 

5040 ТЕ ЕКЕ<>НОТ РГ ТНЕН С0 ТО У 
АГ, "1500" 

Строка 5 - как и раньше, сано- 
запись программы (только Бейсико- 
вой части) на диск. Она выполня- 
ется при помоши подпрогранны со 
СТРОКИ 90, так как в одной пятой 
Бейсик-строке не ножет выполнять- 
ся более одного оператора ТЕРО$5. 

Строка 6 - переход в ТВ-005 
для выполнения каких-либо дейс- 
твий. После возврата оттуда по 
конанде ВЕТИВН, попадаем на $ТОР 
в строке 7. 

Строки с 1000 - загрузка экра- 
на с диска. Здесь в случае ошибки 
при загрузке (например отсутствие 
файла на диске), происходит пере- 
ход на строку 1500. Выведенный на 
экран код ошибки позволит Вам со- 
риентироваться, почему произошла 
ошибка (коды ошибок см. в рРУКо- 
водстве по Тк-005). 

Строка 1500 предлагает вывести 
каталог диска, для того, чтобы Вы 
ногли еше раз уточнить, есть ли 
нужный Файл на этом диске или 
нет. На, строку 1500 программа мо- 
жет перейти и из СТРОК с 5000. 

Строка 5000 - режин записи 
Файла на диск, а также выполнение 
его верификации после записи. 

Для тех читателей, которым, не 


ТР Е$-""Т 


знаком кодовый блок программы 
"СОМРКЕ$5”", мы приводим его пол- 
ностью. (Тем, у кого он есть, 


можно его не набирать, а взять из 
имеющейся программы в готовом ви- 
де.) Для’ набора его Вы можете 
воспользоваться рекомендациями и 
програмной для шестнадцатиричного 
ввода сн. — “2Х-РЕВЮ"-91, М 3, 
с. 59. 
6060: 
610658; 
6270: 
6078: 
6080: 


30 01 00 00 ЕА 6Е 00 01:58 
80 03 РО 21 60 60 РР 36:83 
03 01 СР 85 62 Е5 ЕЮ 36:В8 
03 00 СВ 85 610 11 ЕР 52: В1 
28 РП 36 03 01 ЕО 6Е 04:6В 
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Методы Билла Гильберта. 


" По-видимому, среди програнм, 
находящихся у пользователей, име- 
ющих Синклер-совместимые компью- 
теры, ничто так не распростране- 
но, как програнны, взлонанные 
Биллом Гильбертом. 

В этой статье Вашему вниманию 
|будет предложена информация о 
специфике некоторых приенов оФор- 
ления программ, применяемых этим 
хаккером. Неснотря на внешнюю 
схожесть эффектов,  получающихся 
В ходе работы программ, ° Гильберт 
|не всегда действует по одному 
шаблону. У него их достаточно 
много, хотя иногда они очень 
похожи и, разобравшись с одним из 
|них, Вам нё составит труда понять 
принципы действия остальных. 

| Как Вы уже вероятно знаете, 
Билл Гильберт всегда оставляет 
текстовые сообщения на взлонанных 
им программах. Несмотря ‘на то, 
Что в последние годы он явно по- 
|скромнел, и большинство его сооб- 
шений можно перевести с ` английс- 
как "Дисковая версия Билла 
(по-английски: П1зкед 
ИЪУ В111 С11Ъегф), в отличие от 
ранее использованиегося автографа 
"Взлонано Билом Гильбертом” (по- 
панглийски: Сгаскез Бу В111 611- 
Ъег{), его методы остались тени 
хе и основная’ цель, которую он 
| преследовал вставкой подобных со- 
общений не изменилась. При изуче- 
нии его "творчества" необходимо 
юсознавать неэтичность действий 
Гильберта и относиться к этому 
так же, как и к тону, что некто 
на наших глазах роется в чужих 
карманах (хоть и делает это вы- 
сокопрофессионально). | 

В то же вреня, опыт хаккера 
может быть использован при оФфорн- 
лении програнм, совершенствовании 
их дизайна, что делает работу 6о- 
лее простой, удобной’ и увлека- 
| тельной. 

| При использовании приводиного 
нами материала необходимо учиты- 
|вать, что большинство рассматри- 
ваемых програнм написаны в машин- 
ных кодах. Это еше раз говорит о 
йтом, что высокого уровня профес- 
сионализна нохно добиться только 
изучив программирование на языке 
|Ассемблера. Несмотря на то, ‘что 
большинство расснатриваеных про- 
цедур снабжены подробным комнен- 
‘тарием, мы настоятельно рекомен- 
дуем Ван перед прочтением данного 
материала поблихе познакомиться с 
|програнмированием в машинных ко- 
дах. Одной из лучших книг,  кото- 
рые нам приходилось встречать, по 
данной тематике, является нетоди- 
ческая разработка  “ИНФОРКОНа" 
"Практикум по программированию В 


_ вногое другое. 


Мы рекомендуем Вам для начала 
просто ознакомиться с текстом 
статьи, получить представление об 
основных приемах и методах, а по- 
том уже детально изучать проблему 
по разделам. Мы старались подго- 
товить информацию таким образон, 
чтобы она не требовала специаль- 
ного запоминания, а усваивалась 
постепенно по ходу внинательного 
прочтения, 

Необходино также учитывать, 
что данный материал тесно связан 
с той информацией, которая дава- 
лась в предыдуших статьях. осо- 
бенно это касается методик взлома 


рассмотренных систем зашиты. 
Впрочен, если Вы и не читали пре- 
дыдушик статеи, то не отчаивай- 


тесь - нижеследующий текст отли- 
чается определенной автононией от 
предыдушего натериала и не требу- 
ет особой подготовки, интересен 
как для професионалов, так и для 
начинающих. Желаем Ван удачи при 
изучении! 


Современные разработки 
Билла Гильберта. 


Билл Гильберт работает над 
взломом програны уже много лет. 
За это время ему удалось нако- 
пить достаточно большой опыт в 
этих вопросах. Постоянно совер- 


шенствуя свою технику програм- 
нирования он достиг того уровня, 
который ны видим в последних 


взломанных ин програнмах. 

Наиболее любопытными среди них 
являются Ггоп Нап и 5уш $14У. В 
этих програнах использован ориги- 
нальный вывод текстовых сообщений 
© взломе, который свидетельствует 
© высоком профессиональном уровне 
программирования хаккера. В обеих 
програннах используется совмеше- 
ние программы на БЕИСИКе с про- 
грамной в машинных кодах, обе эти 
програмы схожи также, и по СстрУк- 
туре загрузки и по методике взло- 
на, приненненной хаккером. Это 
позволяет рассматривать обе йро- 
граммы как две оригинальные ветви 
одного типа взлома, В них можно 
найти очень нного общего, в том 
числе: общие процедуры на Ассен- 
блере, схожесть расположения про- 
цедур в адреснон пространстве и 
Но, в тоже вреня, 
существуют довольно разительные 
отличия, которые предопределяют 
необходимость индивидуального 
расснотрения кахдой програнмы. В 
первую очередь это касается ме- 
тодики вывода текстовых сообщений 


на экран и, во-вторых, нетодики 
создания оригинальных моделей 
шрифта. | 


Рассмотрим более подробно эти 
нетоды на обеих програнмая. 


1топ Нап. 
10. РАРЕВ` НОТ РТ 
ТНК НОТ РТ 
30 РОКЕ УМ, "23624", МОТ РТ 
СЬЕАВ УАЬ "24499" 
ОЧТ Ул. "254", НОТ р 
КАНРОМТ2Е 95 УАЁ.: "23789" 
ГОАБ "ТЕНМАН1” СОРЕ 
ТОАБ “ТВОНМАК2" СОРЕ 
КАНРОНТ2Е УЗВ УАЬ "25ЕЗ" 


100 ВЕМ НО РОКЕ 
110 ВАНРОНТ2Е 058 УА "24036" 


Как видим, данная програнна 
практически не имеет стройной! 
системы зашиты; такой вид она! 
имела сразу же после того, как\ 
ее обработал Билл Гильберт. В 
строке 100 хаккер сам предупреж-!| 
дает нас, что в программе отсут- 
ствуют зашитные РОКЕ$. Структура 
пргранны на БЕИСИКе достаточно 
проста. Строки 10-20 делают цвет 
ТК и РАРЕВ черным, строка 50 
делает черным и цвет бордюра. | 
Как Вы могли заметить, в пРо- 
гранме трижды используется за- 
пуск процедур в машинных кодах, 
но нас будет интересовать только 
самый первый запуск в строке 60. 
именно благодаря ему создается| 
оригинальное текстовое сообшение 
характеризующееся необычным со-! 
четаниен цветов, и использовани- 
ен необычного шрифта. Расснотрин 
подпрограмну в ‘нашинных кодах! 
более подробно. 


САШ. 
САМ, 
САМ, 
САМ, 


Н5рОТ 
#5023 
#5045 
#5064 
САМ, В5ОТТ 
САМ, Н5БА1 
1.0 НЕ, 3000 
ВЕС Н 

ГО (5036), НЬ 
РЕТ 


гр нь, 3000 
[р ОЕ, 9640 
РУЗН БЕ 

Ьр ВС, 0300 
ЕЛ. А, (НЬ) 
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ов (нь) 

Ь2 (РЕ), А 
НС НЕ 

ТНС ОЕ 

ЕС ВС 

ЬЛ А, В 
ос 

У8 Н2, Н5011 
РОР ОЕ 

БЕС р 
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№5007 


#5011 


№5023 1Рр НЬ, 5006 
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Гр В.1Е 
45028 1 А, (НЕ) 
СР 0Б 
У 2, 5930 
тыс ни, 
РНЕ Н5О2в 
12 А, 1Е 
598 В 
0 (5040), А 
0 В, А { 
ЕЛ А, го ь 
508 В 
5РЬ А 
10 (5541), А 
ВЕТ 


№5040 ХОЮ А 
САМ, 1601 
О А, 16 
в5Т 10 
ХОВ А 
В5Т 10 
ГЛ А, (5041) 
В5Т 10 
10 А, 10 
В5Т 10 
ХОЕ А 
В5Т 10 
Л А, {5040} 
О В, А 
| Го НЕ, 5006 
ИН5О5Е В А, (Н1,) 
| В5Т 10 
тыс нь 
ОУН Н505Е 
ВЕТ 


#5064 1.6 Н1., 5С00 

10 А, 16 
‚вт 10 

1 А, 01 
В5Т 10 
ТНС А 
вэт 10 

Н5О6Е ЬД А, (НЫ) 
СР 00 
ВЕТ 7 
В5т 10 
нс н, 
38 Н506Е 


ПН5ОТТ ХОР А 

ГО (5042), А 
10 в, 07 
|н5ртр РОЗН ВС 
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р НЕ. 5АСО _ 
12 ОЕ, 5АС1 
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О (НА 
У 

САМ, Н5РУВ 
1 А, (5042) 
ТС А 

ГЛ (5042), А 
РОР ВС 


ИН5рА1 10 1Х, 0000 


Н5ОВ! РОЗН 1. 


РУЗН ВС 

О ВС, 15043} 
РУЗН ВС 

тс вс 

ГР (5043), ВС 
РОР ВС 

РИН НЬ 

5ВС Н, ВС 

го (ны, в 


ок с 
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Если Вы внимательно приснотри- 
тесь к програмне в нашиных кодах, 
то обнаружите, что текст ее сос- 
тавлен весьма профессионально, 
Программа на языке Ассенблера 
обычно характеризуется очень 
большин объёмом. Чтобы облегчить 
работу с ней, некоторые логически 
законченные действия оформляются 
в виде отдельных процедур - под- 
программ, которые следуют одна за 
другой. Управление этими процеду- 
рами осуществляется из головной 
программы на языке Ассемблера, 
которая последовательно вызывает 
каждую процедуру. используя опе- 
ратор САШ.. 

Внинательно присмотревшись к 
листингу програмны, Вы обнаружи- 
те, что программа Билла Гильберта 
не исключение. В этом листинге 
очень четко проснатривается го- 
ловная програнна управления и 
процедуры в машинных кодах. 

Рассмотрим, что выполняют про- 
цедуры этой программы. Для этого 
проследим, какой визуальный эФ- 


‚Ффект получается при работе про- 


граммы в целом. После запуска 
программы экран становится чер- 
ным, после этого на НИЖНИХ СТРОЧ- 
ках появляется надпись "ТЕОН НАН" 
и постепенно высвечивается сооб- 
шение "ОТ5КЕХ ВУ ВИЛ, СИ.ВЕЕТ 
1991". После того, как последняя 
надпись высветилась полностью, 
все буквы начинают переливаться 
разными цветаки. Особый колорит 
оФориления достигается за счет 
использования в програмне ориги- 
нального шрифта. 

Как Вы видите, программа сос- 
тоит из шести ’слррограмн, каж- 
дая из которых выполняет опреде- 
ленную функцию дия достижения ви- 
зуального эффекта, описанного вы- 
ше. Таким образом, одна из них 
Формирует утолшенный шрифт, сле- 
дующая затенняет экран, следующая 
за ней процедура ответственна за 
распечатку первого текстового 
сообщения, второе текстовое сооб- 
шение, как Вы помните, выводится 
на экран достаточно оригинальным 
способом - путем постепенного вы- 
свечивания информации от середины 
к краям экрана, следующая проце- 


дура обеспечивает переливаютуюся 
различными цветами окраску букв. 
Однако, наибольший интерес для 
читателя. на наш взгляд, пред- 
ставаяют не все процедуры, ис- 
пользуемые Биллом Гильбертом, а 
лишь некоторые из них. В частнос- 
ти. Формирование оригинального 
шрифта. Поэтому не будем здесь 
Подробно рРасссматривать каждую 
процедуру программы в машинных 
кодах, а остановимся на расснот- 
рении лишь саных интересных из 
них. Оставленнные за пределами 
нашего изучения процедуры доста- 
точно просты и не нуждаются в 
ПОДРОбНОН объяснении и коммента- 
РИИ. 
Рассмотрим процедуру Формиро- 
вания утолшенного шрифта. Одним 
из недостатков  знакогенератора 
Спектруна являются тонкие буквы 
- поэтому многие пользователи жа- 
луются на нечеткость надписей, 
выводиных на экран. самым прак- 
тичным методом создания утолшен- 
ного шрифта ножно считать модели- 
рование нового знака, как налохже- 
ние нормального знака и знака, 
сдвинутого на одну точку влево. 
Форнирование нового шрифта обычно 
начинается перемещением встроен- 
ного знакагенератора "Спектрума” 
в свободную область оперативной 
памяти. Следующим этапом является 
изменение знакогенератора, нахо- 
дяшегося в ОЗУ, в соответствии с 
нашими требованиями. И завершаю- 
шин этапом является переключение 
системной переменной, указывающей 
на место расположения нового зна- 
когенератора, образовавшегося в 
ходе наших переделок. Рассмотрим 
подпрогранму ‘на Ассембиере, вы- 
поаняютую данные Функции. 
55007 12 Н, 3000 
10 Е, 9С40 
РОЗН БЕ 
Ьр ВС, 0300 
#5011 1 А, (НР) 
ВКА 
ов (н) 
ГР (БЕ), А 
9:1 
ТС БЕ 
РЕС ВС 
10 А, В 
о с 
УВ НЕ, Н5П1 1 
РОР БЕ 
` ЕС 
10 (5636), БЕ 
ВЕТ 
В начале в регистр Н. мы за- 
гружаен начало встроенного знако- 
генератора Спектрума - 3000. Пос- 
ле этого в регистр ОЕ загрукается 
адресс нового месторасположения 
шрифта, а в регистр ВС ны заносим 
общую длину области знакогенера- 
тора. Далее начинается работа в 
цикле. Мы загрухаен в аккумулятор 
то, что нахоцится в ячейке паня- 
ти, на которую указывает регистр 
Н., то есть первый байт области 
знакогенератора. следующий этап - 
это ротация аккунулятора вправо, 
причен бит 0 перенешается во Флаг 


3 Эак.390 
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Ипереноса, а Флаг переноса - в 
бит Т. Более подробно эта опера- 
1 ция показана на структурной схе- 
|йме, приведенной нихе. 


> 


ЛАББЫЕЫН [2] 


Схена 1.0: 


С -- Флаг переноса . 


Таким образом, мы  получаен 
байт знакогенератора, который яв- 
ляется смещенным вправо на один 
бит относительно первоначального 
ибайта. Теперь нам необходино вы- 
|полнить конанду "ИЛИ" (0) над 
Гобразовавшинися байтами. ‘Команда 
|"ИЛИ” (08) исполняется побитным 
|сравнением двух двоичных чисел. 
[результат ее работы равен едини- 
це, если данный бит включен хотя 
бы в одном из операнлов: в пер- 
вом, или во втором, ‘или в обоих 
йвместе. Таким образом, в резузт 
|тате может быть ноль только если 


|в обоих операндах ноль. В против- 
нон случае получается единица. 

) ‚ Пример 1.0; 
1010 1010 (АА) 
1100 0000 (Со) 


| Первый операнд 
Второй операвя 


Продолжин рассмотрение  про- 
граммы, Формнирующей  утолшенный 
Иарифт. После того, как мы прРоиз- 
вели операцию логическое “ИЛИ" 
над двумя байтани, ны загружаем 
образовавшийся ‘байт в ячейку па- 
мяти, ‘адрес которой находится в 
ОЕ. Таким образом начинается Фор- 
мирование нового знакогенератора 
|в свободной области оперативной 
паняти, поскольку именно в регис- 
| тре РЕ содержится начало заданной 
для этих целей области озу. ; 

Следующин этапом мы увеличива- 
ен содержимое регистров НЬ. и ПЕ 
|на единицу, т.е. переходим к сле- 
Гдующему байту знакогенератора и 
записываен его изнененный вариант 
1в новое место оперативной паняти. 
В то же вреня, нам необходим кон- 
|троль, чтобы нодиФидировать толь- 
ко „файты знакогенератора и не 
пбольше. Для этой цели мы исполь- 
|зуем регистр ВС, значение которо- 
го уменьшается на единицу после 
[модернизации очередного  баита 
Изнакогенератора. 

Следующин этапом програнмы яв- 
ляется проверка достижения нуля в 
регистре ВС. Если ноль. не достиг- 
Инут, то мы новторяем все операции 
сначала, только со следующин бай- 
том шаблона символа, Однако, если 
в регистре ВС остался ноль, это 
|свидетельствует о том, что ны 
| обработали всю область знакогене- 
ратора. 
| После этой проверки мы восста- 
'навливаем со стека значение ре- 
гистра БЕ, причем обратите внима- 
ние на то, что на стек засылалось 
значение регистра, которое соот- 
ветствует месторасположению новой 


области знакогенератора в 03. 
Теперь нам достаточно уменьшить 
значение регистра Р на единицу, и 
В регистре РЕ у нас окажется ад- 
рес, указывающий на 256 байтов 
ниже той области памяти, где рас- 
положен альтернативный знакогене- 
ратор, Форнируеный нани в ходе 
выполняемых операций. Теперь нан 
осталось занести это значение в 
область систенных переменных, 
чтобы указать на месторасположе- 
ние нового набора шаблонов симво- 
лов. Последнин шагон является 


возврат в головную программу в. 


машинных кодах. , 

Как видим, ничего сложного в 
подобном преобразовании нет. При 
хелании Вы можете использовать 
эту процедуру в своей работе. для 
этого мы написали похожую проце- 
ДУРУ в виде отдельноьй програнмы 
на БЕЙСИКе, запустив которур, Вы 
снолете подробно разобраться с 
работой генератора  утолшенного 
шрифта. 


10 ТЫРОТ "5ТАЮТ АОКЕЗ5 = 
20 ГЕТ $ОННА:О 

30 РОВ Н-АБЕЕЗ ТО АБВЕЗ + 68 

40 БЕАО ВУТЕ: РОКЕ. Н, ВУТЕ 

50 ГЕТ $ОННА = 5ОМВА + ВУТЕ 

60 МЕХТ Н 

65 ТЕ ИННА <> 6932 ТНЕН $ТОР 
100 РЕР ЕН 6(А$) - 058 АРКЕЗ 

110 РЕТЕТ АТ 15,7; 

115 ГЕТ 2М=РН 6(15 ТТ 6000 ?) 
170 РЕТЕТ АТ 17, Т; "АНО НОМ?" 

200 РАТА 42,11, 92, 35, 35, 35, 35, 
126, 92, 35, 125, ВТ, 35, 
10, 235, 94 

123,254, 31, 216, 254, 12т, 
208, 22, 0, 197, 229, 33, 
160, 0 

РЗТ, 15, 123, 92, 9, 235,41, 
41,41, 237, 15, 54, 92, 9, 6, 
8, 126 

203, 63, 128, 16, 19, 35, 16, 
241, 62,2, 205, 1, г, 62, 
164, 215 

225, 35, 193, 16, 203, 201 


*; АПВЕЗ 


210 РАТА 


220 РАТА 


230 БАТА 


240 РАТА 


Данная программа являтся пере- 
нещаеной: ее можно понестить по 
любому адрессу, 

ВЫЗОВ : [ЕТ 2Н = ЕН С (“"ТЕКСТ" 

ТЕКСТ может содержать знаки с 
кодами от 32 до 12Т включительно. 
Если ПРИСУТСТВУЮТ ДРУГИЕ СИМВОЛЫ, 
вывод на экран автонатически ос- 
танавливается. Програмна строит 
утолщенные знаки. как СВАРНГС$ 
"0", поэтому в своей программе 
нельзя переопределить этот син- 
вол, так как после выполнения 
конанды вывода текста СВАРН!С5 
*Ц" стирается. 

На этон закончим расссмотрение 
того, как Билл Гильберт оформил 
програмну "1гоп Мап” и теперь 
займенся програмной "буш $14". 


Зир СУ 
10 РАРЕВ НОТ РТ 
20 ТНК МОТ РТ 
30 РОКЕ УАЬ "23624", НОТ РТ 
0 СЬЕАР УА "24499" 
50 ООТ УМ. "254", НОТ РТ 


` данной програмны очень схох с 


60 БАМПОНТЕЕ 955 УАГ "23191" ] 
ТО 1ОАР "5ТНСТТУ1" СОБЕ УАГ, "4Е&” 
80 С1,5 
90 КАНПОНТОЕ 05В УАГ "ЗЕД" 
100 РОКЕ УАГ. "23739", СОБЕ "о" 
110 ГОАР "ЗТИСТТУг" СОБЕ 
120 15 
130 ТОАР "51НСГТУЗ” 'СОБЕ 
140 РАНРОНТТЕ 05В МАГ "24500" 
150 ВЕМ КО РОКЕ 
160 ВАНРОМТТЕ 958 МА. "20450" 
как видим, БЕИСИК-загрузчик 
аналогичный загрузчиконм программы! 
*1ЕОН НАН". В нем практически от- 
сутствуют какие-либо хитроумные | 
операции направленные на зашиту 
програнмы от просмотра. Билл 
Гильберт сан предупреждает нас о 
том что, программа практически 
не зашишена. 
Фактически эффект, возникающий! 
в ходе работы программы в мамин-| 
ных кодах очень схож с аналогич-| 
ным ‘эффектом в програме "1гоп| 
Нап". Однако,  профессиональный| 
Програмнист сразу же обратит вни-| 
мание на то, что вся информация! 
выводится своеобразным шрифтом. | 
Причем, если в предыдущей про- |. 
гранме для вывода сообщения ис-| 
пользовался обычный — утолшенный 
шрифт, в данном случае ны имеем} 
дело с некин подобием готического 
шрифта. Начинающий  програмнист| 
ножет предположить, что ‹ этот 
шрифт загружается вместе с исход-! 
ным текстом ‘ програнны, однако 
дополнительные 168 байтов может 
себе позволить далеко не каждый! 
загрузчик. В нашем примере Биллу! 
Гильберту с ‘помощью использования! 
специальных  конанд процессора! 
удалось сформировать готическми 
шрифТ из обычного шрифта  "Спек-| 
труна". Кроме того, подпрограмна| 
в машинных кодах, работающая в| 
програнме "518 С147", обладает! 
целым рядом новшеств, делающих ее! 
очень увлекательным. | 
Расснотрим листинг процедуры в| 
нашинных кодах более подробно, 
САМ, 8502) 
САМ. 85193 
смыл, 5074 
САМ, Н5БВА 
САМ. Н5Ог 
САС. Н5069 


45002 10 В, 07 
ХОК А 
Ьр (5073), А 
#5208 10 1, 5АСО 
РОЗН ВС 
ГЛ А, (5073) 
ТЫС А 
БР (5073), А 
го в, 40 
РОЗН ВС 
О А, (5073) 
ГО «Н.А 
ТС нь 
РОР ВС 
САМ. Н5Б25 


#5025 РОЗИ ВС 
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Н5рё8 


н5ргр 


н5рзе 


Н5РЗА 


Н5РЯА 


#5063 


#5069 


#5074 


#508 В 


#5093 


ЬО №,, БРА 
ЕО В.1Е 

О А, (НЫ) 
СР 0Б 

В 2; Н5ОЗА 
ТВС нь 

руН7 Н5рза 
ГО А, 1Е 

598 В 

БО (5072), А 
1.2 В, А 

12 А, го 

598 В 

5ВЕ А 

Гр (5071), А 
ВЕТ 


; 


ХО А 

САШ. 1601 
О А, 16 
Е5Т 10 

ХО А 

В5Т 10 
ЛА, (5271) 
В5Т 10 

10 А, 10 
УТ 10 

ХОЕ А 

В5Т 10 

Г А, (5072) 


ЕС Н 


ВЕЗ 4, (19+01) 

ВА 

1 А, (000Е) 

ПСА 

1С А 

12 В.Л 

раны. 

ГртЕ 

РОР НЕ 

ГОА, Н 

50В 03 

10 Н.А 

50в Н 

12 В.А 

хов с8 

ГЛ р. А 

И Е. Г 

12 С.Е 

7: 

ЗЕТ 0. В 

ХОР С8 

ЗЕТ 1А 

ов в 

10 В,А 

РУЗН БЕ 

поте 

РОР НЕ 

РУЗН НЕ 

р ВС, (лаг) 

р в, с 
Н5РрТ РИН ВС 

50В А 

12 В, А 

ЗЕТ г.в 

тис н, 

ис н. 

Тис нь 

тс Н, 
НЕО 1 А, (НЕ) 

ГО С.А 

ЗЬА А 

ов с 

10 (НЫ. А 

сн. 

РУХ Н5ОЕО 

РОР ВС 

ОУН Н5БОТ 

РОР РЕ 

ЕХ Е, НЕ 

ЕС Н . 

№) (5С36), нь 

ЕТ 

ЕТ 

данная програнма на Ассенблере 

по своей структуре очень похожа 
на рассмотренную ранее в програн- 
ме "гоп Нап. "” Однако, это только 
внешнее сходство. Большинство 
процедур в машинных кодах выпол- 
нены по новому принципу. Однако. 
все они достаточно принитивны и 
мы надеенся, что читатель сам 
сножет разобраться с ними. Ны же 


остановимся лишь на процедуре 
создания готического шрифта. Она 
начинается с метки Н5093 (сн. 
яистинг выше). 

При создании этой процедуры 
Билл Гильберт, очевидно; не зада- 
вался целью сделать ее доступной 
для понимания широкого круга чи- 
тателей, скорее наоброт. Он запу- 
тал ев как сунел. Нам пришлось 
провести работу по расшифровке и 
полученной информацией мы’ готовы 
поделиться с читателем. 

В этой подпрограмние в`машинных 
кодах Билл Гильберт  совместил 
выполнение двух Функций: затенне- 
ние экрана (экран становится чёер- 
ным) и создание оригинального го- 
тического шрифта. Нас кало инте- 
ресует процедура затеннения экра- 
на, поэтому все свое внимание ны 
сконцентрируен на подпрограмме 
создания готического шрифта. В 
то же время, мы не можем расснат- 
ривать эти процедуры разрозненно, 
поскольку они тесно ‘связаны нелду 
собой. и находятся в единой под- 
Программе. которая вызывается 
второй по счету из головной про- 
граммы в машинных кодах, с ис- 
пользованием оператора сАШ.. 

Четкого разграничения нехду 
этини процедурами не  сушествует, 
потому что после выполнения одной 
Биллу Гилдьберту понадобилось из- 
менить содержимое всек регистров 
микропоцессора с целью правильно- 
го выполнения второй процедуры. В 
то же время, внесто того, что 
напрямую занести содержиное чисел 
в регистр микропроцессора, Билд 
Гильберт начинает “занетать сле- 
ды”. ИСПОЛЬЗУЯ Ряд ухишрений с 
употреблением лишних в данной 
ситуации команд микропроцессора, 
Вместе с тем, к концу махинаций в 
регистрах оказываются именно те 
значения, которые необходимы для 
правильной работы процедуры, соз- 
дающей готический шрифт. Это Вы 
ножете легко проверить, используя 
дизассенблер со встроенной проце- 
дурой отладки. 

Фактически подпрограна созда- 
ния готического шрифта берет свое 
начало с метки Н5П0ОТ. Именно от- 
носительно этой нетки создается 
цикл, Который преобразует весь 
встроенный шрифт “Спектрума“ в 
оригинальный готический шрифт. 
Все это делается тен же способом, 
как и в программе “ТЕОН НАН”. К 
началу работы процедуры в регис- 
тре ВС находится значение 0300Н, 
что соответствует длине области 
встроенного в компьютер шрифта, 
регистр НЬ несет в себе значение 
Зр0ОН, что соответствует началу 
этой области. В регистре БЕ со- 
держится значение с800Н ‹(десяти- 
РИЧНЫЙ эКВИВадент - 51200). Это 
адрес в оперативной памяти, куда 
осуществляется перенос нового 
шрифта. 

ЕСЛИ Рассматривать любой син- 
вол шрифта как знакоместо 8%8, то 
ны можем обнаружить. что в преды- 
душей программе создания утолшен- 
ного шрифта образующийся символ 


ей == 
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создавался за счет смешения всего 
исходного синвола вправо с сохра- 
нением исходного символа на своен 
месте. В этой программе мы смеша- 
ен не полное знакоместо, а лишь 
последний четыре байта, к тому же 
смешение этих байтов осушествля- 
ется не вправо, а влево, что на- 
глядно демонстрируют приведенные 


Символ "О", в кото- 
Рон нижние четыре бай- 
та смешены влево опе- 


Стандартный символ "0" 
из области знакогене- 
ратора "Спектрума”. 


Изобрахение 
ной буквы "О", 
ющееся после 
вправо всех 
шаблона 8х8. 


снешен- 
образу- 
сдвига 
байтов 
Подобный 


"О", образующаяся в 
результате операции 
*ИЛИ" над стандартным 
символон "О" и смешен- 
ным символом "О". 


случаях один и тот же, 

На следующем этапе компьютер 
начинает анализировать стандарт- 
ный шрифт. Первые четыре байта 
остаются неизменными, остальные 
четыре байта нан необходимо сме- 
стить на один бит влево и осушес- 
твить операцию логического “ИЛИ” 
с их исходными аналогами. Делает- 
ся это следующим образом. Для на- 
чала в аккумулятор заносится зна- 
чение, содерхашейся в ячейке па- 
няти, на которую указывает ре- 
ГИСТР Н1.. После этого значение 
регистра А копируется в регистр 
С. Далее над содержимым регистра 
А производится команда арифмети- 
ческого сдвига влево; по этой 
команде все биты сдвигаются. В 
бит 0 (младший) засылается 0. 
Бит Т сдвигается во Флаг переноса 
С. Операция эквивалента умножению 
байта на г. Если при этом образу- 
ется число больвее, чен 255, 
включается Флаг переноса С. Бо- 
лее подробно эта операция пока- 
зана на структурной схеме. 


"НН - «8- 


образую- 

результате 

"или" над 

символом 

и символом, изо- 
браженным на диаг. 4. 

Принции используется 

Биллом Гильбертом в 
программе "Зую С14у". 


Теперь рассмотрим, каким обра- 
зом это реализуются в процедуре, 
написанной в машинных кодах. Пе- 
ред входом в процедуру мы сохра- 
няен на стеке значание регистра 
РЕ, которое, как Вы помните, ука- 
зывает на несто расположения но- 
вого шрифта в оперативной паняти 
компьютера. Посае этого ны сохра- 
няем на стеке значение регистра 
ВС, которое указывает на номер 
обрабатываемого символа из табли- 
цыы стандартного шрифта. Далее 
следует очистка аккумулятора, по- 
сле чего мы очишаем содержимое 
регистра В, засылая в него содер- 
хиное аккумулятора, равное 0. 
Затем “зажигается” второй бит 
регистра В. Таким образом Билл 
Гильберт записывает в регистр В 
число 4. Это достаточно простой 
прием, который направлен на то, 
чтобы запутать начинающего про- 
гранниста. В данном случае вмес- 
то одной команды: 


Гр в, 4 


Гильберт использует „целых три, 
причем результат работы в обоих 


Схема 2.0 : С -- Флаг переноса. 

После выполнения логического 
сдвига, ‘ны выполняем Функцию 
“ИЛИ” над содержимым регистров А 
иС. После этого новое значение 
сохраняен в памяти в области но- 
вого шрифта, Далее содержимое ре- 
гистра НМ. увеличивается на едини- 
цу, чтобы он указывал на значение 
следующего байта из области стан- 
дартного шрифта. 

Поскольку в регистре В со- 
дерхалось 4, а следующей командой 
идет оператор 1.Л47, который зада- 
ет цикл, мы начинаем повторять 
все предыдушие операции, пока не 
очистится регистр В. 

`Следующим этапон нашей работы 
является. восстановление со стека 
содержимого регистра ОЕ, который, 
как Вы помните, указывал на место 
расположения сФормированного нани 
шрифта. Для того чтобы понестить 
в соответствующую системную пере- 
менную указание на несторасполо- 
жения данного шрифта, нам необхо- 
димо, чтобы в регистре Н. содер- 
халось значение на 256 байтов: 
неньше, чем действительный адрес 
месторасположения шрифта в 03У. 
Это достигается уненьшением на 
единицу старшего регистра пары 
НЕ, то есть регистра Н. После не- 
обходимых изменений мы заносим 
содержимое этого регистра в сис- 
‘темнур пременную, указывающую на 
несторасположение действующего в 
данный нонент шрифта “Спектруна". 

В заключение мы восстанавлива- 


.ен прерывания и возврашаемся в 


вызвавшую нас процедуру с помошью 
команды ВЕТ. 


ЭМСЬАТЯ 


“ИНФОРКОН" всегда уделял боль-` 


шое внимание пропаганде языков 
програннирования дая пользовате- 
лей `"7Х-Зресагиш". Только на 
страницах "7Х-РЕВЮ" уже были опу- 
бликованы "МЕСА ВАЗТС” и три вер- 
сии языка “ВЕТА ВАЗТС", Не пре- 


Еше ранее, в 
1989 - 1990 г.г. в виде брошюр мы 
выпустили методички, посвяшенные 
языкам ”ГАЗЕВ ВАЗТС”, ПАСКАЛЬ 
(НРАТ) и “7Х-РОВТН". у 

Сегодня ны начинаен публикацию 
языка програннирования “ЛОГО”. 06 
этом языке написано уже немало. 
Имеется достаточный выбор отечес- 
твенной литературы и мы не стали 
бы повторяться, если бы не одно 
маленькое обстоятельство. Дело в 
что доступные книги по. “Ло- 
ГО” никак на привязаны к комнью- 
теру "Спектрун". Мы же предлагаен 
вашему вниманию книгу, которая 
так и называется. “1060 оп 14ве 
5ТНСЬА1Е ЗРЕСТКОМ". Такин обра- 
зом, все, что Вы почерпнете из 
этой серии статей, вполне может 
быть использовано Вами в работе с 
Вашим компьютером. Дело остается 
за малым - найти и запустить про- 
грамму и освоить новый язык. Не 
знаен, как обстоит дело с этой 
програнмой на нащих рынках сей- 
час, но в конце 80-х она была 
распространена очень широко и до- 
стать ее не было никаких проблем, 

АВТОР книги - известный ан- 
глийский програнмист и разработ- 
чик обучающего программного обес- 
печения Грэхем Филд. Авторизован- 
ный перевод с английского языка и 
редакция - наши. 


1. Что такое "лого". 


Лого - это язык програнмирова- 

ния, начало ‘разработки которого 
было положено в Нассачусетскон 
технологическом институте в 1967 
Году. . 
В его основе лежит концепция 
подготовки языка, удобного как 
для подготовки ‘детей к основан 
компьтерной гранотности, так и 
для решения натенатических задач 
и задач, ‚относяшихся к области 
искусственного интеллекта. ис- 
пользование этого языка програн- 
мирОВвания для этих целей стало 
возможным в результате значитель- 
ного объена исследований, прове- 
денных как в НТИ, таки в других 
научных и учебных центрах СЩА и 
ЕВРОПЫ, В Частности, в Эдинбург- 
скон университете. 

Уже первый опыт использования 


этого языка показал его высокую 
эффективность в обучении детей, а 
также особый интерес к нему не 
только со стороны учащихся, но и 
со стороны родителей и педагогов. 

Вместе с тем, лого не следует 
рассматривать только с этой сто- 
РОНЫ. Это не просто игрушка и в 
опытных руках он может быть серь- 
езным инструментом. У ЛОГО есть 
ряд значительных преимушеств по 
сравнению, например с БЕЙСИКОМ и 
он может быть вполне использован 
в качестве универсального сред- 
ства’ решения повседневных задач 
на компьютерах бытового класса. 
Итак, несмотря на’ то, что лого 
прост в освоении детьми и лицани, 
не имеющими никакой компьютерной 
подготовки, он является мошным 
инструментальным средством, обес- 
печивающим удобный доступ к ре- 
сурсам коипьютера. 


Черепашка“. 

для того. чтобы проше приоб- 
шить детей к лого, было изобре- 
тено специальное механическое 
УСТРОЙСТВО - “Черепашка”. оно 
представляет собой маленькую ме- 
ханическую тележку с электродви- 
гателем, подключенную к конпью- 
теру с помошью проводов. Тележка 
может кататься по полу, по столу 
ити., но как правило ее запус- 
кают по большому листу бунаги. На 
тележке установлен держатель, в 
которон закрепляется перо, каран- 
даш, фломастер. Перо ножет подни- 
наться и опускаться по командам 
от компьютера. В случае перемеше- 
ния “черепашки” по бумаге с опу- 
шенным пером,  вычерчивается ли- 
ния, соответствующая траектории 
движения. Для управления “чере- 


пашкой” служит программа, напи- 
санная на ЛОГО. 
В принципе, "Спектруи” тоже 


может управлять подобной "чере- 
пашкой", как И НнНоГИМи другими 
электромеханическини устройства- 
ни, но мы от нее отвлечемся и 
будем дунать о ней, имея дело с 
кусорон на экране телевизора, с 
помошью КОТОРОГО будем строить 
различные простейшие  геонетри- 
ческие Фигуры, за которыми так и 
закрепилось в литературе название 
*черепашья графика". 

Вся прелесть (и ношь) лого со- 
стоит в том, что если Вы один раз 
“объяснили” компьютеру как надо 
исполнять ту или иную задачу, Вы 
можете больше никогда ему этого 
не “объяснять”. Для этого надо 
Вашему объяснению присвоить какое 
-либо имя. После этого данная за- 
дача становится для компьютера 
известной ему ПРОЦЕДУРОЙ и впо- 
следствии, когда Ван опять потре- 
буется исполнить такую же задачу, 
достаточно ‘только назвать имя 
НУЖНОЙ ПРОЦЕУРЫ. Получается так, 
что по нере того, как в своем по- 


нинании програмнирования развива- 
етесь Вы, также параллельно _ вие- 
сте с Вами развивается“и Ваш ком- 
пьютер. Единственным ограничением 
ПРИ этои является разнёр паняти 
Вашей нашины, но У Вас есть воз- 
нозжность сохранять готовые проце- 
дуры на нагнитной ленте и  загру- 
жать в память только те, которые 
нужны для решения текушей проб- 
лены. 

ЛОГО быд разработан специалис- 
тами, основным направлением ис- 
следований которых является ис- 
кусственный интеллект, главная 
проблена которого состоит в изу- 
чении приемов нышления человека и 
введении аналогичных приенов в 
конпьютер. Это исследование при- 
вело в свое время к созданию язы- 
ка програнмирования ЛИСП,  основ- 
ная задача которого состоит в об- 
работке различных списков данных. 


К сожалению, оказалось. что этот 
язык труден для усвоения. Ножет 
быть он и не столь труден. как 


это кажется начинающим, но тем не 
ненее он по крайней мере неудобен 
хотя бы тем, что содержит в своей 
основе многие специфические тер- 
мины, которые относились к кон- 
кретным особенностям той ЭВН. на 
которой он создавался и которая 
уже давным давно не существует. 
ЛОГО родился, как изящная альтер- 
натива, сочетающая методический 
подход ЛИСПа с доступностью  тер- 
минологии и естественной нагляд- 
ностью. } 

К сожалению. по отношению к 
ЛОГО сложилось обывательское не- 
гативное представление о том, что 


`"черепашья графика" - это основ- 


ной аспект языка, Есть даже не- 
которые несведушие люди, убех- 
денные в том, что это `единствен- 
ная область его применения. В 
последние годы даже появились не- 
которые програнмы, в том числе и 
‚высококлассные, которые занимают- 
ся "черепашьей графикой" и ното- 
му содерхат слово “лого” в своих 
названиях. "СИНКЛЕР ЛОГО" к нин 
не относится. Эта версия языка 
для компьютера "Спектрун” содер- 
хит все возмохности оригинала и 
даже добавляет некоторые (нанри- 
нер обрашение к подпрогранмам в 
машинных кодах), которые связаны 
со спецификой компьютера и не 
содержатся в эталоннон языке, но 
могут быть очень подезны авторам 
неординарных програни. 

Как и другие языки програнми- 
рования, ЛОГО имеет немало специ-1. 
Фических тернинов. Многие не лю- 
бят новой ‘тернинологии и боятся 
ее во всех областях, кроме той 
области, в которой сами являются 
специалистами. Но, тен не менее, 
некоторые термины все-таки необ- 
ходины, если мы хотим серьезно 
обсуждать возножности нового яЗы- 
ка и снотреть, как они соотносят- 
ся с другими языками. Вы ничуть 
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не хуже будете водить. машину, ес- 
ли не будете, знать, что те четыре 
штуковины, которые торчат из дви- 
гателя, называются свечами захи- 
гания. Но это знание немного 
улучшит Ваше положение, когда в 
Юдин прекрасный день Ваш автоно- 
биль не заведется. Оно поножет 
ПОНЯТЬ ЧТО ПРОИЗОШЛО, КОоГДа кто- 
то более опытный объяснит Вам си- 
туацию и пригодится при покупке 
запчастей. 

Эта книга не перенасышена тер- 
минологией и не шокирует начинаю- 
шего читателя. Все необходиные 
технические термины будут разби- 
раться по мере их появления на 
ПРОСТЫХ И ПОНЯТНЫХ ПРИМерах. 


ЛОГО и БЕИСИК 

для тех, кто’уже знаком с БЕИ- 
Сиком, мы дадин краткое сравнение 
этих языков. Если же БЕИСИК Вам 
еше неизвестен, то этот раздел Вы 
можете просто пропустить. 

Эти языки во многом различают- 
ся. Наверное наиболее очевидным 
отличием, сразу бросающимся в 
глаза, является то, что в ЛОГО 
нет номеров строк в программе. 
ОНИ ПРОСТО не НУЖНЫ. Если Вам 
нужно внести изменения в часть 
программы, написанной на Лого, Вы 
должны воспользоваться програн- 
мой-редакторм, которая является 
частью /ЮГо-систены. Этот редак- 
тор отличается от того строчного 
редактора, с которым Вы имеете 
дело на "Спектруме”. С его по- 
мощью можно обрабатывать не одну 
програнмную строку, а сразу целую 
процедуру или дахе несколько. и 
этот редактор намного более удо- 
бен, чем тот, с которым Вы рабо- 
таете в стандартном БЕЙСИКе. 

Процедуры ЛОГО обычно короче и 
даже намного короче, чен програн- 
мы БЕИСИКа, Благодаря этому их 
легче писать, проше отлаживать и 
легче понимать, чем БЕЙСИК-пПРО- 
гранну. Редактор может одновре- 
менно обрабатывать большее коли- 
чество строк, чем помешается на 
юдном экране, но в ЛОГО не счита- 
ется хорошей практикой делать 
процедуры столь длинными. 

Еше одно необычное отличие со- 
стоит в том, что если Вы привыкли 
кк что в паняти компьютера 
ножет содержаться опновременно 
только одна БЕИСИК-програнна, то 
в ЛОГО одновременно в памяти мо- 


ГУТ быть несколько совершенно не-' 


связанных друг с другом процедур. 

Еще одно, незаметное на первый 
взгляд отличие - то, что каждый 
оператор БЕИСИКа имеет собствен- 
ную СТРУКТУРУ и всегда должен 
быть записан только в соответст- 
вии с ней. ЛОГО же, с другой сто- 
роны. имеет только одну допусти- 
ную СТРУКТУРУ для своих операто- 
ров и две небольших вариации, ко- 
торые не обязательны, а сушеству- 


`емленую для 


ют только для большего удобства 
программиста, 

Если Вы ПРИВЫКЛИ к ТОМУ, ЧТО 
операторы и Функции БЕЙСИКа вызы- 
ваются одним нажатием клавиши, то 
может быть будете несколько разо- 
чарованы, поскольку в ЛОГО этого 
нет. Это не позволяет сделать са- 
ма структура языка. Ван ‘прдется 
набирать все слова полностью по 
буквам. Впрочем, нногие из стан- 
дартных инстрУКцИЙ ЛОГО — инеют 
сокрашения и к тому же в ЛОГО 
есть возможность самому задать 
сокрашения для прочих слов, если 
Вам это хочется. 

ЕСТЬ еще много других отличий, 
о которых инеет смысл говорить 
после освоения обоих языков, но 
ны на них сейчас не будем | оста- 
навливаться. Сказанного выше уже 
достаточно для того, чтобы Вы по- 
няли, что ЛОГО - это совершенно 
особый язык програмнирования, не 
имеющий к БЕЙЯСИКУ никакого отно- 
шения. 


диалекты лого. 

ЕСЛИ Вы сравните те констрУк- 
ции, которые увидите в этой кни- 
ге, с другими книгами по ЛОГО, то 
найдете очень значительные отли- 
чия. Так происходит потону, что 
ЛОГО, по-видиному, имеет большее 
количество диалектов, чем любые 
другие языки. Это, конечно, не- 
приятно, но на самом деле лого 
это ведь не столько язык програм- 
нирования, сколько необычный и 
весьма продуктивный образ мышле- 
ния. Во всяком случае, основные 
СТРУКТУРЫ, Как и возножности того 
или иного диалекта, будут’ как 
правило похожими. разобравшись, 
Вы сножете конвертировать другие 
програнмы, написанные на ЛОГО для 
ДРУГИХ КОМПЬЮТЕРОВ В ФОРМУ, ПРИ- 
"Спектруна”. Слова 
могут отличаться, но стоящие за 
ними идеи будут тени же. 


Как пользоваться этой книгой. 

При написании програнм на ЛОГО 
обшепринято пользоваться пропис- 
ными (заглавными) буквами и де- 
лать отступ в конструкциях языка. 
В этой книге будет использован 
тот же подход, но Вы можете им и 
не пользоваться, поскольку Син- 
клер-ЛОГО - достаточно гибкий ди- 
алект. В нем можно без проблем 
использовать и строчные буквы, а 
отступ в строках - это просто 
удобная Форма представления и 
чтения процедур, которая для Вас 
не обязательна. 

‘Так что, если Вы наберете что- 
то вроде; 

ТО ЗАУНЕЫО 

РЕТИТ [ДОБРО ПОЖАЛОВАТЬ В 
СИНКЛЕР- ЛОГО} 

ЕКО 

то на экране компьютера ножет 


получиться например так: 
740 затве!1о 
>РГ1п& (добро пожаловать в Си! | 
>нклер-Лого] 
>епа 


Символы ? и › в начале строк и 
символ ! в конце - это снециФи-| 
ческие символы языка и в свое! 
время ны с ними разберемся. | 

При работе’ с книгой нелательно 
попробовать приведенные в ней 
примеры на своем компьютере, что- 
бы почувствовать, как ЛЮГО реаги-| 
рует на те или иные команды и на 
ошибки. Тогда Вы научитесь ис-| 
пользовать возможности языка на- 
иболее эффективно. Все примеры в| 
книге, за исключениен самых при- 
нитивных. преднамеренно сделаны 
так, что их нохно развивать и до-| 
рабатывать. Идеи © том, что еше 
нохно доработать во нногих случа-| 
ях даны. В книге нет контрольных! 
ВОПРОСОВ, да они и не нужны. Если 
в ЛОГО написанная Вами процедура! 
работает и делает то. что должна 
делать, она написана верно. 


г. Первые шаги. 


В отличие от БЕИСИКа, ` которы 
уже встроен в ПЗУ Вашего “Спек-| 
труна”, ЛОГО следует загружать с 
магнитной ленты. Это делается! 
обычным способом: | 

ТОАр == 

После загрузки на экране поя- 
вится сообщение: 

МЕТСОНЕ ТО 5ТИСЬАТЕ 1060 

Ниже Вы увидите вопросительный! 
знак, служаший запросом к Вам и 
сигналом о ‘тон, ЛОГО ждет Ваших! 
конанд. Рядом виден мигающий ква- 
драт - это курсор. Кроме этого, | 
Вы нохете увидеть в правом нижнем 
углу символ "1.", который означа-| 
ет, что от Вас ожидается ввод! 
буквы или цифры. | 

Вы начнем наши эксперименты с! 
"черепашьей графики”. — Наберите! 
ЗНОМТОВТЬЕ и нажмите ЕНТЕЕ. Набор! 
можно сделать и строчными буква-| 
ми. Вы увидите, что на экране по- 
явится “черепашка” в виде стрел- 
ки, Одноврененно экран разделит- 
ся, оставив две нижние строки дая| 
ввода Ваших команд. Основная 
часть экрана будет использована 
для изображения результатов дви-| 
хений "черепашки". 

Попробуйте дать команду 

РОБМАКО 50 


нестилась в тон направлении, в| 
КОТОРОМ она указывает. Здесь надо! 
обратить внимание на то, что сло- 
ва, из’ которых состоят конанды! 
языка ЛОГО должны  разделяться| 
пробелами. Так что, если Вы по-| 
пробуете дать конанду РОКМАЕЬ5О. || 
то увидите, что ЛОГО вас не пои- 
нет. Попробуйте это. Когда поя-| 
вится сообщение об ошибке, Вы| 
увидите изобраление стрелки вВ| 


го 


|правом нижнем углу экрана. ‘Это 
означает, что Вам нужно нажать 
какую-либо клавишу, чтобы продол- 
| жить работу. 
| Теперь пойдем дальше: 
ВАСЕ 50 

Стрелка на экране вернется на- 
зад. Число 50 задает расстояние, 
ва которое должна переместиться 
“черепашка”. Слова РОВМАЕР и ВАСК 
- Это процедуры, а число 50 - па- 


|раметр. Трудно сказать, в каких 
]йединицах измеряется расстояние 
перемешения черепашки, ПОСКОЛЬКУ 


это зависит от ‘размеров экрана 
Вашего телевизора или монитора, 
|но во всяком случае максимальное 
количество шагов по вертикали - 
|175, а по горизонтали - 255. Ны 
[можем считать, что расстояние 
изнеряется в пикселах. 

| Попробуйте подвигаться вперед- 
назад, привыкая к чувству рассто- 
|яния и, когда вам надоест дви- 
гаться по одной прямой, мы начнем 
осваивать новые направления. Сна- 
|чала наберите СГЕАВ$СВЕЕН. Если 
|Вы ненного знаете английский, то 
Уже очевидно догадались, что эта 
процедура очищает экран и при 
|этом выставляет "черепашку” в ис- 
ИходнУю Позицию. . 

Чтобы повернуть “черепашку“, 
можно воспользоваться процедурани 
ЕТСНТ (направо) и ГЕЕТ (налево). 
Эти’ процедуры должны инеть при 
себе паранетр - угол, на который 
следует повернуться. Угол измеря- 
| полная окрух- 


|нет ее на прямой угол. 
Попробуйте теперь: 
РОКМАКО 50 
ЕТСНТ 120 
РОЕМАЕО 50 
ЕТЕНТ 120 
РОБМАКО 50 
Вы увидите, что ‹"черепашка” 
| пройдет по замкнутому КОНТУРУ И 
встанет в той точке, с которой 
| начинала. Справедливостьи ради 
надо сказать, что ее положение не 
СТРОГО идентично исходному, ПО- 
скольку смотрит она не ‘туда, Но 


| 


Ножет быть, Вы сообразиди, что 


|вания треугольников? Да, навер- 
рное, это так. А как быть с пяти- 
пугольниками или, скажем, с деся- 


| тиугольникани? Не кажется ли Вам, 
что рисовать Фигуру с десятью 
сторонами и десятью углами таким 
|приеном было бы несколько утоми- 
тельно? к счастью, ЛОГО имеет 
простое средство избавиться от 
этой неприятности. Опять испол- 
ните СТЕАЮЗСВЕЕН и попробуйте 
‘такую команду: 


КЕРЕАТ З(ЕОБМАРО 50 ЕТСНТ 120} 

Здесь используются квадратные 
скобки, просьба не путать с круГг- 
лыни. В ЛОГО разные виды скобок 
ИСПОЛЬЗУЮТСЯ ДЛЯ Разных целей. 

Процедура КЕРЕАТ означает, что 
то, что стоит в квадратных скоб- 
ках, должно быть повторено. Пара- 
метр 5 указывает на количество 
повторений. 

Команды КЕРЕАТ могут быть до- 


вольно длинными. Для того, чтобы 
их было удобнее читать, строку 
разбивают в тех местах, где удо- 


бно и продолжение строки печатают 
с отступом. 

Если ПРИ написании команды она 
дойдет у Вас до правого края эк- 
рана и начнется на новой строчке 
не пугайтесь, этот разрыв не 
страшен. ЛОГО не считает строку 
законченной до ‘тех пор; пока не 
нажата клавиша ЕНТЕЮ. В качестве 
указателя того. что команда про- 
долхжается на новой строке компью- 
тер поставит в конце экранной 
Строки восклицательный знак “!", 
служаший эдесь как бы символом 
переноса. Поэтому, если в этой 
книге Вам встретится например 
такая команда: 

КЕРЕАТ 8`(РОБМАКР 20 ВТСНТ 90 
РОВМАЮО 10 ЕТСНТ 90 
РОБМАЕО 20 1ЕЕТ 45] 
смело набирайте ее на экране в 
одну строку, давая ЕНТЕВ только 
тогда, когда будет введено все до 
конца. 

Но ношь ЛОГО, конечно 
ключена не в способности 
кратно повторять одни и те же 
действия, а в способности созда- 
вать новые команды. Поскольку Вы 
теперь знаете, как изображается 
треугольник, Вы ‘ножете теперь 
создать команду для его изображе- 
ния: ) 

Сначала напечатайте: 

ТЕХТОСВЕЕН 

По этой команде “черепашка” 
будет удалена с экрана и все 22 
Строки экрана будут доступны для 
написания текста. А теперь делай- 
те так: 

ТО ТЕТАНСЬЕ 

(появится приглашение >") 
ВЕРЕАТ 3 (РОКМАЮО 50 В1СНТ 120} 

На сей раз команда не будет 
выполнена непосредственно,  пос- 
кольку оператор ТО... свидетель- 
ствует о том, что Вы не рисуете 
треугольник в данный момент, а 
занимаетесь ‘тем, что объясняете 


же за- 
много- 


компьютеру, как это делается. 
Вместо этого’ появляется новое 
приглашение ”>“”. оно означает, 
что Вы не закончили описание 


новой команды. Чтобы завершить 


дело, нужно набрать еше один 
оператор: 
ЕНО 

Компьютер ответит Вам на это 


следующим сообщениен: 
ТЕТАНСГЕ дег1пеа 


. тела“. 


Это означает, что процедура 
для изображения треугольников под 
иненем ТЕТАНСЬЕ определена и те- 
перь она известна компьютеру, 

После этого на экране появится 
приглашение  "?". оно означает, 
что ЛОГО находится в командном 
режиме и ждет от Вас ввода коман- 
ды. Перейдите. к "черепашке” ко- 
мандой ЗНОМТУЕТЬЕ и дайте команду 
ТЕТАНСЬЕ. Если все было сделано 
правильно, треугольник будет на- 
рисован. Отныне команда ТЕТАНСГЕ 
не менее знакома конпьютеру, чем 
команды РГОЕМАРО и ВАСК. 

Более того, теперь вы можете 
встраивать команду ТЕТАНСЕЕ в 
другие, еше более ношные команды. 
Попробуйте, например; 

ВЕРЕАТ 12 [ТЕТАНСЬЕ ЕТСНТ 30] 

- и поснотрите, что будет нарисо- 
вано на экране. Попробуйте также 
самостоятельно оформить эту ко- 
манду в процедуру и дайте ей иня 
по ВКУСУ. 

Развивая мысль, мы с Вами по- 
пробуем нарисовать человечка. Он 
{или она) будет состоять из квад- 
ратной головы, туловища, которое! 
будет изображено одной Прямой 
линией, пары пряных ‘рук и пары 
ПРЯМЫХ НОГ (СМ. РИС. 1). 


Рис. 1. 


Программа выглядит очень про- 
сто: 


ТО МАН й 
‚ НЕАО (голова) 
ВОВУ (тело) 
1ЕС$ (ноги) 
'АЕИ5 (РУКИ) 
ЕНО 


Можете набрать эту процедуру. 
Пусть пока Вас не смушает, что ни 
ны, ни компьютер не знаем пока 
определений процедур НЕА,  ВОБУ, 
1Е65 и АЮН$. Ны их еше напишен. 
ЕСЛИ ПРИ их написании Вам захо- 
чется посмотреть, как они ‘рабо- 
тают. просто перейдите в конанд- 
ный режим (курсор } и дайте 
имя конанды, 

Итак, “голову” мы изобразим, 
как прямоугольник и процедура 
очень похожа на ту, которая  изо- 
бражала треугольники. Но нан надо 
еше. после всего поместить “чере- 
пашку” в центр нижней стороны 
развернуть ее вниз, чтобы она бы- 
ла готова перейти к рисованию 
Для этого потребуются ‘до- 
полнительно три команды. В ‘целом 
процедура НЕА будет выглядеть 


па 


так: 

ТО НЕА 

ВЕРЕАТ 4 [(ЕОБМАЮО 20 ВТЕНТ 90} 
ЕТСНТ 90 

РОВЧАЕО 10 

ЕТОНТ 90 

ЕО 

"Тело" еще проше: 

ТО ВОБУ 


ЕОВМАКО 40 
ЕНО 

для изображения "ног" развер- 
нем слегка "черепашку" влево, 


переместим вперед, вернем назад, 
повернем вправо на вдвое больший 
угол, чем в начале, опять вперед 
и назад и снова развернем влево, 
возвратив в первоначальное поло- 


Если Вы посмотрите на рисунок, 
`о увидите, что “руки” ничем 
принципиально от “ног” не отлича- 
ются, поэтому для изображения 
"рук" достаточно отогнать “чере- 
пашку” назад и пририсовать к "те- 
лу” Пару "ног" на уровне "плеч". . 


Обратите внимание на саму ме- 
тодикУ работы. Вы видели, как ны 
упростили задачу рисования чело- 
вёчка до четырех задач рисования 
его отдельных частей. Это ‘очень 
Удобный метод программирования. 
Он состоит в расчленении одной 
большой задачи на’ группу более 
простых. с каждой из которых нож- 
но занинаться порознь. Их, в свою 
очередь, тоже ножно дробить до 
тех пор, пока вся задача, как бы 
сложна она ни была, нё будет све- 
дена к элементарнейшим операциям. 
ИМЕННО ДЛЯ ТАКОГО СТИЛЯ 
ПРОГРАМНИРОВАНИЯ ЯЗЫК ЛОГО И 
ПРЕДНАЗНАЧЕН. 

Если Вы в восторге от того, 
что нарисовали, можете вывести 
РИСУНОК на принтер по ‘конанде 
СОРУЗСЕЕЕН. 


Редактирование. 

Если до сих пор Вы не сделали 
ни одной ошибки. считайте, что 
Вам повезло, но надо все-таки 
знать, каким образом можно внести 
изненения и исправления в свои 
процедуры. для этого служит ре- 
дактор (е911ог). Он вызывается по 
команде ЕШТТ, после которой надо 
укаазать иня процедуры, которую 
Вы хотите переработать, напринер: 
ЕРТТ "ГЕб5 < 

На экране появится текст про- 
цедуры ГЕС5. Курсор перенещаается 
обычными "“синклеровскими” курсор- 


ными клавишами 5,6, 7,8 в 
нии с САР5 $НТЕТ. 

Нажатие клавиши ЕНТЕЮ в ТОЙ 
позиции, где стоит курсор, соз- 
дает новую строку. Вы можете 
добавить новый текст, например 
РЕТЧТ “НЕМО. 

Стирание выполняется как обыч- 
но с помошью РЕГЕТЕ (САР5 ЗНТЕТ + 
0). 

При редактировании Вы можете 
воспользоваться ‘и расширенным ре- 
жином (курсор “Е”). После одно- 
временного нажатия САР5 ЗНТЕТ и 
бУНВ 5НТЕТ в правом нижнем углу 
загорится символ “Е”, 

В Е-режиме курсорные клавиши 
цействуют немного не так. Сов- 
местно с САР5 5НТЕТ клавиши 5 и 8 
"перегоняют” курсор в начало или 
конец текушей строки, а’ клавиши 6 
и Т - в Нижнюю или в верхнюю 
СТРОКУ’ экрана. Можно перемешать 
КУРСОР и на еше большие расстоя- 
ния. Так, в этом режиме при наха- 
тии клавиши "В" Вы попадете в на- 


сочета- 


чало текста (ВЕСТМ), а при нажа- 
тии клавиши "Б" - в конец текста, 
соответственно (ЕН). Это очень 


Удобно при редактировании проце- 
дур, длина которых больше, чем 
разнер экрана. 

Еше одно огромное удобство в 
этом режине предоставляют клавиши 
"У" и "В". С их помошью можно пе- 
реносить строки програмны с неста 
на место. Попробуйте выставить 
КУРСОР на строке ВТСНТ 60, затем 
войдите в Е-режим и нажмите "У". 
СтРОКа ВТСНТ 60 исчезнет с экра- 
на, но она не пропала окончатель- 
но, а осталась в памяти компьюте- 
ра. Опустите курсор на две строки 
вниз и в Е-режине нажмите клавишу 
"В" - строка ВТСНТ 60 появится на 
новом месте. 

не бойтесь ничего испортить, 
поработайте с редактором. Любой 
редактор инеет свои особенности и 
к ним надо привыкнуть. Время, за- 
траченное на эксперименты, много- 
кратно окупится в будущем. 

ВЫЙТИ Из редактора можно двумя 
способами. 

Если Вы не хотите, чтобы все 
сделанные Вани изненения отрази- 
лись на програнне, Вы мохете на- 
жать САРЗ ЗНТЕТ и 5РАСЕ одновре- 
ненно. 

С другой стороны, если Вам на- 
до, чтобы Ваши изменения были за- 
Фиксированы, выход выполняется 
нажатием клавиши "С” в Е-рехине. 

У Вас есть возножность исполь- 
зования клавиш редактора и тогда, 
когда Вы не находитесь в самон 
редакторе. Так, например, если 
при наборе текста Вы заметите, 
что сделали ошибку, ножете "пере- 
гнать“ курсор и внести исправле- 
ние до того, как была нажата кла- 
виша ЕНТЕЕ и строка ушла в память 
конпьютера. 

Если Вы войдете в редактор, 
задав имя процедуры, 
сих пор еше не была определена, 
то компьютер подумает, что Вы ко- 


‚часть памяти расходует сам лого, | 


которая до. 


тите создать новую процедуру. в! 
этом случае перед Вами будет пус- 
той экран и слово “ТО, напечатан-! 
ное в его начале, Таким образом, | 
У Вас есть еше один метод созда- 
ния процедур, отличающийся от то-1| 
го, который ны расснотрели ранее. | 
В принципе, этот путь более удоб-! 
ный, т.к. к Вашим услуган все 
имеющиеся ресурсы редактора, в 
том числе и такие, как вставка! 
НОВЫХ СТРОК. Те, кто попробовал 
программировать самостоятельно, | 
знают как это важно. 


кассете. 
Мы дошли то той точки, где Ван 
ножет быть захочется сохранитьй 
только что написанные процедурый 
для дальнейшего использования, | 
выключить компьютер и немного. от- 
ДОхНУТЬ. ЕСЛИ ПРОСТО выКЛЮЧИТЬ| 
"Спектрум", то все, что хранилось! 
в его паняти, будет навсегда ут“ 
рачено. Даже если Вам и нет нужды 
сохранять результаты своих экспе-| 
риментов, Вы все же попробуйте! 
это сделать, чтобы убедиться, . чтой 
все идет нормально. 
Как и большинство языков  про-| 
Грамнирования, ЛОГО имеет дело с} 
"Файлани" (так мы будем называть! 
блоки информации, записанные на] 
нагнитоФфонной ленте (или на диске | 
ити. | 
собственное иня. | 
Файлов (в отличие от прочих клю-| 
чевых слов) не могут иметь более 
Т символов. Это ограничение в| 
данном случае не связано с лого, 
оно относится к самому "Спектру-| 
му”. Так, например, если ны хотин| 
сохранить процедуры, которые ис-| 
пользовались при рисовании чело-| 
вечка в Файле по именем РЕБЗОН, | 
наберите: | 
БАУЕ "РЕВЗОН [НАМ НЕАГ ВОРУ 1.ЕСЗ! 
АВМ51 <ЕНТЕБ> | 
Включите магнитофон на запись! 

и нажмите любую клавишу. Выгрузка 
идет, как обычно. По окончании 
сохранения Файла на экране поя- 
вится приглашение "?". | 
Если теперь Ван надо будет за-| 
ГРУЗИТЬ ЭТОТ пакет процедур о6б-| 
ратно в память конпьютера, Вы мо-| 
хете делать следующим образом: 
ПГОАР "РЕВЗОН <ЕНТЕК> 


Обслуживание памяти. 
Система ЛОГО занимает часть! 
памяти Вашего компьютера.  Еще| 


отслеживая ход исполняемой рабо-| 
ты. Нужна такхе панять ‘для хра- 
нения промежуточных результатов 
вычислений. Так, например ПРИ 
расчете 2+5-3 компьютер сначала! 
долже найти 2+5 и запомнить гдё-| 
то этто промежуточный результат. | 
оставшаяся часть памяти мохет! 
быть использована для хранения 
Вашей информации и созданных Вами| 
процедур. Мы назовем эту часть! 
памяти "рабочей областью”. 
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Рано ‚или поздно программист 
|так или иначе столкнется с проб- 
леной нехватки паняти в рабочей 
области. В этот момент ему было 
|бы чрезвычайно важно узнать, ка- 
йкие же процедуры хранятся у него 
|йсейчас в памяти. Так, напринер, 
ивозможным выходом из создавшегося 
положения могло бы быть удаление 
части процедур, если они для Ра- 
иботы не нужны. 

Ддя этой цели ЛОГО имеет нес- 
колько встроенных команд. Вы мо- 
й жете попробовать их.в работе, но 
чтобы увидеть, как они 

надо, 


| процедур. Так что если их нет, то 


с ленты (если при прочтении прош- 
лого параграфа Вы ИХ ОТГРУЗИЛИ). 

первая команда, которую ны 
|рассмотрим - ‘это команда РОТ$. 
|Название может быть выглядит не 
очень осмысленным, но это даже 
хорошо, Так ее проше запомнить. 
расшифровывается она, как Рг1п& 
ПОЦЕ Т141ез (распечатать заголов- 
|ки). По этой команде Вы ножете 
получить, например вот’такой ре- 
зультат: 


| ТО БЕб$ 
конечно это не все процедуры, 
пкоторые знакомы для ЛОГО. Ны, на- 


| пример, знаем, что ЛОГО понимает 


|йтакие процедуры, как РОВУАЕО, 
|ВАСК, ВТСНТ, ТЕЕТ и ДР. Но они по 
[команде РОТ5 не распечатываются, 


| поскольку являются встроенными в 
систему. Это обязательные элемен- 
ты языка, их еше называют "прими- 
тивами“. 

| Другая команда с не менее не- 
| лепым названием - РОР5 означает 


процедуры) выполняет печать всех 
Ваших процедур одну за другой. 
|так Вы можете их. просмотреть. 

й Просмотреть одну какую-либо 
процедуру Вы можете в редакторе, 
вызвав ее по имени, но ножно это 
|сделать также и комаандой РО 
(Ри О). Например: 

| РО "ЬЕб5 

| Может быть, Вы хотите, чтобы 
|печать Ваших процедур производи- 
лась не на экран, а на принтер? 
|Тогда вы можете дать команду 
|РЕТЫТОН.' Начиная с этого момента 
|принтер станет устройством вывода 
пинформации и результат работы 
РОТ5, РОР5 и РО будет распечаты- 
йваться на принтере, Отключить 
принтер и вновь перевести весь 
‘вывод на экран можно командой 
РЕТНТОЕЕ. 

Итак, Вы научились просматри- 
Пвать рабочую область. Освободить 
ее от ставших ненужными процедур 
поношью команды ЕКАЗЕ. 


ЕБАЗЕ "НЕА 


чтобы в паняти. 
сейчас у Вас было несколько Ваших _ 


Попробуйте это сделать, а по- 
том дайте команду РОТЗ для того, 
чтобы убедиться, что все прошло 
норнально. Нелишне напоннить, что 
перед удалением из памяти времен- 
но ненужных процедур стоит поду- 
нать о том, чтобы сохранить их на 
ленте. 

И, наконец, расснотрин команду 
для полного освобождения рабочей 
области. Это конанда ЕВРЗ (ЕВазе 
РгосечигеЗ). После нее можно на- 
чинать работу сначала. 

Все конанды, расснотренные в 
этом разделе, имеющие дело с кон- 
кретной процедурой, например 
ЕРТТ, РО, ЕВАЗЕ должны иметь от- 
крывающие кавычки перед именен 
этой процедуры. Но они могут 
инеть после своего имени в квад- 
ратных скобках еше и список вхо- 
дящих в НИХ процедур, так, как 
это было при рассмотрении конанды 
ЗАУЕ. В этом случае поданная ко- 
манда распространяется не только 
на головную процедуру, но и на 
все входящие. Например: 

ЕПТТ ”АБМ$ 1.65} 

даст Вам возножность одновременно 
редактировать не только процедуру 
АВМ5, но и процедуру 1865. Это 
ножет быть весьма удобно например 
в тех случаях, когда Вы хотите 
перенести строку из одной проце- 
ДУРЫ В ДРУГУЮ. 

Команда РО [НЕА ВОРУ] распе- 
чатает обе ‘процедуры, причем пер- 
вой пойдет НЕАБ. 


Команда ЕБАЗЕ [НАМ ТВЕГАНСЬЕ] 
удалит обе процедуры из рабочей 
области. у 


Печать текста. 


Если вы хотите распечатать на 


экране какое-либо. сообшение, Вы 
можете воспользоваться командой 
ЛОГО - РЕШНТ. Обратите внимание 
на то, что ‘если включен режим 
РЕТНТОН, то с тем же успехом ` пе- 


чать будет выполнена на принтере. 

Если надо распечатать всего 
одно слово, то оно может быть 
написано после кавычек, например: 

РЕТНТ "НЕМО 

В этом случае есть разница, 
какими буквами прописными или 
строчными Вы набрали свое слово. 
Напечатано оно будет точно так, 
как было набрано. 

Если Вам надо напечатать целое 
предложение (или список слов), то 
весь список должен быть заключен 
в квадратные скобки: 

РЕТЫТ ([МЕГСОМЕ ТО 1.060] 

Если Вы хотите напечатать пус- 
тТУЮ СТРОКУ, воСсПпоЛЬЗУЙТёСЬ Конан- 
дой РЕ1МТ “ или РЕШТ 11. 

Ны продемонстрируем 
ность этой команды на 
примере, который назовем 
(“Царь”). 

ТО ТРАВ 

РАТНТ Е] 

РЕТИТ [Жил был царь} 

РЕТЕТ [У царя был двор} 

РЕТНТ [На дворе был кол] 


вознох- 
следующем 
ТАВ 


РЕТНТ {На колу ночало] 
РЕТНТ (Не начать ли сказку! 
сначала?} 

ТТАВ 
ЕКВ 

Запустите процедуру конандой 
ТРАР. Остановить ее можно будет 
только нажав ВВЕАК (САРЗ 5НГЕТ + 
ЗРАСЕ). ' 


3. Переменные. 


В ЛОГО, ‘как и в большинстве 
других языков, ножно пользоваться| 
словами для выражения каких-либо 
данных, например чисел. Так, на-| 
пример, предположим, 


ны можете присвоить ипбременной| 
РЕТСЕ значение 30. Это делается| 
командой МАКЕ: 
НАКЕ "РЬТСЕ 30 
кавычки перед словом РЬТСЕ 060- 
значают, что это имя та. | 
а не имя процедуры. 
Теперь попробуйте дать коман- 
ду 
РЕТЫТ “РЕТСЕ 
Компьютер  напечатает 
РЕТСЕ. Да это и естественно, 


что это просто слово, а не пере- 
нменная. В то же время, есть воз- 
можность напечатать не РЕТСЕ, ай 
то, что этим словом обозначено. 


Напримёр: 
РЕТНТ :РЕ1ТСЕ | 

Теперь компьютер  напечатает!| 
число 30. Итак, в команде РЕАШТ 
кавычки ” обозначают само слово, 
а двоеточие (:) обозначает зна- 
чение переменной, — обозначенной! 
этим словом. \ 

Теперь мы можем перевести на 
язык ЛОГО следующее утверждение: | 
"НДС `равен 20-ти процентам от 
стоимости изделия”. Оно 
выглядеть так: 

НАКЕ “НО :РВ1СЕ/100*20 

Итак, конанда НАКЕ требует .на- 
личия двух аргументов. Первый - 
это имя переменной (слово). а| 
ВТОРОЙ - ЭТО То значение, | 
эта переменная теперь будет иметь! 
(например число). Не забывайте о! 
кавычках перед словом, 


гда эти кавычки не нужны, но 
особые случаи. 

Обратите внимание и на то, что 
перед словом РЕТСЕ в нашен приме- 
ре стоит двоеточие. Это потому, | 
что не слово РЕТСЕ нас интересу-| 
ет, а то, что за ним скрывается, 
его числовое значение, равное 30, | 
которое мы хотим разделить на 100 
и умножить на 20 (НДС в России в! 
1993 г. равен 20-ти процентан). 
как видите символы унножения (=) 


и деления (/) совпадают с БЕИСИ-| 
Ком. После того, как переменная! 
805 создана конандой МАКЕ, ны мо- 
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жем ее напечатать: 
РЕТНТ :Н0$ 

- и опять двоеточие, 
ван нужно не слово, 
ние. 

В компьютерной 


Поскольку 
а его значе- 


терминологии 


поскольку они пред- 
ставляют заранее неизвестные зна- 
чения. которые к Тому же по коду 
расчетов ногут и изменяться. По- 
смотрите, например, как оперируют 
с переменной, выражающей изненя- 


НАКЕ “"ГЕЯСТН 10 

ВЕРЕАТ 21 (РОВМАЮО :ГЕНСТН ЮГ! 
СНТ 120 НАКЕ “ГЕНСТН 
ЬЕМСТН +5 } 

ЕО 

внимательно посмотрите на по- 

следнюю команду в квадратных ско- 

бках. Этой командой переменной 

ТЕНСТН присваивается новое значе- 

ние путем прибавления к ранее 

имевшемуся значению числа 5. За- 

пустите эту процедуру и посно- 

трите, как она работает. 

При работе с переменными ЛОГО 


НАКЕ “095 4 

создают две совершенно различные 
переменные. 

РЕТНТ :Н05 даст Т 

РЕТНТ :п9$ даст 4 

Это может вызвать проблены, 
если Вы печатаете все в Нижнем 
регистре и забываете ставить две- 
где это 
наберите: 

РГАПЕ п43 

и компьютер сам трансфорнирует 


поскольку он будет полагать, что 
И РГ1П{1 и п43 - имена процедур. 
Поставить двоеточие перед ` Н0$ 
будет недостаточно, придется в 
редакторе обратно переправить №05 
на паз. 


Арифметика. 

Кроме арифметических 
(8), (+) и (/), с которыми ны уже 
встречались, существуют ‘также и 
арифметические ‘процедуры. Так, 
например, процедура 51М отыски- 
` следующих за 
ней. обычно это бывают два числа, 
но в некоторых случаях их бывает 
и больше. Тогда надо ставить кру- 
как показано 


знаков 


РЕТНТ 59 2 3 
И 
РЕТИТ (509 з2з4 5) 
15 
Процедура РЕОПОСТ 
умножение. Примеры: 
РЕТЕТ РРООСТ 73 
21 
РЕТЕТ (РОСТ 2 357) 
г10 


у выполняет 


ВНИМАНИЕ: таким путен для встро- 
енных ‘Функлий ногут вводиться 60- 
лее, чем по два аргумента. это 
может вызвать проблему, если их 
использовать ВНУТРИ квадратных 
скобок, Например в конанде 
БЕРЕАТ. Таких случаев следует 
избегать. 

Процедура О1У выполняет деле- 
ние. Она может использоваться 
ТОЛЬКО с двумя аргументами. На- 
примёр: 

РЕТНТ ПТУ 105 
г 

ВНИНАНИЕ: В ЛОГО, как иво 
всех других языках деление на 
ноль невозможно. Проверьте и по- 
смотрите, что будет: 

РЕТНТ ГУ 5 0 

Это обычная ошибка начинающих 
программистов, особенно часто во- 
зникающая, когда делятся две пе- 
рененные: 

РЕЛЫТ ПТУ :ТОТАГ : НОМВЕЮ 

Програнмисты забывают учесть, 
что при определенных ситуациях 
переменная МОМВЕЕ может принимать 
нулевое значение. 

для вычитания нет своей проце- 
ДУРЫ. Поэтому это действие можно 
выполнить либо с помошью знака 
(-) либо с помошью суммирования 
$Н с отрицательным аргунентон. 

РЕ1ЫТ 12 -4 дает 8 

знак "минус" выполняет двойную 
РОЛЬ. Между двумя числами он обо- 
значает вычитание, но если он 
стоит перед целым числом, то обо- 
эначает, что это число отрица- 
тельное. 

Во всех случаях ЛОГО пытается 
Разобраться с тен, что Вы написа- 
ли и во нногих случаях делает это 
весьма успешно. Так, 

РЕТНТ 12-4 
или 
РЕТНТ 12 - 4 
будет принято успешно. 
Вы ножете вычесть и отрица- 


тельное число, например: 
РЕТЕТ 12 - -4 
или $ 
РЕТНТ 12--4 


Тен не менее, все-таки сутес- 
твут случаи, когда ЛОГО ножет 
быть введен в заблуждение неадек- 
ватным использовааниен знака “ми- 
нус", поэтому на всякий случай 
выработайте в себе привычку всег- 
да ставить пробелы перед знаком 
"минус" у отрицательного числа и 
не оставлять пробела мехду знаком 
"нинус” и саним числом. Так. по- 
следний пример наиболее гранотно 
записать так: 

РЕТНТ 12 - -4 

В одном выражении Вы ножете 
объединять все четыре арифмети- 
ческих действия. Например: 

РЕТЕТ Зи4 +2 дает 14 

и дело вовсе не в том, 
вычисления выполняются 
направо. Сравните: 

РЕТНТ г + 34 тоже дает 14 

Порядок арифнетических дейст- 
вий, принятый в ЛОГО выглядит 
так: 


что 
слева 


: угольника, 


- действия в скобках; 
— деление; 

- умножение; 

- вычитание; 

- сложение; 

Таким образом, Вы можете поль- 
зоваться скобками () для того, 
чтобы изменять естественный поря- 
док действий. Например: 

РЕТНТ (2 + 3) 4 даст го 

При расчете выражения, стояше- 
го в скобках, ЛОГО придёрхивает- 
ся естественного порядка дейст- 
вий. Если Вы не уверены при напи- 
сании выражения в порядке его 
расчета, смело расставляйте ско- 
бки, чтобы порядок был имённо та- 
ким, какой Ван нужен. Еше два 
принера: 


МАКЕ "СЕБТТСКАОЕ (:РАНРЕМНЕТТ - 
за) 5/9 

выполняет сначала вычитание, а 

НАКЕ "РАНВЕННЕ!Т : СЕНТТСВАОЕ 
#9/5_+ 32 

выполняет деление, 

последним сложение. 

С точки зрения арифметики все 
равно выполнять сначала умножение 
или деление, но с точки зрения 
ЛОГО деление лучше выполнять ра- 
ньыюе, чтобы избежать появления 
слишком больших чисел, с которыми 
будет трудно работать. 

Одна из полезнейших возножнос- 
тей в использовании переменных 
состоит в том, что благодаря ин 
ножно создавать процедуры со вхо- 
дными паранетрани. Напринер, Вы 
хотите иметь процедуру 5О0АКЕ дая 
Изображения на экране квадратов 
различной величины. ‘Рак, ЗОПАВЕ 
50 должна рисовать квадрат со 
стороной 50 единиц, а 5О0АЮЕ 100 
= С0 СТОРОНОЙ 100 единиц. В этон 
случае ны можем ввести параметр 
$12Е, от которого будет зависеть 
размер квадрата и, меняя это па- 
Раметр при вызове процедуры, из- 
ненять результат ее работы. Тогда 
определение процедуры ЗОЧАКЕ бу- 
дет выглядеть так: 

ТО 500АБКЕ :512Е 

БЕРЕАТ 4[РОБМАЕО :512Е 
ЕТСНТ 90] 


умножение и 


ЕНО у 
В заключение в порядке экспе- 
ринента напишите процедуру РОГУ- 


СОН, которая должна иметь два 
ВКОДНЫХ паранетра :512Е и 
:НОМВЕВ. Параметр 517Е задает 


размер стороны правильного нного- 
а паранетр НОМВЕВ - 
число его сторон. Ножете это сде- 
лать, нодернизировав приведенную 
выше процедуру. 5О0АЮЕ. Правда, 
придется понозговать насчет угла 
поворота "черепашки" после изоб- 
Ражения каждой стороны. Вам может 
поночь тот Факт, известный из ге- 
ометрии, что сумма углов ВыпУКЛО- 
Го многоугольника равна 180 (п-2)} 
градусов. где п - число его сто- 
РОН. . 

А пока мы прошаемся до следу- 
юшего выпуска. 

{Продолление следует). 
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Уважаемые читатели!‘ Мы получа- 
ем нассу писем с просьбой больше 
давать програмы на БЕЙСИКе для 
|самостоятельного набора начинаю- 
шими. Многие полагают, причем со- 
|вершенно справедливо, что’ это яв- 
‘ляется прекрасной школой обучения 
програннированию. Ны с этим ут- 
|верждением полностью солидарны. И 
дело даже не в том, что при набо- 
|ре программы начинающий програн- 
нист осваивает клавиатуру, ис- 
пользует новые для себя операторы 
|и конструкции языка, узнает новые 
приемы. Основная прелесть состоит 
|в том, что как бы ни старался чи- 
татель набрать программу без оши- 
бок, в 99 случаях из 100 у него 
это не выйдет. Практически все 
|при любом опыте наделают ошибок. 
|А вот поиск этих ошибок и отладка 
|программы и являются по-настояте- 
му ценной школой начинающего про- 
| граммиста. : , 

|  Интерпретатор БЕИСИКа устроен 
| так, что от большинства ошибок он 
Вас застрахует. Если при наборе 
Строки Вы нарушите синтаксис язы- 
ка, он Вас немедленно предупредит 
и строка не будет введена в про- 
|грамму клавишей ЕНТЕВ до тех пор, 
|пока Вы эту ошибку не исправите. 
|Тем’не менее, существуют еше сот- 
ни возможных видов ошибок,  кото- 
прые он ‘не увидит. Например, он 
ничего не сможет поделать, 
Вы пропустите какую-либо строку. 
|106 этом Вы узнаете только запус- 
|тив программу, причем ошибка про- 
Гявится совсем не в том месте, в 
котором ВЫ ПРОПУСТИЛИ СТРОКУ. Она 
проявится там, где компьютеру на- 
|до будет воспользоваться данныни, 
|содерхашинися в пропущенной стро- 


которые помогут сделать НУ- 
Ичительный процесс отладки ЧУТЬ 
менее мучительным. Тем не менее, 
настройтесь все-таки на тяжелую и 


Во-первых, когда программу на- 
пбирают со страниц журнала или 
Икниги, большой процент ошибок 
| возникает в связи с плохой разли- 
Йчимостью синволов. Так, например. 
| часто путают буквы "1", "1", "ти 
[цифру "!". Путают букву "О" и ци- 
|Фру "О". Можно спутать букву "В" 
Ги ЦИФРУ “8”. инея дело с этими 
символами относитесь к ним пре- 
|дельно осторохно. 

Теперь о коде отладки. Вы, ко- 
нечно понимаете, что предусмо- 
| треть все возможные виды ошибок, 
оторые Вы наделаете, заранее 


если. 


никто не сможет, хотя кое-какая 
статистика у нас имеется. Можно 
сказать, что до 90 процентов 
самых больших неприятностей свя- 
зано с тремя видами ошибок: 
Уаг1аь1е по +оипа (переменная не 
найдена). 
О0+ оф зсгееп (печать вне 
пределов экрана). 
ЕпПа © ПАТА (нехватка данных). 


Что касается  Уаглайе поф 
+оцпа, - это наиболее часто 
встречающаяся неприятность. К 
ней, как правило, и приводит пу- 


таница в символах, о которой мы 
писали выше. Хотя это, конечно, 
не единственный способ напороться 
на данную ошибку. 
Когда компьютер 
этой ошибке, он указывает и номер 
Строки, в которой ОНАа произотла. 
Внимательно сверьте эту строку с 
исходным текстом. Если все в по- 


сообщает об 


рядке, попробуйте распечатать пе- 
ременные “подозрительного” выра- 
жения пряной командой. Та, кото- 


рая ошибочна, распечатана не б6у- 
дет и Вы опять получите сообщение 
"Ууаглаь1е по& гоипа”“. Теперь 
надо найти программную строку, в 
которой эта переменная была в 
первый раз определена. Может быть 
ЭТУ СТРОКУ ВЫ И ПРОПУСТИЛИ ИЛИ 
неправильно набрали переменную. 

Иногда эта ошибка появляется 
не тогда, когда Вы что-то пропус- 
тили, а наоборот набрали’ что-то 
лишнее, что было воспринято, как 
имя переменной, 


Ошибка 0%4 о{ зсгееп возникает 


При печати (РЕТНТ, РОТ, ОВАМ, 
СТЕСЬЕ), если координаты печати 
Выходят за пределы экрана. Боро- 
ться с этой ошибкой весьма тРУд- 


но. Поскольку ошибка возникает в 
тех случаях, когда параметры ко- 
ординат позиции печати выражены 
не числом, а переменными, распе- 
чатайте их пряной конандой РЕТНИТ. 
Посмотрите, какой параметр 
“врет”. Вернитесь по программе 
назад, найдите строку, в которой 
этот паранетр вычисляется. Пусть 
это будет напринер строка 5550. 
Поставьте после нее отладочную 
СТРОКУ: 
5551 РЕТИТ ‹имя перем. >: РАМЕ 0 
Так. постепенно “раскручивая" 
эту переменную, Вы ‘и найдете в 
какой строке вычисления с ней 
портят Вашу програнну. 


Ошибка "04 о# РАТА" возникает 
в случае несоответствия количест- 
ва данных, прочитанных программой 
по оператору ВЕАР и имеющихся в 
строках ПАТА. Борьба с ней до- 
вольно проста и требует только 
внимательности и точности. 


А теперь, закончив с этим за- 
тянувшимся вступлением, мы пред- 
лагаем нашин читателям старинную 


африканскую игру “АЕЕТСАН 5ЕЕШ5". 
Игра относится к направлению, на- 


зываеному "Нанкала". `В этом се 
мействе имеются сотни разных игр. 

Выбранная нами игра отличается! 
относительной простотой правил и 
несложной алгоритнизацией. 
СНоТРЯ на свою простоту, 
терная версия игры 
тем, что победить ее непросто. Иы| 
не будем здесь рассказывать пра- 
вил игры, Вы их прочитаете нено- 
средственно после запуска про- 
Грамны. Укажем только, что играть 
ножно не только с конпьютером, 
Воспользовавшись канешкани или! 
ракушками Вы ножете играть с дру-| 
зьями на пляже или с поношью сос-| 
новых шишек в лесу. В связи с 
приближением отпускного сезона, | 
Вам это ножет пригодиться. 

Программа переведена на русс-| 
кий язык. Если Ваш "Спектрум" 
инеет русский регистр, то набор! 
РУССКОГО текста не вызовет у Вас 
трудностей. Но, учитывая  тот| 
Факт. что большинство компьютеров! 
У наших пользователей нерусиФици-| 
рованные, мы использовали в прог- 
ранние загружаемый синвольный на- 
бор НС” в кодах . КОИ-Т в 
стандарте АЗСТТ, (он приведен ни-| 
же). Это "утолшенный" русско-ла 
тинский символьный набор, предло-| 
женный для русификации програмный 
"НЕ-09" (сн. статью Алексеева 
А.Г. в "2Х-РЕВЮ" М 1-е за 1992г г, 
СТР. 29). Для тех читателей, ко- 
торые подписались на "РЕВЮ" толь- 
ко в этом году, мы повторяем этот 
способ русификации. Мы буден вся- 
кий раз ‘ссылаться на него при 
публикации в дальнейшем Бей-| 
сик-програнн для самостоятельного 
набора. 

Для Формирования ‘символьного 
набора используется программа для| 
шестнадцатиричного ввода (см. "2х 
ГРЕВЮ“-93, На: Стр. З-Т). | 


СИМВОЛЬНЫЙ НАБОР "НС". КОИ-Т 
2С58:00 00 00 00 00 00 00 00 ;54 
2РС60:00 18 18 18 18 00 18 00 :04 
ЕС68:00 6С 6С 6С 00 00 00 00 :А8 
РС70:00 6С РЕ 6С 6С КЕ 6С 00 :18 


2С80:00 62 64 08 10 26 46 00 :С6 


2С90:00 18 30 00 00 00 00 00 :4 
2С98:00 0С 18 18 18 18 0С 00 : 
ЕСАО:00 30 18 18 18 18 30 00 :5С 
ЕСА8: 00 00 6С 38 РЕ 38 6С 00 :ЕА 


ЕСС0:00 00 00 00 7С 00 00 00 :38 


ЕСЕО: 00 18 38 18 18 18 3С 00 : ВО 
РСЕ8:00 3С 66 06 ЗС 60 ТЕ 00 :Аб 
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После того, как работа по вво- 
|ду этих кодов будет ‘завершена, 


запишите полученный символьный 
1набор на магнитную ленту: ЗАУЕ 
"свг” СОБЕ 64600, 768. Он ПРИГО- 


дится Вам и для ДРУГИЕ ПРОГРамм. 
Перед тем, как набирать текст 


Беисик-програнны, 
ющее: 

СТЕАВ 64599: 1ОАБ "СсЬг"СОПЕ .. 

РОКЕ 23606, 88: РОКЕ 23607, 251 

Теперь включен загруженный 
синвольный набор. Попробуйте на- 
бирать Бейсик-программу. Токены 
ключевых слов "Спектруна", состо- 
яшие из заглавных латинских букв, 


сделайте следу- 


будут печататься как обычно. 
Текст, набираемый при поноши бук- 
венных клавишей при отключенном 


режиме САР$ ТОСК, будет набирать- 
ся русскими буквами. Так же он 
будет выглядеть и на экране. При 
включении регистра САРЗ 1ОСК, 
текст будет набираться латинскйми 
буквами. При этом, правда, при- 
дется обходиться только заглавны- 
ми русскими и латинскими буквани, 
но зато это позволит легко совне- 
шать русский ‘и английский текст 
ВНУТРИ Одного оператора РЕТНТ. 
Имена переменных для удобства 
чтения набираются заглавными ла- 
тинскини буквами. 

Кроме формирования самого син- 
вольного набора, в программу вво- 
дятся дополнительные строки. Это 
строка 2, загружающая символьный 
набор, С нее должен происходить 
автостарт программы. Еще это пе- 
реключатели шрифта, строки 8 и 9 
(могут быть любые другие нонера, 


такие, какие удобно вписываются 
в программу). Используя команду 
0 59В 8, можно включить загру- 


женный символьный набор, а коман- 
дой СО 5ИВ 9 - выключить его. Эти 
команды ножно как включать в Бей- 
сик-строки, так и подавать напря- 
мую, находясь в режиме редактиро- 
вания Бейсик-строк. 

Следует также предупредить тех 
пользователей, которые имеют БЕТА 
-ДИСК интерфейс. В программах, в 
которых используется блок. 906- 
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Графики, стандартно распопоженныи] 
после рестарта компьютера с адре- 
са 65368, полезно „бывает перед! 
стартом программы включать еше и| 
конструкцию,  задающую системную! 
переменную 90: | 

РОКЕ 23615, 88: РОКЕ 23616, 255 | 

Это, казалось бы лишнее, так! 
как после рестарта компьютера | 
указанных ячейках и так находятся! 
указанные числа. Дело в том, что 
значения этих ячеек ногли быть! 
изменены в процессе работы диско-!| 
вого загрузчика "Ьоо\". Так не-| 
корректно ведет себя, например, в| 
обшен-то очень хороший и широко| 
распространенный загрузчик "НОА- 
ЗЕВУТСЕ". Эта рекомендация убере-| 
жет Вас от возможных "накладок" и| 
В Других случаях. | 

А теперь, когда есть опреде- 
ленность с вопросом русификации, 
можно переходить непосредственно! 
к тексту программы — “АРЕТСАН 
5ЕЕО5". | 


1 с0 ТО 1000 | 

2 СЬЕАК 64599: ГОА "сьг"СОВЕ 
64600 

3 РОКЕ 23615, 88: РОКЕ 23676, 2 
55: ВЕЗТОВЕ 2100: РОК Р-О ТО. 95: 
КЕАО С: РОКЕ 05В “А"+Р,С: НЕХТ 
Р 

4 РИ 

5 ЗАУЕ "АЕЕТСА" [ПМЕ 2: 5АУЕ 
"сьг"СОРЕ 64600, 768: 5ТОР 

8 РОКЕ 23606, 88: РОКЕ 23607, 2 
51: КЕТОВН : ВЕН ЕИ5 

9 РОКЕ 23606, 0: РОКЕ 23607, 60 

ВЕТОЕН : ВЕН ТГАТ 


100 РЕТНТ АТ 17, СОБЕ Аз(Н); ВЕТ 


СНТ 1; РАРЕВ 2; 5СВЕЕН® (17, СОБЕ 
АЗ (Н)): ГЕТ 5=Н(Н): БЕТ Н(Н) =0: 
БЕТ 0=0+1 


отн | 
ГЕТ Н(Н) =Н(Н) +1: 


110 ТР $ ТНЕН ЕТ $5:5-1: 
=Н+1-12* (Н=12): 
60 ТО 110 


5ЕЕОЗ ЗЕЕ 


сн |йокь 


лунку. 


` 


756 


200 РЕТНТ АТ 17, СОРЕ АЗ(Н); ВЕТ 
СНТ 1; ТНК 0; РАРЕБ 2; ЗСКЕЕН$ (41 
Т, СОБЕ АЗ(Н)): ТР Н(Н) <>1 ТНЕН 
РОЕ В=30 ТО 10+Н(Н): ВЕЕР .. 002, В 
+0: НЕХТ В: ВЕТУЮН 

210 РЕНТ АТ 17, СОРЕ АЗ(Н); ВЕТ 
СНТ 1; РАРЕВ 5; ЗСВЕЕН$ (17, СОБЕ 
АЗ (Н));: ТЕТ ЕЮО:!: ТЕТ ОР=13-Н: 

РОВ В=20 ТО 20+Н(ОР.:- ВЕЕР ‚02, 
В: НЕХТ В: 1Е (НОТ 72Х АНО ОР‹Т) 
ОЕ (72Х АНО ОР›6) ОК НОТ Н(ОР) ТН 
ЕН ВЕТОЕН 

220 ТЕТ УТН=Н(ОР): ТЕТ Н(ОР)-0: 

ЦЕТ 5(2-2Х)=5(2-2Х) +МТН*5С: РЕТ 
[МТ АТ 17, СОБЕ А$ (ОР); РГАЗН 1; В 
ЕТСНТ 1; РАРЕЕ 5; $СКЕЕН$ (17, СОБ 


Е а$(ОР)): РОВ В:30 ТО ЗО+МТН: В 
ЕЕР . 025, В: НЕХТ В: ВЕТОЮМ 
300 РЕТНТ АТ 19,25; " “АТ 
19,11; ВЕТСНТ 1; РАРЕЕ (Р-8*1НТ 
(0/8)); ТНК 9; ход ";0;" м; 
: РОВ Р=1 ТО 12: ВЕЗТОВЕ 2300+В( 
|Р): КЕАО. Н$ 


330 РЕТЫТ АТ СОБЕ Х3(Р), СОБЕ У3 
(Р); $: ЬЕТ Н(Р}=В{Р); ВЕЕР . 005 
‚0+В(Р): НЕХТ Р 

340 РЕТНТ АТ 15, 11;5(2);: 
АТ 15,20;5(1): 
$: ВЕТОЕН 

400 ВЕТСНТ 0: РЕТНТ АТ 11,0; РА 
ПРЕК 4; "^ ВСРЕЕ ход сн 


РЕНТ 
РЕТНТ АТ 19,11; 


500 РЕТЕТ (”ЧИСЛО ПРОИГРАННЫХ В 
ГАНИ ОЧКОВ: ”+5ТЕЗ (5(1)-5(2)) АН 
Ш $(1)>5(2) ) + ("ЧИСЛО ВЫИГРАННЫХ 
ВАНИ ОЧКОВ: "+5ТЕ$ (5(2)-5(1)) А 
МР $5(1)<5(2)) 

510 60 598 400 


| 520 РЕШИТ АТ 0,0: 1НРОТ ы 


|ТНЕ 0$: ТЕ СОБЕ 0$=121-32* (0$-"У 
|") ТНЕН 60 ТО 1040 

530 $ТОР 

580 РЕТЕТ АТ 18,0; к 


|ЛУНКИ ПРОТИВНИКА ПУСТЫ. ВСЕ ОС- 
'ТАВШИЕСЯ ФИШКИ ПЕРЕШЛИ К НЕНУ. ® 

| 600 РЕ1НТ АТ 20, 0; "ИГРА “; (“ПРО 
| ДОЛЖАЕТСЯ. " АНО $(1)=5(2)); ("ЗАК 
ОНЧЕНА. " АНО 5(1)<‹>5(2)): СО ТО 
500 

700 1Е $5(1)>24 ОБ 5(2)>24 ТНЕН 
со ТО 600 

| 710 ТЕ 5(1)}+5(2}>39 АНО НОТ М1Н 
| ТНЕН ВЕТ С=С+1: ТР. С>10 ТНЕН 
СО ТО 600 

7120 ВЕТУЕН 

1000 60 $0В 8: РОКЕ 23658, 8: ТЕТ 
| 2=0: рН 512): ПИ В(12): ПИН 


{12}: БТИ АЗ (12): ОТЫ С$(12): От 

М Х$(12): ПЛМ У$(12) 

1020 60 59В 2000: РЕТЕТ АТ 19,1; 
тык 0; ы 


|ВЫ БУДЕТЕ СМОТРЕТЬ ИНСТРУКЦИЮ?"; 
|АТ 21,4; "(ЕСЛИ ДА, ТО ВВЕДИТЕ У) 
|": ТКРОТ Г1НЕ 9$: ТЕ СОБЕ 0%+32 
| (0$="У”}=121 ТНЕН 0 ЗВ 2400 
1030 КЕЗТОВЕ 2160: РОБ Н=1 ТО 12 
|: РЕАР А: ТЕТ АЗ (5) =СНЮЗ А: НЕХТ 
н , 

11040 60 508 2020 

1060 С0 50В 2080: 1НРУТ НЕ 0% 
|: ТР 03<"0" ОБ 03>"9" ТНЕН бОТ 
О 1060 

1070 ТЕТ Т.=УАГ. 03+20и (03="0"): Р 
Петнт АТ 15,0; 

| ": РОК Р=15 ТО 21 $ТЕР 2: РЕН 
|т АТ Р, 17; * *: НЕТ Р 


: БЕТ 13="УРОВЕНЬ "+03$+” ” 
1080 ВЕЗТОВЕ 3000: РОВ Н=1 ТО 12 
: ВЕАО Х, У: РЕТИТ АТ Х, У; " *;А 
Т Х+2-4* (Н>6), У+1; ТМК 7; РАРЕВ 
0: ВЕТСНТ 1;СНЮ$ {64+Н):. ТЕТ Х$( 
Н) -СНЕ$ Х: ГЕТ У$(Н)=СНИ$ У: НЕХ 
тн 


1090 РЕТИТ АТ 15,0; ВЕТЕНТ 1; РА 


РЕЕ 1; ТНК Т; "ИГРОК СЧЕТ 
КОНПЬЮТЕР" 

1100 РТМ Н(12): ТЕТ 0=0: БЕТ Т-0 

: ГЕТ 5С=0: ШЕТ С=0; ЕТ 5(1)=0: 


БЕТ 5(2)=0: РОВ Р=1 ТО 12: ГЕТ 
В{Р)=4: ГЕТ Н(Р)=4: НЕХТ Р 

1110 ВАНООМТ2Е : ЦЕТ 2Х=1иТ (РЕНО 
иг) 1 я 
1120 60 50В 300: 60 598 400 

1150 ТЕ 2Х ТНЕЫН РЮТНТ АТ 11, 19; 
ВЕТСНТ 1; ШНЕК Т; РАРЕВ 1;">";: 1 
НРОТ 

“ПЕРВЫЙ ХОД ВЫПАЛ КОМПЬЮТЕРУ. 
НАЖНИТЕ ЕКТЕЮ, ЕСЛИ ГОТОВЫ. "; 
ЬТНЕ 03: БЕТ РВЕЕ=1НТ (ЕНОиТ+6): 
60 то 1400 й 
1200 ТЕ НОТ 7Х ТНЕЯ 60 ТО 1500 
1210 СО 5098 700 

12г0 ТЕ НОТ (В(7)+В{8)+8В(9)+В(10 
)+В(11)+В(12)) ТНЕН ТЕТ $(1)=5( 
1}+48-5(1)-5(2): СО ТО 580 

1230 БЕТ ОР=0: ТЕТ $С=0: 1ЕТ МЕ 
=0: БТИ (12) 

1250 РЕТНТ АТ 47, 19; ВЕТСНТ 1; Т 
НК Т; РАРЕБ 1; ">"; ТНРОТ “НАЖНИТ 
Е ЕНТЕК, ПОЖАЛУЙСТА. "; ТЛНЕ 13: 
60 $508 400: 1Е 0%=-" 5ТОР " ТНЕН 
с0 то 600 й 

1300 РЕТНТ АТ 19, 26; "АНАЛИЗ": ЕО 
Е Р=Т ТО 12: ГЕТ 0-0: БЕТ ЕБО:0: 
ТЕТ 41-0: ТЕТ ОР=0; ТЕ НОТ В(Р 
) ТНЕН 60 ТО 1350 

1320 ЬЕТ Н=Р: ГЕТ Н:=Р: РОВ Е=1 Т 
О 12: ШЕТ Н(К):В(К): НЕХТ Е 

1330 60 50В 400: 60 508 100: 1Е 


` 0<1 АБО НОТ ЕНО ТНЕН 60 ТО 1330 


1340 ГЕТ Н(Р)} =УТИкЕНО 

1350 НЕХТ Р 

1360 ТЕТ РВЕЕ-Т: РЕТНТ АТ 19,26; 
ОЦЕНКА": РОК Р=Т ТО 12: 1Е Н(Р) 
>Н(РЕЕЕ) ТНЕН ТЕТ РЕЕЕ-Р 

1370 НЕХТ Р 

1380 ГЕТ В=0: РОВ Р=Т ТО 12; 1Е 

Р<>РВЕЕ ТНЕН ТР В(Р)>0 ТНЕН 1Е 
Н(Р)-Н(РВЕР) ТНЕН ЬЕТ В=В+1: 1 

ЕТ Н(В)=Р в 
1390 НЕХТ Р: 1Е В ТНЕН ТЕТ РВЕЕ 
=МСТЫТ (ЕНО«В) +1) 

1400 ГЕТ ЕНЬ-©. 1ЕТ 0=0: ТЕТ. ОР= 

0: ГЕТ $5С=1: ГЕТ Н=РВЕЕ: ВЕТ ТН 
20: 60 508.400: РОВ Р=1 ТО 12: Ь 

ЕТ Н(Р)=В(Р): МЕХТ Р ы 
1410 РЕТНТ АТ 117, СОРЕ АЗ(Н); ВЕТ 

СНТ 1; РАРЕК 2; 5СВЕЕН$ (17, СОРЕ 

А$ (Н)): СО $508 100 

1480 РОБ Р=1 ТО 12: ЁЕТ В(Р) =Н(Р 
): НЕХТ Р: 60 $98 300: 1Е НОТ ЕН 

Т ТНЕН. 60 $08 400: 60 ТО 1410 
1450 60 59В 700 

1490 1Р НОТ (В(1)+В(2)+В(3)+В(4) 
+В(5)+В(6)) ТНЕН ТЕТ 5(2) =5(2)+ 

48-5(1)-5(2): 60 ТО 580 

1500 РЕТНТ. АТ 11,12; ВЕ1СНТ 1; Т 

НК Т; РАРЕК 1;"<": РОКЕ 23658, 8: 
ТНРОТ "ВАШ ХОД, УКАЖИТЕ ЛУНКУ. 
“; 1ЛНЕ 9$: ТЕ 03=" 5ТОР " ТНЕН 
60 то 600 ] 

1540 ГЕТ Н=СОБЕ 9$-64-З2* (0$>"7" 
): 60 $58 400: 1Е Н<0 ОВ Н>6 ТНЕ 


Н РЕТЫТ #0; "ЗАПРЕЗЕННЫЙ ХОД. "*" 
ПОВТОРИТЕ, ПОЖАЛУИСТА. ": ВЕЕР 1. 
5.0: 60 ТО 1500 

1550 БЕТ 0:0: ГЕТ 2Х:0: ЪЕТ $С=1 
: ЕР №10: ЕТ 0Р-0; ТЕ ВОТ В( 
Н) ТНЕН 60.ТО 1500 

1560 РЕТНТ АТ 17, СОБЕ АЗ(Н); ВЕТ 
СНТ 1; РАРЕВ 2; 5СРЕЕН$ (17, СОРЕ 
А$(Н)); 60 598 100 

1570 РОБ Р:1 ТО 12: ВЕТ В(Р)=Н(Р 
): НЕХТ Р: ТЕ №Т ОР ТНЕН 60 $9 
В 300: 60 $08 400: 60 ТО 1560 
1580 СО 50В 300: ГЕТ 7Х=1 
1590 СО ТО 1200_ 


2000 ВОРОЕК 4: РАРЕВ 4: ТК 2: С 
15 : РЕШИТ ** ` 
ЕО ПОЖОСИ ШО 0 Ба Синие 00 м 
ши 0 пи п в о оны 
ани аки ЗИ № 0 МООИ ШО ОН 
а вы а сооеыеа о 0 
2005 РЕТНТ ** ы 
ии сию сало сои СОНИ 
Г] г ш ша 
ее па Мое 0 © ба 
ши @ г] ше в 
ГМ м 
2010 РЕТНТ АТ 15,3; ТЫК 0; "НЕЕ 


ЕОМАОЮТ5 + *"ИНФОРКОМ" "*: ВЕТОК 


2020 ВОЮРЕЮ 6: РАРЕК 6: ТНК 0: С 


1$ ; РЕТИТ РАРЕР 4; "инин _ АЕ 

ЕТСАН $ЕЕО$ иникиминининиии 

инмииикикинииникиииии" 

2030 РЕТНТ * ы 


ис м М ЗС Г В | 
г ш 0 м м м м 
ЕЕ 1 ВАТ сы ВНОК лю ЯВНО о АВА а АО а ВИ, 


2040 РЕТЫТ РАРЕЕ 1”" 


2050 РЕТЕТ * я 


с Зв Л ЗС ЗС ЗЕ | 


2060 ВБЕТОЮН 

2080 РЕТЫТ АТ 15,0; ы 
ВВЕДИТЕ УРОВЕНЬ: 1-3=НОВИЧОК” *^Т 
АВ 17; "4-6=ЛЕГКИИ" *^ТАВ 17; "Т-9= 
ТЯЖЕЛЫЙ" *°ТАВ 19; "О= ЭКСПЕРТ" 
2090 ВЕТОЕН 

2100 „РАТА 0, 0, 0, 24, 24, 0, 0, 0 

2101 РАТА 0, 24, 24, 0,0, 24, 24,0 
2102 ПАТА 24, 24,0, 24,24, 0, 24, 24 
2103 РАТА 0, 102, 102, 0, 0, 102, 102, 
о 

2104 РАТА 195, 195, 0, 24, 24,0, 195, 
195 

2105 РАТА 102, 102, 0, 102, 102, 0, 10 
2, 102 
2106 РАТА 102, 102, 0, 219, 219,0, 10 
2, 102 

2107 РАТА 219,219, 0, 102, 102, 0, 21 


2108 РАТА 255, 255, 255,255, 31,7, 3 


2109 ПРАТА 255, 255, 255, 255, 248, гг 
4, 192, 128 

2110 ПАТА 128, 192, 224, 248, 255, 25 
5,255, 255 


2111 ПАТА 1, 3, Т, 31, 255, 255, 255, 2 
55 


22 


[> РАТА 0,2, 4, 6, 3, 10, 21, 23,25, 
ет, 29, 31 

2300 РАТА 
12301 РАТА 
2302 РАТА 
2303 БРАТА 
12304 РАТА "р" 
и2305 РАТА "Е" 
[2306 РАТА ”ВВВ” 
2307 РАТА "ВСВ" 
12308 ПАТА “ВОВ” 
2309 РАТА "ССС" 
2310 РАТА "СОС" 
12311 ПАТА ”"СЕС" 
2312 ВАТА “РОО” 
|2313 ПАТА "РЕГ" 
12314 ОАТА “ЕБЕ“" 
2315 РАТА "ЕСЕ" 
2316 РАТА “РО” 
2317 РАТА "ССС" 
|2318 РАТА “"РЕР" 
|2319 РАТА "НСН" 
п2зг0 РАТА “НОН” 
пезе1 РАТА "бСб” 
|езгг РАТА "НЕН" 
|2зез РАТА “НСН" 
|2324 РАТА “"ННН” 
|2325 ПАТА " 25” 
2326 РАТА " 26” 


пазет рАТА ” 27" 

12328 РАТА ” 28" 

пез29 БРАТА ” 29" 

|2330 РАТА ” 30” 

12400 ВОЕРЕЕ 4: РАРЕЕК 4; ТВК О: С 
15 : РЕТЫТ "иккк АРЕТСАН 5Е 
Е05 кикиккикхккххикккикккикк 
| ккихххиикких” 

2410 РЕТНТ ** й 


[ИГРА ОСНОВАНА „НА АФРИКАНСКИХИГ 
ПРАХ ТИПА “"МАНКАЛА"", ХОТЯ ЕЕ 
ИПРАВИЛА ПРОЩЕ, ЧЕМ У БОЛЬШИНСТВА 


|2420 РЕТНТ * ы 

ИМЕЕТСЯ 12 ЛУНОК С ЧЕТЫРЬМЯ 
ФИШКАМИ КАЖДАЯ. ОНИ ПОРОВНУ РАЗ- 
ИДЕЛЕНЫ МЕЖДУ ИГРОКАМИ. ВАША ЦЕЛЬ 
|- НАБРАТЬ ОЧКИ, СОБИРАЯ КАК. МО- 
25 ОЧКОВ ОБЕ- 


тык о: с 
1,5 ; РЮГЫТ "ини АЕВТСАН ЗЕ 
Ер$ хжкииккикккимихиикикнкик 
| иххикихкииик” 

12450 РЕТНТ ^* " 
ИГРОКИ ПО. ОЧЕРЕДИ БЕРУТ ФИШКИ 


12460 РЕТНТ * х) 
| ЕСЛИ ПОСЛЕДНЯЯ ФИШКА ОКАХЕТСЯ 
В ЗАНЯТОЙ ЛУНКЕ, ТО ИГРОК БЕРЕТ 


ТАК ПРОДОЛЖАЕТ- 
СЯ, ПОКА ХОД НЕ ЗАВЕРШИТСЯ В ПУ- 
ИСТОЙ 'ЛУНКЕ. * 

и24т0 РЕТНТ * ы 
ЕСЛИ ХОД ЗАКАНЧИВАЕТСЯ В ПУС- 


[2480 ТНРУТ "ДЛЯ ПРОДОЛЖЕНИЯ НАЖИ 
ПитЕ ЕНТЕК ”; НЕ 0$ 


| 2490 ВОБРЕЕ 4: РАРЕЕ 4: ТНК 0: С 


ле загрузки символьного 


1,5 : РЕТЫТ "чикк АРЕТСАН 5Е 
ЕО кикиникиииккикикииккикки 
иинкимиккиик” 
2500 РЕЛНТ ** г 
ЗАХВАТ ФИШЕК ВОЗМОЖЕН ТОЛЬКО 
ЕСЛИ ПОСЛЕДНЯЯ ФИШКА В ХОДЕ ПО- 
ПАДАЕТ В ПУСТУЮ ЛУНКУ СВОЕГО РЯ- 
ДА, НАПРОТИВ ЗАНЯТОЙ ЛУНКИ ПРО- 
ТИВНИКА. ТОГДА ФИШКИ ПРОТИВНИКА 
ИЗЫНАЮТСЯ, А СЧЕТ УВЕЛИЧИВАЕТСЯ. 


2510 РЕТЯТ * 4 
ИГРА ПРОДОЛЖАЕТСЯ, ПОКА ОДИН 
ИЗ ИГРОКОВ НЕ НАБЕРЕТ БОЛЕЕ 24 
ОЧКОВ ИЛИ ОБА ПАРТНЕРА НЕ СОГЛА- 
СЯТСЯ НА НИЧЬЮ. " 
2520 РИТНТ * м 
ВНИНАНИЕ! ЕСЛИ ВЫ ОСТАВИТЕ 
СВОЕГО ПРОТИВНИКА БЕЗ ФИЩЕК И 
БЕЗ ХОДА, ТО ВСЕ ФИШКИ, ИМЕЮЩИЕ- 
СЯ НА ДОСКЕ. ПЕРЕХОДЯТ К НЕМУ. " 
2530 ТМРИТ “ДЛЯ ПРОДОЛЖЕНИЯ НАЖН 
ИТЕ ЕМТЕВ "; МЕ 0$ $ 
2540 ВОКОЕК 4: РАРЕЕ 4: ТНК О: С 
1,5 :; РЕТИТ "иник АРЕТСАН  5Е 
ЕО5 хиккикикииккикикиикккихх 
хиииииикикик" 
2550 РЕТИТ *^ п 
ПРАВО ПЕРВОГО ХОДА ОПРЕДЕЛЯЕТ 
КОМПЬЮТЕР СЛУЧАЙНЫМ ОБРАЗОН. "*'*" 
ВЫ ИМЕЕТЕ ЛУНКИ ОТ А ДО Е. КОМ 
ПЬЮТЕР ИМЕЕТ ЛУНКИ ОТ С ДО. (.. " 
2560 РЕТНТ * } 
КОГДА БУДЕТ ВАШ ХОД, ВВЕДИТЕ 
СИМВОЛ ТОЙ ЛУНКИ, ИЗ КОТОРОИ ВЫ 
ХОТИТЕ СДЕЛАТЬ ХОД. КОМПЬЮТЕР 
ХДЕТ НАЖАТИЯ ЕНТЕЮ ДЛЯ НАЧАЛА 
СВОЕГО ХОДА. " 
2570 РЕТЫТ * ы 
КОГДА ИГРА БУДЕТ ЗАВЕРШЕНА, 
КОНПЬЮТЕР ПОДСЧИТАЕТ И ОБЪЯВИТ 
РЕЗУЛЬТАТ. МОЖНО ПРЕРВАТЬ ИГРУ 
В ЛЮБОЕ ВРЕМЯ, ВВЕДЯ: “" 5ТОР "" 
2580 ТНРОТ . и 
ВВЕДИТЕ К ДЛЯ ПОВТОРА ИНСТРУКЦИИ 
ИЛИ ЕНТЕЕ, ЧТОБЫ НАЧАТЬ ИГРУ. "“; 
ЬТЫЕ 2$: ТЕ СОБЕ 7$=118-З2хк (7$- 
К") ТНЕН 60 ТО г400 ^ 
2590 ВЕТОЕН 
3000 РАТА 11,2, 11,Т, 11,12, 11, 17, 
11, га, 11, 21, 5, 21, 5, гг, 5, 1Т, 5, 12, 
5, 1,5, 2 


Набирая программу, Вы периоди- 
чески можете записывать результат 
на магнитную ленту, - выполняя: 
ВИН 5. ПРИ наборе программы обра- 
тите внинание, °пожалуиста, на те 
места, где набор происходит с ис- 
пользованием графического регист- 
ра. Это строки 2000-2005, в кото- 
рых используется символ с кодом 
143 (регистр [6], затем С5+8). 
Это также символы с кодами 131, 
140, 143 блочной графики и симво- 
пы "1"-"1." О0б-графики в строках 
2030, 2050. Сисволы У0б-графики 
"А"-"Н” используются ПРИ наборе 
СТРОК 2300-2324. 

АВТОСТАрТ ПРОГРАММЫ ПРОИСХОДИТ 
со СТРОКИ 2, Где прежде всего ре- 
зервируется несто для располохже- 
ния загрухаеного символьного на- 
бора, путем переустановки значе- 
ния КАМТОР оператором СГЕАЮ. Пос- 


набора‘ 


происходит задание банка символов 
е-графики. На этон подготовку 
можно считать законченной. ‘Далее! 
строка 4 передает ’управление на! 
начало программы. При ‘отладке, 
после остановки ‘’програмны, ее! 
можно запустить конандой Кон с 
начальной строки. 

Так как мы используем русс- 
ко-патинский символьдый набор, то| 
перед тем, как будет произведен! 
ввод параметров: при поноши опера-| 
тора 1НРИТ, корректно будет. при- | 
нудительно включать режим САР$ 
0СК (устанавливать курсор [С}), 
так как вводиться должны парамет-| 
ры в виде английских букв. Это| 
происходит, например, в начале) 
выполнения програмны, в 
1000 — подачей конанды 
23658, 8 а также в других местах. 

Подпрограмма Со $9В 2000 в} 
СТРОКЕ 1020 - это вывод на экран 
титульной заставки. После этого! 
происходит запрос для вывода инс-| 
ТРУКЦИИ. Результат запроса (пере- | 
менная 0$) анализируется, причен| 
результат не зависит от того, на- 
жата ли клавиша "У" в режиме САРЗ!` 
1ОСК или нет. В том случае, если 
нажата клавиша “У", происходит 
вызов подпрограммы 60 $08 2400, | 
которая выводит на экран инструк-| 
цию с правилами игры. | 

Подпрограмма 60 548 2020 в| 
строке 1040 обеспечивает прори-| 
совку ИГРОВОГО Поля - игровые] 
лУНКИ играющего, и компьютера. 

В строке 1060 происходит ввод! 
уровня сложности игры. Кстати, | 
при тестировании программы выяс-| 
нилось, что эта. величина нигде! 
дальше в программе не участвует. | 
Непонятно, для чего автор ввел! 
этот параметр. Может быть.’ расс-| 
читывая в дальнейшем на усовер- 
шенствование игры, или на то, что| 
"пытливые умы”. сами сделают такое! 
усовершенствование. В общем, есть 
ПРОСТОР для творческого поиска: А 
ножно пойти по другому ПУТИ: | 
ПРОСТО ИСКЛЮЧИТЬ все, что касает-| 
ся ввода уровня. Но нам кажется, | 
что вариант с заданием уровняй 
(пусть фиктивным) смотрится дина-1 
ничнее. 

Далее ичет подготовка игрового! 
поля и предустановка исходных 
данных. В строке 1110 происходит 
определение того, кто делает пер- 
вый ход. Если право первого кода 
выпало компьютеру, тогда после 
нажатия ЕНТЕЕ программа переходит 
на строку 1400. Кстати, свой пер- 
вый. ход компьютер делает случаи- 
нын образом выбирая одну из своих 
лунок. Это происходит путем зада- 
ния переменной РВЕЕ в строке 
1150. Но это касается только пер- 
вого хода. В дальнейшем, перед 
тем, как сделать ход,  конпьютер 
рассчитывает наиболее удачный ва- 
риант. Это осушествляется в.стро- 
ках, начиная с 1200. В этой стро- 


ке, если право очередного хода 
имеет человек, то происходит пе- 
реход на строку 1500. Если ход 
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|принадлехит комньютеру, то ожида- 
ется нажатие ЕНТЕК. После чего 
ситуация анализируется (со строки 
1:300) а затем, в строке 1360, вы- 
|бирается наиболее предиочтитель- 
|ный вариант РЮЕР. Далее, со стро- 
|ки 1400  происводят действия 

непосредственно связанные с вы- 
|полнениен хода. 

| Если очередной ход делает че- 
ловек, то происходит переход на 
|строку 1500. На эту строку ны по- 
|падаем' сразу после того, как 6у- 
|дет закончен ход компьютера (в 
|строках С 1400) или в начале иг- 
ры, в случае первого хода, (сн 

Строки 1110-1200). В конце этой 
части программы происходит пере- 
|дача хода’ компьютеру (строка 
11580} и повторение цикла со стро- 
ки 1200. 


и, в заключение, предлагаем 
развивающие вкима- 
| тельность, ‘наблюдательность и 


| быстроту реакции, 


САБ - 
РОУ 


Игра имитирует игровой авто- 
|мат. Монета падает вниз, ударяясь 
Такин обра- 
путь монеты в значительной 
|мере случаен. В нижней части иг- 
РОВОГОо поля нонета попадает в 
| один из шести монетоприенмников, в 
|каждом из которых ужё может нахо- 
Идиться до четырех монет. Ваша за- 
дача - довести их количество до 
пяти’ тогда монеты будут выданы 
[вам в качестве приза (разумеется 

|при наличии у Вашего "Спектрума" 
соответствующей приставки для вы- 
дачи “наличных"). Выигранные мо- 
|неты можно использовать для про- 
Пдолжения игры. Результат игры в 
|основном зависит от момента, ког- 
|да Вы бросаете монету. В то же 
время, У Вас есть возможность 
подтолкнуть падающую монету в лю- 
|6он направлении, но только один 
|раз и только в верхней части дос- 
ки со штыряни. Нонетоприенник Н 4 
|"проглатывает” все монеты, поэто- 
му его следует избегать всеми си- 
|лани. всего на игру Вам дается 6 


1 с0 то 10 
| 2 СЬЕАЕ 64599: ВАНПОМТТЕ 05К 
115619: КЕМ : ГОАБ "спг"СОрЕ 6460 


3 РОКЕ 23606, 88: РОКЕ гз60Т, 2 
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4 60 50В 3000: вУН 

5 Б5АУЕ "САЗН-РЪОМ" ТЛНЕ 2: $А 
УЕ "СЬГ"СОРЕ 64600, 768: 5ТОР 
10 РОКЕ 23658, 8: ВОВОЕЕ 5: РАР 

: 1 

15 БЕТ ОМ-0 

20 ГЕТ А$-"АВ": 

25 60 598 2500 

30 С15 

35 РОК Н-0 ТО 21: ПМ 1%$(26): 
РЕТЫТ РАРЕВ 6;АТ Н, 3; 1$: ПМ 53 
(2): РЕТЫТ РАРЕВ 5; АТ М, 0; 43; АТ 
Н, 30;.1$: НЕХТ Н 

40 РОВ Н-0 ТО 392 5ТЕР за 

45 СТЕСЬГЕ з2+Н, ТТ, 2: ВЕЕР .05, 
10: СТЕСЬЕ за+Н, 109,2: ВЕЕР . 05, 
20: СТЕСЦЕ за2+Н, 141,2: ВЕЕР . 05, 
30 

50 НМЕХТ Н 

55 РОВ Н-0 ТО 160 ЗТЕР з2 

60 СТЕСЬЕ 48+Н, 93,2: ВЕЕР .05, 


ТЕТ В$-"С0" 


40: СТВСЬЕ 48+Н, 125,2: ВЕЕР . 05, 
20 Е 

65 НЕХТ Н 

ТО РЕР РН Т()-1ЫТ ((65536*РЕЕК 


23614+256«РЕЕК 23673+РЕЕК 23672 
}/50) 

72 ГЕТ Т1=ЕН То) 

75 РОК Н=0 ТО г1 

80 РЕНТ ТЕ 4: АТ Н,2; "Е"; АТ 
Н, 29; "Е" 

85 1Р [>12 ТНЕН РЕТЫТ ТЕ 2; 
АТ № З;:"ЕР ЕР ЕЕ ЕР Е ЕР 
ЕК" 

90 НЕХТ М 

95 РОТ 
МЕ 3; 207,0 
100 БЕТ 4:0: ЕТ Ь:0 
120 60 ТО 1000 
130 РЕТЫТ АТ Х, У; " 


ТМК 3;24,159: ОРАМ 1 


";АТ Х+1, У; 
135 1Р 1НКЕУ$-"0”" АНО 1.>40 ТНЕН 
БЕТ К\=М-1.: 60 ТО 2000 
140 ТЕТ Е-2*С0$ (РТ*(ТЫТ (вНржё 

))) 

150 БЕТ Х=Х+а 
151 1Е 1-0 АНО М<4 АНО У<‹-25 АН 
р 1НКЕУ$-"Р” ТНЕН ВЕЕР .05, 32: 


о о о 
о о [= 
[= о о 


о о | 


о о |") |) [2 
ы 9 
3) 1) Ш) 


ТЕТ У-у«2: ТЕТ 1-1: 60 ТО 160 
152 ТЕ 1-0 АКО Н<4 АНО У>:5 АНБ 
ТНКЕТ$-"О” ТНЕК ВЕЕР . 05, 32: 1 

ЕТ 9=4-2: ТЕТ 1:1: 60 ТО 160 
154 ТЕ К>О АНР У-27 ТНЕН ТЕТ 91 

У-К: 60 ТО 160 
155 ТЕ К>О АМР 9<26 ТНЕН ТЕТ У 

=У+К 
157 1Е Е<О АМР У=3 ТНЕМ ВЕТ У: | 

У-К: 60 ТО 160 
158 ТЕ К<0 АКО У>4 ТНЕН ТЕТ У: 

У+К 
160 РЕТНТ 

+1, 7; 8$ 
165 ВЕЕР . 05,20 
166 РОБ Н-1 ТО 100: НЕХТ Н 
170 БЕТ Н-Н+1 
180 ТЕ Н-6 ТНЕН 60 ТО 500 
190 60 ТО 130 
500 ТЕ У=5 ТНЕН ЕТ С-А: БЕТ А| 


ТЫК 1; АТ Х, У; АЗ; АТ Х} 


=А+1: 60 ТО 530 
505 ТЕ У-9 ТНЕН ТЕТ С-В: БЕТ В} 
-В+1: 60 ТО 530 

510 ТЕ У=13 ТНЕМ ВЕТ 6=С: ВЕТ 
С-С+1: 60 ТО 530 

515 ТЕ \:-17 ТНЕН ТЕТ 6-0: 60 Т| 
о 530 

520 12 У-21 ТНЕН ВЕТ С-Е: БЕТ 
Е-Е+1: 60 ТО 530 

525 1Р \:25 ТНЕН ЪЕТ 6-Е: ВЕТ 


Е=Р+1 

530 12 6-4 ТНЕН 60 ТО 600 | 
540 РОВ Н=О ТО 3-6; РЕТНТ 1 
1; АТ 12аз2кн, У; " м; АТ 13+2иН, У; " 
"АТ 18+2\М, У; АЗ; АТ 15+екн, У; В 


з 

550 РАЦБЕ 20 

560 МЕХТ Н 

565 1Е У:1Т ТНЕН РЕЛНТ АТ 20,1 
И 2 А а: По ЖЕРИТИ 

568 1Е СВ‹=0 ТНЕК 60 ТО 2000 | 

5710 РЕТЫТ ТНК 2; ЕЪАЗН 1зАТ 1, | 
20; "НАЖМИТЕ А” 

515 1Е ТИКЕУЗ-"А" ТНЕМ РЕТНТ | 
ТЕ 2; РАЗН 1; АТ 1,28; "2": СОТ 
о 1100 \ 

516 ГЕТ Т-ЕН ТО: ТЕ Т>Т1 +240 Т| 
НЕН 60 ТО 1990 

578 1Е ТНКЕУЗ-"О" АНО 1,240 ТНЕН! 


[е м о 


9. 


79 


600 ВЕЕР 1,40 

604 РОВ Н:0 ТО в 

| 606 ТЕТ м=м+10: ТЕТ ММУ=У-Ь: ЕТ 

СВ=М№М+50 

608 РЬТНТ АТ 12+2жн, у; " ";АТ 1 

|З+2ин, у; " =: ВЕЕР .1,30: РАОЗЕ 

го 

610 РЕТНТ АТ 0,15; " " 

612 РЕТНТ ВЕТСНТ 1: РЪАЗН 1: АТ 

0, 15; СВ ' 

615 НЕХТ Н 

618 ТЕ СЮ<-0 ТНЕК 

620 1Р У-5 ТНЕН ЕТ 
ТЕТ 


624 ТЕ У=г1 ТНЕН БЕТ 
625 ТЕ У-25 ТНЕН ТЕТ Е-0 

630 РЕТМТ НК 2; РАЗН 1; АТ 1, 
20; "НАЖМИТЕ А” 

| 635 ТЕ 1МКЕУЗ-”А" ТНЕН РЕТНТ 
ТМК 2; ЕЪАЗН 1; АТ 1,28; "2": СОТ 


638 ТЕ 1НКЕУ$="О” АН 1.>40 ТНЕН 
60 ТО 2000 

640 60 ТО 635 

и1000 ГЕТ А=ТЫТ (ЕНО*кз): РОВ Н:=1 
ИТО А: 1Е А<>0 ТНЕН РЕТНТ К! 
|: АТ 23-2=Н, 5; ВЗ; АТ 22-2*Н, 5; АЗ: 
ИВЕЕР . 05,0: НЕХТ Н 

1010 ТЕТ В=1МТ (ВНО*3): РОВ Н=1 
ТО В: 1Е В<>0 ТНЕН РЕТЫТ ТНК 1 
|:АТ 23-2иМ, 9; ВФ; АТ 22-гиН, 9; АЗ: 
ВЕЕР .05, 10: НЕХТ Н 

11020 ТЕТ С-ТЫТ (ЕНО+5): РОВ Н:1 
ИТО С: 1Е С<>0 ТНЕН РЕТНТ ТАК 1 
т 23-2г*Н, 13; ВЗ; АТ 2е-2»Н, 13; АЗ 
| ВЕЕР .05,20;: НЕХТ Н 

1040 РЕТ Е-1ЧТ (ЕКО»5): РОВ Н=1 
1ТО Е: ТЕ Е<>0 ТНЕН РЕМТ ШК 1 
|;АТ 23-2иМ, 21; В$; АТ 22-2нН, 21; А$ 
|: ВЕЕР .05, 30: НЕХТ Н 

11050 ГЕТ Е-ТНТ (ЕНО*3): РОВ Н-1 
ТО Е: 1Е Е<>0 ТНЕН РЕТНТ НК 1 
|; АТ 23-2иМ, 25; В$; АТ га-2*кН, 25; А$ 
|: ВЕЕР .05, 30: НЕХТ Н 

1055 РЕТ СЕ=60: РЕШЫТ ВЕТЕНТ 1; 
ЕЪАЗН 1; АТ 0, 15; СВ 

11060 РЕТНТ ТМК 2; ЕТАЗН 1; АТ 1, 
120; "НАЖМИТЕ А" 

11065 12 1МКЕУ$-"А" ТНЕН РЕТТ 
ТНК 2; ЕГАЗН 1;АТ 1,28; "2": СОТ 


1068 ТЕ ТНКЕУЗ-"О" АНО 1.240 ТНЕН 
| 60 ТО 2000 

И107О СО ТО 1065 

1100 ТЕТ 1.:1+10:. БЕТ КМ=У-Г: ЕТ 
'СВ:НМ+60: ТЕТ 1=0 

11101 РЕТИТ АТ 0,15; " в 

11102 РЕТНТ ВЕТСНТ 1; РЫАБН 1; АТ 
й 0, 15;СВ $ 

1104 РЕГНТ НЕ 1; АТ 0, 3; АЗ; АТ 1 
‚„3;8В$: РАЦЗЕ 6 
11105 РОВ Н:3 ТО 27 
1410 РЕТИТ АТ О, Н;” ";АТа,Н;" 
11115 ТЕ М:-27 АБР СВ<‹=0 ТНЕН 60 
Ито 2000 


11130 РЕТНТ 
1, Н+1; 53 
1140 РАЦЗЕ 6 
1150 ТЕ 1ЫКЕУ$="2" АНО ТНТ (НИг) 
И<>ТМТ ((4-1)/2) ТНЕН ТЕТ У=Н+1: 
| РЕТНТ АТ 1,20; " "; бот 


ТНК 1;АТ 0, +1; АЗ; АТ 


1200 ТЕТ Х-0: БЕТ м-0 
1210 РЕТНТ АТ Х, У: " ";АТ Х+1, У; 
„. 

1242 РЫТНТ АТ 0,15; 

1215 РЕТЕТ ВРТЕНТ 1; РЬАЗН 1; АТ 
0, 15; СВ 

1220 ЕТ Х=Х+2: ВЕТ М=М+1 


1230 РЕТЫТ ТМК 1; АТ Х, У; АЗ; АТ Х 
+1, У; В$ 
1240 ВЕЕР . 05,20: РОВ Н=1 ТО 50: 
НЕХТ Н 


1250 ТЕ ТНТ ((у+1)/4) ТНТ (0943) 
/4) ТНЕН 60 ТО 1300 

1260 ТЕ М-2 ТНЕН 60 ТО 1300 
1210 60 ТО 1210 
1300 РВТНТ АТ Х, У; * ";АТ Х+1, У; 
к 

1310 МОТ 
нк 3:207,0 
1320 60 ТО 135 

1990 РЕЛНТ АТ 0, 15; * 
0: * я К 
1992 РЕТНТ МЕ 1; РАЗН 1;АТ 1, 
8;" ИГРА ОКОНЧЕНА " 

1994 РОВ Н=О ТО 400: НЕХТ Н 
2000 РЕТНТ АТ 0,15; "” — ";АТ 1,2 
о; * " 

2002 ТЕТ ОМ=Ом+ НМ 

2003 ТЕ 04>=0 АНР ТНТ ( (04-10) 1 
00) = ТНТ (04/100) ТНЕН РЕТЫТ 1 
К Т; РАРЕВ 1; ВВТЕНТ 1:АТ 1,4; "И 
ТОГОВЫЙ ВЫИГРЫШ #“;04/100; "О = 
2004 ТЕ 04>=0 АНР ТНТ ( (04-10) /1 
00) <>ТНТ (04/100) ТНЕН РЕШТ 1 
НЕ Т; РАРЕВ 1; ВРТЕНТ 1; АТ 1,4;" 
ИТОГОВЫЙ ВЫИГРЫШ #"; 04/100; ". 0" 
2006 ТЕ 0м<0 АНО ТНТ ((04-10)/10 
0)=ТНТ (04/100) ТНЕН РЕТНТ ТЕ 
7; РАРЕВ 1; ВЕТСНТ 1; АТ 1.4; "ИТ 
ОГОВЫЙ ПРОИГРЫШ #°; -04/100; "О * 
2007 ТЕ 0М<0 АНР ТНТ ( (04-10) /10 
0) <>1ЫТ (04/100) ТНЕН РЕТНТ 1Н 
К Т; РАРЕЕ 1; ВЮТСНТ 1; АТ 1,4; "И 
ТОГОВЫЙ ПРОИГРЫШ +"; -04/100; ". О" 
2009 КОВ Н-0 ТО 8 

2010 ПМ 13(26) 


ТНК 3;24,159: ОВАМ Т 


";АТ 1,2 


2020 РЕТНТ РАРЕБ 2; ВЕТСНТ 1; АТ 

13+Н, 3; 1$ 

2030 МЕХТ Н 

2040 РЕЛНТ НК Т; РАРЕВ 2; АТ 14 

‚4;” ВЫ ИЗРАСХОДОВАЛИ - "; ВЕН 
т 4 } 

2050 РЕТМТ 1К Т; РАРЕВ 2; АТ 16 


‚Т;” И ПОЛУЧИЛИ - "; ВЕТСНТ 1;4 
2060 ТЕ НМ>=0 ТНЕН РЕШЧТ КТ 


; РАРЕЕ 2;АТ 18,5; "ВАША ПРИБЫЛЬ - 


- "; 15 Т; РАРЕВ 0; ВЕТСНТ 1;А 
Т 18,22; Мм 

2070 ТЕ ММ<0 ТНЕН РЕТНТ НКТ; 
РАРЕЕ 2:АТ 18, Т; "ВАШИ ПОТЕРИ - 


“; ТК Т; РАРЕВ 0; РЪАЗН 1; ВЕС 
НТ 1; -Ны 
2080 РЕТНТ ТНК Т; РАРЕБ 1; ВЕС 


НТ 1; ЕЫАЗН 1;АТ 20, 4; "СЫГРАЕТЕ 
ЕЩЕ РАЗ? ДА-‹У>" 

2082 1ЕР Т>Т1+240 АНО ТМКЕУ$ = "У" 
ТНЕЯ ЕТ Т1=ЕН Т(): ЦЕТ 04-0: С 
О ТО 2:53 

2085 ТЕ ТНКЕУ$-"У" ТНЕН 60 ТО 2 
100 


.2090 60 ТО 20840 


2100 РЕТНТ АТ 1,3; " 
* 


2105 РОЮ Н:0 ТО 8 

2110 О1М 1$(26) 

2120 РЕТНТ РАРЕВ 6; АТ 13+Н, 3; 1$ 
2130 НЕХТ Н 

2140 0 ТО 75 


2500 РТН 1$(704): РЕТЫТ АТ’ 0.0; 1 
ы 

2520 РЬОТ НК 6; 26, 144: ОВАМ 0, 
-З2, 11*Р1/10: ВЕЕР . 05, 10 

2523 РАЦЗЕ 30 

2524 РОТ 32,112: БВАМ 12,32: ВЕ 
ЕР . 05,10: РВАМ 12, -32: ВЕЕР .05 | 
‚10: РЕОТ 35,120: БВАМ 18,0: ВЕЕ | 
Р.05, 10 

2526 РОТ ТЩК 6; 80,136: ОЕАМ -8 
‚ -8, ЗяРТ/г: ВЕЕР . 05,10: РОТ 1 
НК 6; 64, 120: ОРАМ 8, 8, З«РГ/2: ВЕ 
ЕР . 05, 10 

2527 РАЦЗЕ 30 

2528 РЬОТ 88,112: ОРАМ 0,32: ВЕЕ | 
Р . 05,10: Р\ОТ 104,112: ОБАМ 0,3 | 
2: ВЕЕР .05,10: РЬОТ 88,128: БВА | 
М 16,0: ВЕЕР .05, 10 

2529 РАШЗЕ 30 

2530 РОТ 116, 128: ОЮАМ 8,0: ВЕЕ 
Р .05, 10 

2531 РАШЗЕ 30 

2532 РОТ 136, 112: ОВАМ 0, 32: ВЕ | 
ЕР . 05,10: РЕАМ 16,0: ВЕЕР . 05,1 | 
0: РЕОТ 136, 128: ОВАМ 10,0: ВЕЕР 
. 05, 10 

2533 РАШЗЕ 30 | 
2534 РОТ 1176, 112; ОВАМ -16,0: В 
ЕЕР . 05, 10: РВАМ 0, 32: ВЕЕР .05, 
10 

2535 РАОБЕ 30 

2536 РГОТ НК 6;194, 144: РВАМ 0 
‚ -За, 5*Р1/6; ВЕЕР . 05,10: РВАМ 0 
‚ За, 5"РТ/б: ВЕЕР .05, 10 

2537 РАОЗЕ 30 

2538 РОТ 214, 144: ОВАМ 8, -32: В | 
ЕЕР .05,10: ОРАМ 8,16: ВЕЕР .05, | 


10: ОРАМ 8, -16: ВЕЕР . 05, 10: ПВА | 


М 8, 32: ВЕЕР . 05, 10 

2540 РОК Н-=13 ТО 21 | 

2545 РЕТТ Е г; АТ Н, 3; "ЕЕ ЕР | 
ЕР ЕР, ЕР Е Е 

2550 РЕ1НТ ТНК 4; АТ Н,2; "Е"; АТ 

М, 29; "Е" 

2555 НЕХТ Н 

2558 ГЕТ 9:5 

2550 РОК Н=0 ТО 3: РЕАШТ ШК 1; 

АТ 12+еиН, 9; ” ";АТ 13+2жН, 9; " 

";АТ 14+2иН, О; АЗ; АТ 15+2кН, 0; В$: 
ВЕЕР .05,09: НЕХТ М 

2561 КОК Н-=0 ТО 2: РЕШИТ ТК 1; 

АТ 12зежн, 9; " "; АТ 13+2хкн, 9; 

“;АТ 14+2«Н, О; АЗ; АТ 15+25Н, 0; В$: 
ВЕЕР . 05,0: НЕХТ Н 

2562 КОЕК Н-=0 ТО 1: РЕТНТ ТИК 1; 

АТ 12+2иН, 9; ";АТ 13+2хНн, @;" 

"; АТ 14+2*Н, О; АЗ; АТ 15+2%Н, 0; В$: 
ВЕЕР . 05,09: НЕХТ Н 

2563 РЕТНТ ТНК 1;АТ 14,9; АЗ; АТ 

15, 0; В$: ВЕЕР . 05, @ 

2565 ТЕТ 9:=0+4: ТЕ 09‹29 ТНЕН 60 
ТО `2560 

2570 12 9:29 ТНЕН РЕТИТ ЕТГАЗН 

1; ВЕ1СНТ 1; ТЕ Ш;АТ 10,1; "ВАМ 

“НУЖНА ИНСТРУКЦИЯ? ДА - <у>" 

2575 РАЦЗЕ 0: 1Р ТМКЕУ$-"У" ТНЕН 
0 ТО 2600 

2580 БЕТОЕН 

2600 С1.5 

2610 РЕТЯТ 

САЗН-РЪОМ “ 

2615 РЕ1ЧТ АТ 3,0; ЗС 
ВАША ЦЕЛЬ - СОБРАТЬ 5 НОНЕТ В 

ОДНОМ МОНЕТОПРИЕМНИКЕ. В ЭТОМ 

СЛУЧАЕ ВСЕ ОНИ ДОСТАНУТСЯ ВАМ. " 

2620 РЕТНТ АТ 6,0; й 
У ВАС ЕСТЬ 6 МОНЕТ ПО 10 ПЕН- 

СОВ ПЛЮС ВСЕ, ВЫИГРАННЫЕ ВАМИ. " 


ТНУЕВ5Е 1;АТ 1,10;”" 


зо 


[5622 РАУЗЕ 100: РЕТНТ 14К 6; РА 
РЕК 2; РЬАЗН 1; АТ 9,4; " НАЖНИТЕ 
ЛЮБУЮ КЛАВИШУ ” 

2624 РАЦЗЕ 500: РЕТЫТ АТ 9,4;" 


2628 РЕЛНТ ТНК 6; 
9; " УПРАВЛЕНИЕ ” 
2630 РЕТИТ АТ 11,0; "А - ВСТАВИТЬ 
МОНЕТУ В АВТОНАТ"; АТ. 13, 0; "2 - 
ЗАПУСТИТЬ МОНЕТУ" 
2635 РЕТМТ.АТ 15,0; и 
О ИР - ПОДТОЛКНУТЬ МОНЕТУ 
ВЛЕВО ИЛИ ВПРАВО (ТОЛЬКО 1 И 
2640 РЕТНТ АТ 18,0; 
© - ПРЕКРАЩЕНИЕ ИГРЫ (ТОЛЬКО ПО- 
СЛЕ ТОГО, КАК ВЫ ИЗРАСХОДУЕТЕ 
ПЕРВЫЕ 50 ПЕНСОВ” 
12642 РАОЗЕ 100 
2644 ОГМ 13$(160): 
: АТ -3, 0; 1$ 
2650 РЕТНТ ТНК 2; РАЗН 1:АТ 5, 
3; " НАЧИНАТЬ ИГРУ? ДА - <>" 
12660 ТЕ ТНКЕУЗ-"У” ТНЕН КЕТОКН 
Пато 60 ТО 2660 
13000 `ВЕЗТОВЕ : ТЕТ Н-0 
13005 РОКЕ 23615, 88: РОКЕ 23616, 2 


РАРЕК 2;АТ 9, 


РЕ1НТ РАРЕЕ 6 


13010 ГЕТ 0=РЕЕК 23615+256*РЕЕК 2 


13020 ВЕАР 4: 1Е 3:.5 ТНЕН ВЕТОВ 


13030 РОКЕ П+Н, 4: БЕТ Н: в сот 
3040 РАТА Т, 31, 63, 112, 119, 228, 23 
9, 231, 224, 248, а5а, 14, 230, 241, 241 
|, 247, 231, 224, 231, 9Т, 112, 63, 31,1, 
Пачт, 247, 231, 198, 14, 252, 248, гг4 

13050 РАТА 127, 127, 127, 127, 121, 12 
|Т, 127, 127.254, 254, 254, 254, 254,25 


|4, 254, 254,.5 


| Программа русифицирована по 
|методике, описанной выше. Авто- 
|старт программы - со строки г, 
где происходит загрузка 
ного набора. В строке 3 пРоиСхо- 
|диг включение символьного набо- 
пра, ав строке 4 - Формирование 
банка символов \-графики при 
|помоши подпрограммы 3000. Фор- 
Имируются только символы "А" - 
|"=", так как только они применя- 
ются в прРоГгранме. После. этого 
| на- 
|чальной строки. Так Вы будете за- 
пускать программу при остановке 
во вреня отладки: командой КУН. 

| Фактическое начало выполнения 
[программы - строка 10. Здесь про- 
Писходит принудительное включение 
регистра САР5 10СК для того, что- 
|бы упростить процедуру опроса на- 
йжатых клавишей при поноши 1ИКЕУЗ. 
| чтобы проверить нахатие 
\клавиши “А”, обычно применяется 


ТР 1НКЕУ$-"а" ов 1НКЕУЗ$="А".., 
|  Вкаючив САРБ 10СК. можно иск- 
лючить первую половину этого вы- 
[ражения, так как невозможно будет 
Инажатие “а”. 

| В строке 15 обнуляется счетчик 
псуммарного выигрыша на протяжении 
[нескольких игр, проведенных под- 
ряд. Далее задается изображение 
|верхней и нижней половины монеты 


СИНВОЛЬ-° 


при помоши символов ИПб-графики, 

В строке 25 выполняются дейс- 
твия, связанные с прорисовкой ти- 
ТУЛЬНОЙ Страницы ИГРЫ ПРИ ПОМОШИ 
подпрограммы 2500. В строке г500 
Фактически выполняется очистка 
экрана, но, в отличие от С15, это 
происходит плавно, для более при- 
ятного зрительного эффекта. Стро- 
ки 2520 - 2538 воспроизводят наз- 
вание игры, причем это делается 
довольно оригинальным способом. 
Строки 2540 - 2555 прорисовывают 
нонетоприенники, а строки 2560 - 
2565 заполняют их нонетани. 

В строке 2570 начинаются дейс- 
твия, связанные с выводом на эк- 
ран ИНСТРУКЦИИ ИГРЫ. ДЛЯ ЭТОГО 
надо нажать "У". Если это зафик- 
сировано, то подпрограмма перехо- 
дит на строки 2600 - 2670 для вы- 
вода краткой инструкции по игре. 
ЕСЛИ Нет, то подпрограмма завер- 
шается и выполняется возврат на 


продолжение выполнения программы 
Со СТРОКИ 30. 
Строки 30 - 95 обеспечивают 


ПРОРИСОВКУ ИГРОВОГО ПОЛЯ. 35 - 
голубые полосы слева и справа эк- 
рана. 40 - 55. - штыри для измене- 
ния направления падения монеты. 
75 - 90 .- монетоприемники. 95 - 
направляющая для движения монеты. 

В строке 100 обнуляются счет- 
чики выигрыша и проигрыша, затем 
происходит переход на строку 
1000. Здесь нонетоприенники за- 
полняются монетами случайным об- 
разом. Ну не совсем случайным, 
все-таки имеются некоторые огра- 
ничения. В крайних монетоприенни- 
ках задается не более двух монет, 
а в третьем и пятон их количество 
может достигать’ четырех. Коли- 
чество нонет в монетоприемниках 
1-6 определяется соответственно 
перененными А-Р. Так как в 4-н 
нонетоприеннике не может быть мо- 
нет по условиям игры, то перемен- 
ная О не задается. 

Строка 1055 задает Ваш “на- 
чальный капитал”. Далее выводится 
предписывающая надпись и автомат 
хдет, когда вы опустите монету в 
автомат. Если Вы. это сделаете 
{нажатием "А"), то программа пе- 
реходит на строку 1100. 

В строках с 1100 происходит 
движение монеты по направляющей, 
проходящей внутри автомата, Те- 
перь Вы должны в нужный момент 
сбросить ее вниз, нажав "2". Если 
Вы не сделаете это вовремя, пока 
она не докатится до конца направ- 
ляюшей, то Вы ее просто потеряе- 
те. При нажатии "7" программа пе- 
реходит на строку 1200. Это 
начало падения монеты. дистанция 
по вертикали, которую  нонета 
прошла от верхней направляющей, 
обозначена переменной НМ. При дос- 
тижении Н-2, строки с 1300 обес- 
печивают ”закрывание шели", через 
которую монета провалилась в ав- 
томат. Далее программа переходит 
на строку 135. 


В строках 151 и 152 происходит 
проверка нажатия клавишей "О" или 
"р", ПРИ ПОоНОШИ КОТОРЫХ МОЖНО 
подтолкнуть монету. Обратите вни- 
мание на Условия, ПРИ Которых 
возможно подталкивание монеты. 
Это, прежде всего, Флажок, запо- 
минающий Факт подталкивания - Г. 
Нонету можно ПОДТОЛКНУТЬ ТОЛЬКО 
один раз. Кроне того, это дистан- 
ция, на которой нонета находится 
от верхней направляющей. Если но- 
нета упала слишком глубоко (Н 
больше или равно 4), то подтолк- 
нУТЬ монету уже не удастся. Факт 
подталкивания монеты сопровожда- 
ется. коротким звуковым сигналом. 
Строка 160 обеспечивает прорисов- 
ку монеты на новом несте. Строка 
166 определяет скорость падения 
монеты. 

При падении монеты, когда она 
достигнет уровня монетоприенмников 
(что определяется по величине 
дистанции М), програмна переходит 
на строку 500. В этих строках вы- 
числяется, сколько же нонет стало 
в том монетоприемнике, куда упала 
монета. Если там к этону времени 
уже находилось 4 монеты, то прог- 
рамна переходит на СТРОКУ 600. 
Если монета упала в четвертый но- 
нетоприемник, то она пропадает 
(строка 565). Если это была пос- 
ледняя нонета, то переход на Фи- 
нал игры, строку 2000 (определя- 
ется в строке 568). Строка 570 
обеспечивает продолжение игры. 

Если в монетоприемнике оказа- 
лось 5 монет, то программа про- 
долхается со строки 600. Здесь 
вам достаются все выигранные 5 
монет, а нонетоприемник освобож- 
дается. В строках 620-625 обнуля- 
ются счетчики. монет в соответс- 
‘твуютен монетоприеннике. Со 
СТРОКИ 630 все действия повторя- 
ются. 

Финальная часть программы - 
это строки С 2000. Здесь произво- |. 
дится рассчет результата игры - 
разницы между израсходованными и 
выигранными  нонетанми, рассчет 
суммарного результата по итогам 
нескольких игр и вывод всех этих 
данных на экран. В строке 2080 
Ван предлагается продолжить игру. 
В том случае, если Вы согласи- 
тесь, нажав "У", игра будет про- 
долхжена. 

Начиная набивать 
наберите строки 1-3. Потом. сде- 
лайте УМ 2 и загрузите заготов- 
ленный русско-латинский символь-|, 
ный набор. После его включения 
продолжайте набивать программу. 
Инена переменных набирайте в ре- 
жиме САР5 ГОСК. Обратите внима- 
ние, что символы “А" - “0” в 
строке г0 набираются при помощи 


программу, 


графического регистра. То же от- 
носится и к символан "Е" - “Р" в 
строках 80, 85 и 2545, 2550. Пе- 


риодически выполняйте КИН 5 для 
записи результатов работы на наг- 
нитоФон. 


81 


компьютерная 


матвеев ЮюЮ. д. 


новелла 


ОТВЕТНЫЙ УДАР КРАКСА 
(по игре Колина Свиябурна 
” Джо Баэйд-2 "). 


Было около полудня, когда в 
квартире Дко Блэйда резко зазво- 
нил телефон. разгоняя остатки 
сна, Дло успел пару раз перевер- 
нутьЬся с боку на бок прежде, чем 
дотянуася затекшей рукой до ко- 
лодной ТРУбКИ телефона. 

- Говорите, 
сонно. 

- Все спишь? - после небольшой 
ппаузы спросил грубый незнакомый 
голос. 

- Нет,.. по телефову разгова- 
риваю. - дхо почесал шеку и поду- 
|мал о тон, что побриться сегодня 
не помешало бы. - А кто это? 

На другом конце провода послы- 

джо уже хотел швыр- 
как вдруг услышал 
которая окончательно при- 


смерть про- 


джо 
положил трубку, потянулся и сел 
на кровати, 
| Так с ним никто еше не шутил. 
Джо понял, что дело серьезное и, 
прежде чен переходить к активнын 
действиян, решил привять души 
хорошенько все обдумать. 
вне вчера вечером звонили из 
Мэрии и просиди подъехать на при- 
ем завтра к часу дия. Джо котел, 
чтобы его соединили с мэрон на- 
прямую, но секретарь отказал. Там 


как Джо взорвал 
мэр практически 
зрения. Он видел 
раз на церенонии 
Нэр приколол на 


годарив, стал поспешно зачитывать 
Фамилии сотрудников безопасности, 
получивших благодарность. 
Церемония проходила в узком 
кругу цовереннык лиц и прессой не 
освещалась. Отчасти поведение нэ- 


ние в городе, старые связи с 
ушедшими в отставку после той ис- 
тории, по-прежнену позволяли со- 

руках основные 


но или поэдно иэру придется туго, 
ибо Кракс никогда не забывал 
обид. И вчера подготовка к ответ- 
нону удару, видимо была законче- 
на. Иначе зачен мэру опять потре- 
бовался Джо Блэйд? Чен он, ног 
помочь? ] 
Приняв душ и перекусив на ско- 


РУЮ РУКУ, Джо подошел к телефону 
и набрал номер приемной мэрии. 
Пока в трубке шли длинные гудки, 
Джо прикурил сигарету. 

— Вас слушают. 

- Здравствуйте. Говорит дзо 
Блэйд. Соедините меня с мэрон. 

- Это невозможно. Идет совеша- 
ние. 

- Послушайте, я сегодня... 

В трубке что-то шелкнуло и Джо 
услышал голос мэра: 

- Это ты? Боюсь, 
дали, 

- В чем дело? - Джо выдохнул 
густое облако дыма. 

- В городе беспорядки. ‘Толпа 
каких-то молодчиков шатается по 
улицан, крушит витрины магазинов, 
терроризируют население...  Поли- 
ция бездействует. 

- Почему? - спросил Джо, дога- 
пываясь.. что главный виновник 
проискодяшего уже обо всем поза- 
ботипся. 

- Силы моих людей небезгранич- 
ны, а остальные не в моем подчи- 
нении. .. 

Джо занетил, что мэр перешел 
на шепот и старается не называть 
имен. 

— Он рядом? 

- В зале заседаний. Тан все 
слышно. Я вышел позвонить, а тут 
ты... - Нэр тяжело вздохнул. 

- Что же Вы теперь решаете? 

- Они предлагают ввести чрез- 
вычайное положение, чтобы навести 
порядок. 

- Я так и думал. Но вы, 
но, не соглатаетесь? 

- Голосов поровну и пока ни- 
чья. А ничья в ною пользу. Те- 
перь они требуют собрать расши- 
ренное заседание Дуны и я не ру- 
чаюсь за исход битвы. Им будет 
достаточно перевеса в один голос 
и тогда он станет командантом го- 
рода на время лействия чрезвычай- 
ного положения. 

- Сколько еще придет горожан 
на расширенное заседание? 

- Шестнадцать человек. 

= и какое у них настроение? 

- Ни за что не ручаюсь. Я до- 
веряю ин, конечно, но где гаран- 
тия, что Кракс не подкупил и их. 

Дхо Блэйд посмотрел на часы. 

- Когда начнется заседание? 

- Через час... - обреченно от- 
ветил изр. 

Джо Биэйд задумался. Что нохно 
сделать в этой ситуации? Выловить 
заседателей где-нибудь на подходе 
К Мэрии и объяснить обстановку? 
Они сочтут это за прямое давление 
и, чего доброго, согласятся с 
Краксом. Разогнать всю толпу ху- 
лиганов? Одному это вряд пи по 
силам. для того, чтобы коть что- 
то сделать, нужно знать намерения 
Кракса Бладфингера в отношении 
этих шестнадцати горожан. они, 
конечно, "пюдишки” для него, - но 
их голоса сейчас стоят очень до- 
рого. 

Мысли Дао прервал тихий голос 


что мы опоз- 


конеч- 


мэра: 

- Я видел краем глаза на столе 
Кракса пакет уже готовых докунен- | 
тов и распоряжений. Среди прочих. | 
там есть приказ о твоем аресте... | 

Эти слова мэра Джо оценил как 
РУКОВОДСТВО К действию. 

- Понятно, - сухо ответил он, | 
- До свидания. 

- Что собираешься делать? - 
спросил мэр, но ответа не дождал-| 


ся: Джо бросил трубку. 
к „ « 


Еше с минуту он собирадся с! 
нысляни. Потом подошел к окну. 
Джо жил в стареньком трехэтахном 
донике на втором этаха. Окна его 
квартиры выходили на узкую серую 
улочку. Обычно нноголюдная, улица| 
сегодня была абсолютно пустынной. 
Только в самом ее конце у витрины! 
галантерейного нагазина наблюда- 
лось какое-то движение. 

Джо быстро оделся и заглянул в 
шкаф. где на верхней полке среди 
прочих вещей поблескивал хрОНоМ 
распылитель. Решив, что с оружием 
он привлечет к себе лишнее внима- 
ние, Джо не стал брать его с 


чью-то брань. 
Человек пять или шесть шли 
пряно к нему, 


весело и свободно на этих пустын- 
НЫХ улицах, где они чувствовали! 
себя хозяевами. Бсе как один бы-| 
ли пьяны. 

Дво двинулся им навстречу, 
ЕГО, казалось, не замечали. 

Какой-то панк, высоко подпрыг- 
ув, попытался разбить уличный 
Фонарь, но не достал, а пролетев 
вперед пару нетров чуть не стол- 
кнУлся с Джо. 

окинув его стеклянным взгля- 
дон, и видимо приняв за своего, 
панк пошел дальше, 

"Это хорошо", - подумал джо и 
буквально нокаутировал ударом 
ноги в челюсть подошедшего к нему, 
наркомана. | 

Никто на действия дхо не про-| 
реагировал. Вся группа прошла ми-| 
мо, пребывая в каком-то зиетазе 
разрушения. 

“Без наркотиков здесь не 060- 
шлось", - подумал Блэйд. глядя ин 
вслед. 

развернувшись, 


он быстро пошел 
по пустынной улице в сторону цен- 
где находилось здание! 

нэрии, Дхо надеялся перехватить 
заседателей на подходе. | 
По пути он встретид еше одного 


панка, ‘видимо отбившегося от той 
ШУМНОЙ ГРУППЫ. Ударом ноги в пры- 
ке, Джо надолго успокоил нарко- 
нава. 

Неожиданно он заметил у 
дона на тротуаре небольшой 


|аый предмет с циферблатом на ли- 
цевой стороне, очень похожий на 
будильник. Прибор вёл обратный 
фотечет времени. Все это было до 
боли знакомо. Джо покопался в 
собствениой паняти. Ну конечно! 
Это был военный таймер-универсал, 
имеющий свою передающую антенну и 
|способный задействовать любой 
электронный прибор на расстоянии. 
Может применяться в самых различ- 
ных целях. 

как оказалась эта штука на 
|улипе? Какой механизм она должна 
Горивести в действие через девять 
минут, если верить ее показаниям? 
| Джо не нашел отвёта на эти во- 
|просы, У него возникло хелание 
вдребезги разбить таймер, но, по- 
|думав, он нажал кнопку на задней 
стенке прибора, установив тем са- 
мым счетчик времени на первона- 
Чальное значение. Что бы ни дол- 
хно было произойти, Дхо оТТЯнУЛ 
время еше. на десять минут. Этот 


|отрезок времени был задан про- 
Грамной тайнеёра. 
Без сомнения, Кракс затеял 


попасную игру и ‘теперь во что бы 
"то ни стало нужно было помещать 
ему достичь своей цели. 

Джо подошел К лвери подъезда и 


| чтобы не обходить Кругом целый 
| квартал. Однако, дверь была за- 
|перта. Жители города в. панике за- 
|крылись в своих домах в надежде 
пспастись от буйных панков. Никто 
не знал, что зто может пометать 
Иджо осуществить его замысел. 

| Впрочен, у Джо Биэйда всегда 
имелось в запасе. штук двадцать 
всякого рода отмычек; Одной ИЗ 
Иних он и воспользовался, 

джо вышел на соседнюю улицу, 
Здесь так же бесчинствовали пан- 


|ки, алкоголики и наркоманы. нес- 
|кольких, самых буйных, Джо зава- 
Илил СВОИМ КоРОННЫМ ПРИеМОН. Во 


Ивсеобщей неразберихе никто ни на 


Пройдя вперед несколько мет- 
ров, Джо заметий какого-то граж- 
данина почтенного возраста в се- 
Ром плате и черной шляпе. он явно 
Куда-то торопился, однако ему все 
время прикодилось прижинаться к 
краю тротуара, Чтобы пропУСТИТЬ 
И пробегающих мимо молодчиков. Джо 
подошел, к нему сзади и тихо, что- 
бы не испугать человека, шепнул: 

- Здравствуйте, я от мэра, 
‘Человек в Плашё вздрогнул и 


'липо. Такие люди часто появляются 
на экране телевизора и спутать их 
|с кем-нибудь невозможно, 

- Ваш Мэр, - нахнурив брови 
ответил старичок, - просто полный 
идиот... Я не хочу с вами разго- 
| варивать. 
| - Постойте, - Джо сжватил его 
йза руку, - вы же всегда были за 
|мэра. Что случилось? 

- А сейчас против. и дай Бог 
Краксу сид й здоровья! 

Дхо еле сдержал себя, чтобы не 
съездить уважаемону члену город- 
ской Думы по Физиономии. Но он 
заставил себя быть вежливым и 


ЛИШЬ СУРОВО ПОСМОТРеЛ На собесед- 
ника. 

- Да! Я буду голосовать за 
Кракса Бладфингера! -  завизхал 
старик. - Только он может навести 
ПОРЯДОК В ЭТОМ ГОРОДВ. Всё! Раз- 
говор окончен! 

Джо нехотя ОТПУСТИЛ РУКУ. В 
чен дело? Откуда такая ненависть? 
Неожиданно в голову пришла’ сунас- 
шедшая мысль. Перед глазами у Джо 
ПРОПЛЫЛ Таймер, найденный на ули- 


` це и картина стала резко прояс- 


няться. Г 

- НиНУТОчКУ, - ДЖО быстро за- 
ломил руку засепателя за спину и, 
пока тот сопротивлялся и пыхтел, 
в темпе проверил его карманы. и 
он не ошибся. в левом кармане 
плаша лежал небольшой, со сничеч- 
ный коробок, предмет. в одно 
мгновение он оказался в руке у 
джо: 

ЕГО подозрения 
Кракс Бладфингер занялся элек- 
ТРОННЫМ (ГИШНОЗОМ,  ЧТОобЫ заполу- 
чить голоса членов дуны. 

Отнахиваясь _ от  озверевшего 
старичка, как бт назойливой нухи, 
джо нажал кнопку "ВЫКЛ. ", но 
опять столкнулся с любимой идеей 
Кракса - секретным кодом. Кракс 
зашишал себя как мог - он предви- 
дел, что кто-нибудь ножет обнару- 
зить гипнотизатор и тогда, при 
ошибке ввода ‘кода, гибель нашед- 
шего эту штуковину неизбежна. 

Шестьдесят, секунд мехлу хизнью 
и смертью. джо торопился, нервни- 
чал и это чуть его не подвело. Но 
он сумел взять себя в рукии 
справился с этой залачей. Прибор- 
чик замолк. Джо обернулся. Стари- 
чок, улыбаясь, стоял сзади и хит- 
Ро подмигивал. 

- Я вас узнал, джо Блэйд. 
должен сегодня победить! 

Потом он приложил палец к гу- 
бам и, надвинув на глаза мляпу, 
отправился своей ДОРОГОЙ на голо- 
сование. 

Джо от радости лико подпрыгнул 
и одним ударом свалил в сточную 
канаву сразу двух панков. 

Теперь всё прояснилось: Джо не 
сомневался, что люди Кракса. Блад- 
Фингера какин-то образом сумели 
подбросить всем шестнадцати засе- 
дателям электронные гипнотизато- 
РЫ. 

Кракс хотел полной победы и, 
вполне. вероятно, ‘что даже те, кто 
был настроен к нему лояльно, не 
избежали этой участи. 

гипнотизатор' сильная штука. и, 
чтобы не убить человека резким 
вторжением в его мозг, на улицы 
города, 
таты, подбросили таймеры, которые 
подлерхивали десятининутный шадя- 
ший рехин работы гипнотизатора. 
По прошествии этого срока процесс 
становился необратиным и человек 
ухе не смог бы избавиться от на- 
вахдения. 

джо нчался по улице, сбивая на 
своем пути всех хулиганов и. нар- 
команов, Он засек время и видел, 
что оставалось шесть Минут до 
окончательного перехода заседате- 
лей думы на сторону Кракса. Яесть 
минут - если только он не найдет 


оправдались. 


ИЭр 


10 которым пойдут депу- 


тайнер. Как назло двери всех ‘пе- 
реходов между улицами были запер- 
ты. Джо стал подозревать и в этом 
кракса. отмычки кончались со ско- 
ростьр света и джо понял, что та- 
кое дело нельзя пускать на само- 
тек, На одной из улиц с огромным 
отврашениен он перевернул нусор- 
ный бак в надежде найти хотя бы 
кусок пронолоки. К сожалению, 
ничего подобного он не обнаружил. 

Он пересек еше несколько упиц 
и увидел таймер. Прибор сразу 
бросился в глаза. джо подбежал и, 
уже готовый сбросить его на преж- 
нее время, заметил заседателя 
ГоРОцСКОЙ ДУМЫ. ТОТ неспеша про- 
Ходил. МИНО. 

Сколько всего таймеров подбро- 
шено на улицы города? джо не на- 
ходил ответа на этот вопрос. Но- 
жет быть по одному на каждого за- 
седателя, а может быть всего два. 
И ПОЭТОМУ он не стал рисковать. 
Оставив на время таймер, Джо под- 
крался к заседателю и, не говоря 
ни слова, принялся его обыски- 
вать. Прибор он нашел быстро и 
ситуация повторилась. Не обрашая 
внянания на возмущенные крики го- 
рожанина, Джо занимался кодом, 
Надо сказать. что здесь код  ока- 
зался сложнее и Джо изрядно попо- 
тел. прехде чен решил эту задач- 
КУ. 

Очнувшись от чар электронного 
гипноза, заседатель любезно рас- 
кланиася с Блэйдом и заверил его 
в своей преданности мэру. 

Тейерь настало ‘вреня сбросить 
таймер и отсрочить развязку еще 
на десять минут. Но Джо не рас- 
спаблялся, Все улицы, прилегающие 
к зданию НэрРИи, ‘необходимо быпо 
тпательно контролировать, чтобы 
ие пропустить ни одного заседате- 
пя, а съой отмычки джо почти из- 
раскодовал, Опрокинув пять мусор- 
ных баков, Дхо пополнил исполь- 
зованные запасы десятью ключами. 

Время шло. И; по мере того, 
как Джо встречал все новых и но- 
вых членов городской думы, его 
действия приобретали почти авто- 
матический характер:  внезанное 
нападение, гипнотизатор, установ- 
ка кода, вежливое протание, . . 

Позже, вспоминая эти сумасшед- 


. №ие минуты, он уйыбался своей ны- 


сли © тон, что с0 стороны его 
поведение могло показаться стран- 
нын. Это он был загипнотизивован, 
ибо дейстнивал как робот... 

Джо Блэйд вздохнул свободно 
только. тогда, когда шестнадцатый 
человек ушел на голосование, гля- 
дя на мир не` через пленку, наки- 
НУТУЮ Краксом Бладфингером, а 
своими глазами. 

* и х 


Из протокола 29 экстренного 
заседания думы в расширенном сос- 
таве: ? 

... считать нецелесообразном 
введение ‘чрезвычайного полохения. 
С учетом принятого решения по 
Этому вопросу, передать все пой- 
номочия на время, необходиное для 
наведения порядка, мэру горо- 
па..." | у 
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ТНЕ СААК 


"Кориолис" 


представ- 
воздвиг- 
нутый на шести панелях и заполня- 
ющий образованное таким образом 
обширное замкнутое пространство. 
На противоположных панелях распо- 
ложены два крупнейшик центра - 
Саут Сити и Норт Сити. огни, све- 
ркающие в ночи над головой жителя 
Саут Сити - это ничто иное, как 


корабль аккуратно 
скользнул между громадами прибы- 
вающих и отходящих кораблей. В 
восторженном настроении Алекс на- 
блюдал, как из серой дымки над 
ним проступали массивы Городских 
строений Саут Сити. Слева от него 


как раз напротив входа на станцию 


имел специально сконструированный 
ландтафт с озерани, реками и пар- 
ками. Здесь были даже склоны для 
покрытые 


“Ненезида” под ним преврати- 
лась сначала в бесформенную тен- 
ную колючку, а потом и совсем ис- 
чезла из виду, растворившись на 
Фоне посадочной платформы, а над 
ним, словно гигантские сталакти- 
ты, нависли городские массивы са- 
ут Сити. 

Кораблик развернулся и после 
нгновенной потери ориентации все 
опять стало на свое место. дома 
оказались внизу, а "Немезида" 
стала едва заметной точкой в тем- 
ном небе. Такси мягко опустилось 
на уровень городских улиц нежду 
двумя монолитными сооружениями. 
Вокруг сверкали разноцветные огни 
что тонкий слой ат- 
покрывавшей Город, сан 
туманно мерцал вместе с этими 
огнями. 

Улицы ночного города были за- 
пружены толпами народа и Алекс 
быстро понял, что на этой станции 
Саут Сити был своеобразным ззач- 
ным местом. Здесь, по-видимону, 
процветала торговля всевозможным 
запрешенным товаром - рабани, 
роботани, наркотиками,  сенсости- 
мУлЯяторами и заморохженныки орга- 
нани. Инопланетники медленно и 
юсторожно продвигались по улицам; 
многие из них были одеты почти в 
полный космический костюн, что 
само по себе указывало на небезо- 
пасность окружения. Здесь и там 
Ггроноздились рекламные объявле- 
ния, обешавшие все ныслиные и не- 


мыслимые, в большинстве своем за- 
прешенные удовольствия. Высоко в 
небе, среди рекламных кораблей 
парили несколько полицейских ка- 
теров. Улицы города были заполне- 
ны толпани, суетой и грязью. 
Темный куб Конплекса Магеллана 
расположился среди этого каоса, 
как огромный монстр. Никаких окон 
снаружи не просматривалось. здесь 
и там по стенам скользили нарух- 


ные лифты. При виде их недленно 
перемешающихся зеленых огоньков, 
казалось, что это сооружение - 
живое. 


Алекс прибыл сюда 6ез оружия и 


уже начал об этом жалеть. Практи- 
чески все, кого он видел, были 
вооружены, несмотря на’ то, что 


ношение оружия в пределах орби- 
тальных станций было запрешено. 
Он аккуратно пробирался сквозь 
толпу рептилиоидов,  анфибиоидов, 
вооруженных инсектоидов, гротеск- 
НЫХ робо-танков, похожих то на 
гигантских моллюсков, то на чер- 
вей. 

Он вошел в здание и здесь ему 
остро ударил в нос отвратительный 
запах, объединивший в себе выде- 
ления тысяч различных хивых Форм. 
Бывают, правда, случаи, когда су- 
щества, питающиеся жидким нета- 


ном, потеют эФирами с запахом 
сирени, но увы так бывает’ далеко 
не всегда. 


Частный торговый центр пред- 
ставлял собой огромный зал, во- 
КРУГ КОТОРОГО расположились кон- 
ТОРЫ и склады. В этом зале, за- 
пруженном толпой, продавались как 
правила такие товары, которые 
выставить на открытом рынке было 
бы слишком рискованно или вслед- 
ствие своей изошренной специфики 
они все равно не нашли бы там по- 
купателя. Во всяком случае, тор- 
говые корабли, загружавшие свой 
товар здесь, немедленно регистри- 
ровались официальными службами и 
более жесткий таноженный нонито- 
ринг экспортной службы перед от- 
летом ин был обеспечен. Более то- 
го, многим из них был уготован 
гораздо более плотный контакт со 
спецслужбани в порту назначения, 
чен им котелось бы. 

Алекс внимательно пригляделся 
к стенам в поисках вывески скла- 
дов Мак Греви. Наконец он отыскал 
ее и направился ко входу, когда 
ПУТЬ ему преградили два высоких и 
довольно решительно выглядевших 
инсектоида. Их тела были покрыты 
светло серым панцирен, а Фасеточ- 
ные глаза ненигая следили за Але- 
ксом. Они о чем-то совешались, 
пошелкивая и потрескивая в свое- 
образной нанере общения. Алекс 
шагнул в сторону, сердие бешено 
забилось и кровь хлынула к голове 
ИЕ Фасеточные глаза, шарнир- 
ные конечности, антенны на голо- 
ве, двухрядные челюсти... ^- Тар- 
гоиды! - эта мысль нгновенно ро- 
дилась в его голове, - Таргоиды, 
здесь на космической станции? !". 

Таргоиды были смертельно опас- 
ны. У пилотов их кораблей ‘удаля- 
лись железы, вырабатывающие ве- 
шества, которые вызывают чувство 
страха. Это совершенно бесстраш- 
ные и безжалостные противники. 
Абсолютно негунаноидные, они были 


самыми злобными и непримириныни| 
врагами людей в известном косно- 
се. Награда за уничтожение тарго-| 
ида была огронной, но еше выше 
объявленная прения тому, кто до-| 
ставит в исследовательский центр| 
образцы Форм детенышей таргоидов 
- тарглетов. \ 

Но что ногут делать таргоиды 
здесь, на космической станции? 
Оба чудовища продолжали беседу, 
холодно рассматривая Алекса. 
Алекс обратил внимание на придат- | 
ки пластины, закрывающей грудную! 
клетку, за которой таргоиды хра- 
нят свои ручные лазерные писто-| 
леты. 

- Назад, - зашептал голос 
на ужо и Алекс обернулся. 
Греви стоял рядом. Только сейчас! 
Алекс узнал о его невысоком росте| 
- он едва доставал ему по грудь. 

- Таргоиды. ., -  Прошептал 
Алекс. р 

- Ерунда, - сказал Мак Греви и| 
потянул Алекса в сторону. - Это! 
оресрианны и единственная их! 
опасность - в том, что они - очень 
похожи на таргоидов и их часто 
путают точно так же, как спутал 
их и ты. А таргоиды, кстати, их 
злейшие враги. В следующий раз! 
обрашай внимание на пластину, | 
закрывающую грудную клетку и на 
Форму четвертого сустава задней 
ноги, прежде чен делать поспешные| 
ВЫВОДЫ. \ | 

ллпекс с облегчением последовал! 
за Нак Греви, прочь от продолжав-| 
ших шептаться странных существ. 

Склад Нак Греви был небольшин, | 
до предела загроножденным и очень 
вонючин. Алекс прошел в тускло! 
освешенный коридор и почувствовал! 
ЯВНЫЙ ДИСКОМФОРТ, Когда Мак Греви 
закрыл входную дверь. В несколь-| 
ких больших и прозрачных клетках! 
шевелились и урчали странные соз-| 
дания, обеспокоенные неожиданным 
вторхениен. } 

Это то, что ты хотел мне пред- 
ложить? - низким голосом ПРОНОЛ- | 
вил Алекс. Нак Греви кашлянул. Он| 
подошел к одной из клеток и вклю- 
чил свет, более ярко высветивший! 
то, что находилось внутри. 

Алекс застыл. Создание  выгля- 
дело явно знакомым, но память 
отказывалась служить. У животного! 
был плотный панцирь. аккуратно! 
разделенный на ячейки. Из образо- | 
ванного панцирем костяного домика 
через регулярно расположенные от- 
верстия высовывались конечности. | 
Втянув конечности, сушество ока- 
залось полностью под зашитой сво-| 
ей оболочки. 

- Кто это? 

- Минурты, - ответил Нак Гре- 
ви. Если тебе они калутся 
мыми, так это потону, 
глядят точно так же, 
ные Древней Земли, Кажется, 
называли черепахами или что-то в| 
этом роде. У этих две головы, че- 
тыре ноги и еше две каких-то. вне- 
шних органеллы, которые неизвест- 
но для чего нужны. Их называют по| 
имени той планеты, откуда они ро- 
дон - Мимурт. Твоя задача - пере- 
везти их на Сираг. У сирагианцев 
особое отношение к мимуртам. | 

- Они их едят? - догадался 
Алекс. 


| 


| 


ад 


в 


= Они ин молятся, - дрижением 


Губ поправил его догадку нак 
Греви. у 

— Нолятся? 

Нак Греви кивнул. - Для жите- 
лей Сирага нимурты - это нечто 


| вроде живого воплошения их богов. 
|Слышал когда-нибудь о реинкарна- 
ции? Ну так вот, есть у них такой 
пособый бог Аватар, который воз- 
прождается в облике нимурта. Так 
| ЧТО МИМУРТЫ - ЭТО живые ФОРМЫ Их 
бога. 
древние представления легенд и 
ниФов Сирага об их боге. Конечно 
| же, минмурты Родом с ДРУГОЙ ПЛане- 


ни к их богам не имеют, 
но любая сирагская семья отдаст 
|ймаленькое состояние, 


Алекс почувствовал ‘интерес, а 
пуспокоенные создания опять начали 
|шевелиться. Из отверстий в корпу- 


И ку. 
| -А "маленькое состояние", это 
| сколько? 

- Каждый из них потянет на со- 
тню кредов, может чуть больше. 
Здесь ия двадцать восемь штук. 
Двадцать восень сотен. Этого тебе 


- А почему ты не хочешь доста- 
|вить их сам? 
| - С моим-то криминальным спи- 
ском? Нет уж, благодарю покорно, 
но, я не желаю выходить в коснос. 
у меня теперь другой бизнес. обы- 


как сейчас, и 
обычно к этому времени РейфФ зет- 
тер присылает ко мне торговца, 
нуждающегося вроде тебя в быстром 
| заработке для какого-то дела. 

Алекс поинал себя на том, что 
спокойно и без прежнего отвраше- 
ния смотрел пряно в изуродованное 
|й лицо. Он больше не обращал внима- 
ния на пульсацию чужеродной жизни 
под тонкой кожей человека. он 
чувствовал, что, должен верить 
|й этому знакомому РейФа, ему даже 
хотелось верить и все-таки он не 
мог. 

- Сделай нне такое предложе- 
'ние, чтобы я не сног отказаться, 
- Продолжил Нак Греви, и Алекс с 
огорчением. вернулся к обыденной 
| прозе жизни. 

- Три сотни, - сказал он, 
| Нак Греви прокашлялся и пока- 
чал головой. - Нет, парень, ты 
ине понял. Идея вовсв не в тон, 
|чтоб обобрать тебя. Наоборот, 
именно ты должен иметь с этого 
дела основной доход. Откуда ты 
его возьмешь, если будешь давать 
мне за голову в ТРИ раза больше, 
чен получишь сам? 

- Я имел ввиду... 
за всех. 

на секунду Мак Греви застыл, 
пуставясь на нолодого человека - 
|”Это что, шутка?“ 

- Нет, не шутка. У меня всего 
Плишь триста кредов. Я не тот че- 
ловек, который Вам нужен, мистер 
|Мак Греви. | у 
| - да ты же только что продал 
|ГрУз шанаскилского меха? 


ТРИ СОТНИ 


НимУрТЫ Очень похожи на’ 


- Да, и купил вооружение и 
оборудование. К тому же; закупал 
я эти меха с потерей. В общем, я 
Вам говорю, ` что я не торговеш, а 
боец. - Алекс еше раз взглянул на 
НИНУРТОВ И пРОИЗНес - я беру 
восень штук. Договорились? 

- Я продаю все или ничего и 
ние нужно за них пятнадцать со- 
тен. РейфФ Зеттер говорил, что... 

- Значит, он был неправ. Поиши 
себе другого сопляка. 

Алекс развернудся, собираясь 
уходить и со злорадным удовольст- 
вием услышал нотки паники в голо- 
се Мак греви. 

- Я берег их для Рейфа. где я 
найду еше кого-то. кто будет тор- 
говать мимуртани? 

- За три сотни я возьму десять 
штук. Чем больше ты будешь ду- 
натъ, тем меньше я дам: 

Торговля начинала 
Алексу. 

- Но я должен отправить на си- 
раг иненно всю партию. 

Интересно, где этот Сираг, ® 
подумал Алекс. это название не 
вызывало в его голове никаких 
ассоциации. 

- Тогда тебе придется доверять 
мне так хе, как ты доверял РейФу. 
Я даю триста кредов авансом и по- 
тон еше треть того, что получу за 
них на Сираге. Расплачусь, когда 
вернусь. 

нак греви молча разглядывал 
юношу. - Треть вряд ли покроет 
ной раскоды. Пятьдесят. процентов. 

- Сорок процентов, - сказал 
Алекс. - Это последнее предлохе- 
ние. 

МИНУРТЫ ОПЯТЬ сосредоточенно 
завозились в клетках. Мак Греви 
огорченно пожал плечами и кивнул. 
Он тут же вызвал по видеоканалан 
двух свидетелей и в их присутст- 
вии контракт был подписан. 

дело обещало’ быть выгодным 
для Алекса, если. религиозные Фа- 
натики этого сирага раскупят всех 
НИМУРТОВ. Но где же этот Сираг, 
черт побери?.. Да, теперь “Неме- 
зида" будет вооружена ЛУЧШИМИ 
лазерами, снабжена дополнительны- 
ни энергетическими отсекани и 
энергетической бомбои. Вот когда 
начнется настоящая охота! 

Алекс вернулся на корабль с 
докладом о результатах торговли. 


нравиться 


ГЛАВА Т. 


Теперь они были на нуле. и, 
надо сказать, сами играючи залез- 
ли в такую петлю. оставалось то- 
лько найти Сираг и двигать к 
нему. Алекс проверил официальный 
планетный регистр, но Сираг тан 
не значился. Так вот почему наз- 
вание казалось ену незнакомым! 
Вообще-то невключение в оФипи- 
альный регистр еше ничего не зна- 
чило. Туда включались только оби- 
таемые планеты. Существовали нил- 
лионы планет, интересные только 
для шахтеров, охотников и добыт- 
чиков Руд, которые упоминались 


‘только в галактическом справочни- 


ке. Но ведь Сираг совсен иное де- 
ло. Это планета с разумной хиз- 
нью! Г 

Это означало только одно. 
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‚ Попробуем толкнуть эти окаменелые 


‚бакак оставалось горючего на пры- 


Зна-. 


чит, Сираг был независимым миром 
и не признал Федерацию. Стало 
это было очень опасное и, 
мохет быть, даже смертельно опас- 
ное место для посешения. Скорее 
всего, это рай для пиратов, 


мастей. По-видимому, это систе- 
ма, в которой сперва стреляют, а 
потом разговаривают. 

- Мы, кажется рекнулись... - 
сказала Элиссия. 

Алекс не возражал. - Слушай, а 
может ‘быть Сираг - это и есть 
Ракксла? Может быть, его имел в 
виду мой отец перед смертью? 

- Не может быть. Сираг - это 
Сираг, а Ракксла, если она вообще 
существует, находится где-то в 
другой галактике. Ты ведь знаешь 
легенды. Судя по всему, Сираг - 
это чертова дыра. Верни этому 
парню, его минуртов и давай лучше 


кости. . 

Но Алекс отказался. Он чувст- 
вовал, что вокруг него что-то 
происходит. То, как его "“направ- 
ляли” и как им нанипулировали, 
развило в нен непонятную тягу к 
этому предприятию. В конце кон- 
цов, его ждали‹ впереди неналые 
деньги и ваконец-то появлялась 
вознохность закончить вооружение 
“Немезиды” и начать настоящую 
охоту, начать хизнь истителя. 

- В. общем, пан или пропал? 
Так? и, как говорит рейф, если! 
нас ждет неудача, то нас не 6У- 
дет, чтобы. ее переживать. 

- Мы, наверное, сошли с умна... 
- опять повторила Элиссия, 

- По крайней мере, будет нан 
наука, как общаться с незнакомыми 
людьни. 

« * „ 


Перед нини парил Сираг, пас- 
тельно хелтая планета с темныни 
пятнани то ли гор, то ли пустынь, 
рисунок Которых напомнил Алексу о 
костях. девятнадцать световых лет 
от Ксезавра "Немезида” покрыла с 
двумя дозаправками и сейчас в ее 


хок в два световых года, а бли- 


никани ин достаточно пройти над 
солнечной короной и горючего 6у- 
дет достаточно. 

Солнце Сирага было большюй 
хелтой звездой, достаточно ста 


сидевшая у навигаци- 
онной консоли, развернулась к 
звезде, два мошных протуберанца 
вспыхнули на ее поверхности и 
устренились в космос. Эти ворон- 
кообразные викри очень красиво 
снотрелись через поляризованные 
Фильтры "Ненезиды”. 

- - Давай немного подзаправиися, 
- сказала Элиссия и дала полное 
ускорение, но лететь им привлось 
не более нинуты. 

- Святая Звездная Натерь! 
Алекс бросия взгляд на экран 
сканера, и почувствовал, как же- 
лудок выворачивается наизнанку. 
Яркие метки на экране были столь 
велики, что они могли принадле- 


жать либо крейсерам класса "Боа", 
либо “Анаконде”. Четыре ярких 
точки, расположенные в боевом 
СТРОЮ и РОЙ СОПРОВОЖДАЮЩИХ ИСтре- 
бителей не оставляли сомнения о 
намерениях их экипахей. 

- “Боа", - сказада Элиссия. - 
Ведут себя. как боевые креисеры. 
Хорошо хоть они медленные. Дер- 
жись... 

Алекс вцепился в кресло. Хоро- 
шо, что он был пристегнут. Все- 
ленная вздругнула, а внутренние 
юрганы сделали сальто.  Элиссия 
исполнила лихую петлю и строй ис- 
требителей, а это были ”Мамбы", 
распался и начал расходиться ве- 
еромн. Это означало погоню. Но 
Элиссия не останавливаясь сделала 
еше один вирах и обманула пресле- 
дователей, перейдя в добовую ата- 
КУ. я 
Спокойно и аккуратно она под- 
вырнула под брюхо ведущего кораб- 
ля. Казалось, что это было сдела- 
но с удовольствием. Противлик 
открыл огонь с нижней полуплос- 
кости и “Кобра” развернулась во- 
Круг оси, приведя к бою бортовые 
лазеры. Они как раз пролетали 
под брюхом ОГРОМНОГО крейсера. 

- Опознавательные зваки везна- 
комы, - сказал ллекс. Это быяи 
черно-зеленые Флаги с изобрахжени- 
ем яркой солнечной вспышки и не- 
земными иероглифами по бокам. 

- Зато их намерения очень зва- 
комы, - вздохнула Элиссия. к это- 
му времени две преследующие “Ман- 
бы" завершили маневр оквата и 
приблихались сзалм, Вспыюки огня 
лазеров прорезали черное  про- 
странство вокруг яркого солнечно- 
го диска. Более крупные корабли к 
этому времени уже тоже разверну- 
лись`и угрохающе приближались. И 
Алекс и Элиссия прекрасно понима- 
ди, что теперь им не дойти во 
звезды на дозаправку. 

Заиссия развернула корабль. Во 
время разворота она нацелила и 
выпустила первую ракету. Ближай- 
ний истребитель мгновенно исчез в 
облаке сверкающей пыли. Несколько 
зарядов, принятых лобовым зкра- 
ном, заставили их корабль дрог- 
нУТЬ, но два коротких нажатия 
ловкими пальцами на кнопку борто- 
вого лазера остансвили второй ис- 
требитель и о=  закувыркался. 
Элиссия приблизилась для послед- 
него удара... р 

Убит!. . 

из темноты вышел “Боа”. он 
медленно вращался и лучи лазера 
играли у носовой надстройки ги- 
гантского корабля, Элиссия наце- 
щила еще одну ракету, По ее лицу 
текли крупные капли пота. пальцы 
побелели от напряжения. Алекс, 
чувствуя свою бесполезность, си- 
дел, напряженно вцепившись в кре- 
сло, всем тедом повторяя маневры 
Элиссии. ] 

*Боа“ уничтохил ‘ракету, едва 
юна прошла десятую часть дистан- 
ции. Но "Немезида" вновь скольз- 
нула под брюхо огромного корабля 
м,  развернувщись бокон, и уРОВНЯВ 
Скорости, начала разносить чувст- 
вительные участки гиганта огнем 
йз бортового лазера. 

Но наконец ‘то, 
поздно должно было 


что рано или 


СЛУЧИТЬСЯ, ° 


произошло. Страшный удар в кормо- 
вую часть потряс их корабль. "Не- 
незида" задрожала и начала быст- 
Рое беспорядочное врашение. Алекс 
выругадся, почувствовав, как в 
тело впились пристяжные ренни. 
Неожиданный удар чуть не оторвал 
ему голову. С трудом он выпрямил- 
ся, пытаясь разобраться в ситуа- 
ции. Сзади приблихались две ”Нан- 
бы", а неподалеку парила гигантс- 
кая “Анаконда”, готовая их погло- 
тить. 

- Мы еше посмотрим кто кого, 
Громко сказал Алекс и обернулся к 
Элиссии, недоуневая почену она не 
маневрирует. 

Она обмякла в своем кресле. С 
головы и носа текла кровь. Она, 
по-видимому, была слабо пристег- 
нута, когда удар потряс “Кобру" и 
разбила голову о приборную -кон- 
соль. 

РЫывком Алекс покинул кресло 
второго пилота, освободил Элиссию 
и буквально бросил ее на пол, 
Сейчас было не до вежливости. он 
КРУТО ИЗОГУЛ траекторию корабля и 
всадил заряд в распахнутый грузо- 
вой отсек “Анаконды”. Увернувшись 
от огня лазера, он тут же увер- 
нулся и от ракеты, сбивать кото-” 
рую уже не было времени. На нгно- 
вение диск планеты проскочил пе- 
Ред ним и Алекс развил полную 
СКОРОСТЬ, ПЫТАаясь УитИи ОТ  снер- 
тельной опасности. 

Во время этой отчаянной попыт- 
ки оторваться от врагов неприят- 
ная мысль поразила его. "А где 
гарантия, что на этой планете 
станция будет его защищать, если 
он окажется в ее зоне?” Такой га- 
рантии у него неё было, Вполне 
возможно, что и станция будет 
против него. Надо только дать им 
знать, какой груз он везет. Если 
они будут знать, что у него на 
борту груз их обомлаеных богов, 
они вышлют корабли и прогонят 
пиратов. 

Справа неизвестно откуда вы- 
нырнула “Намба". Он развернул 
"Немезиду” и встретил ее корновым 
лазером; сбросил скорость. опять 
развернул корабль и поразил про- 
тивника огнеи с правого борта, 
Корабль не взорвался, но закувыр- 
кался и вышел из строя. 

Ак, если бы он мог бросить 
Груз. ВЫКИНУТЬ В Космос контейне- 
РЫ с системой жизнеобеспечения 
НИМУРТОВ и, может быть, все пре- 
кратилось бы. они с Злиссией по- 
теряют на этом три сотни кредов, 
ну и чго? Они ведь в коше концов 
еше не “элита”. 

Новые залпы потрясли корабль. 
Это опять "Мамба". Алекс нацелил 
ракету, но запускать ее не стал, 
ОТКРЫВ ОГОНЬ бортового лазера. 

В ‘это вреня Элиссия начала 
приходить в сознание. она подня- 
лась на ноги и сквозь залитые 
КРОВЬЮ глаза наблюдала за битвой. 


Сираг был все ближе и блихе. ма- 
ленькая точка серебристого ‘света 
мигнула им навстречу, но не на- 


полнила Алекса радостью. 

- Слушай, в ЭТИЕ контейнерах 
должно быть не мимурты, тихо про- 
изнесла элиссия. | 

- Позже поговорим, - ответил 
Алекс, маневрируя и выходя из под 


огня более крупных кораблей про-| 
тивника. 

Элиссия покинула мостик. ‘ Спа- 
сая их хизни, она направилась в 
Грузовой Отсек... 

И вдруг внезапно атака прекра- 
тидась. Адекс чуть не подпрыгнул! 
от изумления. еше мгновение назад 
его кормовые экраны едва сдержи- 
вали огонь противника. Его борто-й 
вой лазер перегрелся от непрерыв- 
ного огня и вдруг... ничего. Тя-| 
желые массы пиратских кораблей! 
отошли назад. две легких “Ман- 
бы", внепившиеся в их хвост, вы-! 
пустили по последнему отчаянному 
заряду вдогонку и исчезли,  про-| 
мелькнув в солнечных лучах и 
растаяв в черноте пространства, | 

Алекс замедлил ход и проверил 
степень повреждений К счастью, 
ничего серьезного. ‘Они лишились 
двух ракет, низок энергетическийй 
уровень, зато груз не поврежден. | 
А Раз пираты прекратили преследо-| 
вание, значит Сираг будет заши- 
вать своих визитеров. 

На мостик вернулась Элиссия, в 
руках у которой была просвечиваю- 
шая камера. - "Слушай, эти вивот- 
ные выглядят как черепахи, ведут! 
себя как черепахи и от них воняет 
как от черепах, но я сделала пару 
просвечиваютих снинков, чтобы по- 
смотреть нет ли там еше чего-ни- 
будь. | 

- Отличная идея. 
РИН. 

- Сейчас, еше две-три нинуты. 

Она поставила канеру, присела! 
в кресло второго пилота и взгля-| 
нула на Алекса. - Ты в порядке? 

Алекс кивнул. - А ты? 

- Чувствую себя чертовски раз-| 
битой. Ны в безопасной зоне? 

- Вроде да. й 

Перед ними неспешно врашалась 
станция "Кориолис", ярко освешен-| 
ная солнцен. Она отбрасывала пят- 
на серозеленой ‘тени на поверх- 
ность своей планеты. Неподалеку! 
парили несколько пришвартованных! 
к буям кораблей. 
достаточно безнятелно. | 
вспыхнули огни. Вскоре все вокруг! 
приветливо засверкало. | 

Алекс грациозно пролетел! 
сквозь орбитальный город паряших 
судов и приблизился к точке вхо-| 
да. 

но входа не 
черт? | 

Он сидел неподвижно. Корабль 
врашался, уровняв. скорость своей 
ротации со станцией, но вместо 
входа перед ними серел неталл. 
Увеличив разрешение приборов, 
л^лекс все-таки сумел различить 
признаки входного отверстия. но 
оно было плотно закрыто. 


| 
| 


давай посмот- 1 


было!.. - Что за| 


- Может, они опасаются чуже- 
странпев? \ пожала плечами 
Элиссия. 


- Но нам очень нужно топливо, 
Ну нельзя хе нас опасаться до 
такой степени. в 

- Наконец, раздался треск в 
устройстве гронкоговоряшей связи; 1 
“назовитесь! Назовитесь! Говорит 
орбитальная станция планеты Си-| 
раг. * 

- "Немезида", торговый корабль! 
класса "Кобра", - сообщил Алекс. 
- Мы несем груз мимуртов. Просим 


= = — 
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на некоторое время последовала 
| тишина, хотя потрескивание в ка- 
нале свидетельствовало о том, что 
связь не прервана. И затем: 

- Внимание "Немезида"! Торгов- 
ля минуртами на станции запреше- 
|на: 

- Что? 

- Избавьтесь от груза перед 
| входом на станцию. Бросьте груз. 
Вы получите компенсацию. 

| Алекс взглянул на Элиссию. - 
Что же нан теперь делать? 

= Мне кажется, что все это 
Йвыглядит как-то непрофессиональ- 
Ино. Что-то здесь есть Фальшивое. 

| Она взяла в руки камеру и из- 
влекла оттуда обработанную плен- 
|ку. Внезанно она застыла, уста- 


|- Бог мои... - 


В это время начало 
открываться приемное 
„станции. два ярких 


постепенно 
отверстие 
прожектора 
отверстия, 
как два горяшик глаза. 

Алекс вгляделся в отпечатки и 


|Просветив тела живых НИМУРТОВ, 


Иных отростка протянулись от него 
{ВНУТРЬ ГОЛОВ МИНУРТа. 

- Что это? - прошентал Алекс. 

| - Это беда. Это детеныши тар- 
гоидов, 

Сердце Алекса учашенно заби- 
Значит, 


Он подставлен? нет, 
“подставка” - это слишком мягкое 
слово ‘для того, что с ним сделали 
|на ксезавре. Чего же теперь удив- 
пляться, что пираты накинулись на 
‘него столь отчаянно? 

" - За тарглетов дают неплохое 
вознаграждение. Военные — охотно 
принимают их для исследователь- 
‘ских целей. 

- Пираты вырашивают их и ис- 
ппользуют в качестве пилотов на 
своих истребителях, Мы привезли 
на Сираг будущих пилотов пират- 
|ских кораблей. Понятно, что они 
|на нас накинулись. Им нельзя ос- 
'тавлять свидетелеи. , 

|  Адекс уставился на станцию. На 
|какое-ть время слова Элиссии про- 
летели мимо и никак не отложидись 
ив его голове. Он задумался о пи- 
атаку которых они отбили. 
что все позади и раз 
пони находятся рядом со . станцией, 
|то бояться больше нечего, 
‘обвинения в торговле запрешенным 
‘товаром. Да, он думал, что они в 
безопасности. 

Два желтых глаза выскользнули 
Гиз Черной УТРОбы станции, а за 
пвини потянулось и само темное те- 


ло корабля. за ним вспыхнул свет 
и темная тень незнакомого судна 
упала на "Немезиду”. Змеиная 
тень. тень “Кобры”. 


Этот корабль он узнал бы где 


УГодНО. Прошли месяцы после 
встречи с ним, но не было ни 
одной ночи, когда бы мысль о нем 


не возврашалась к нему в ночных 
кошмарах, корабль, погУбИивший 
"Авалонию" медленно приближался и 
ни малейшего сомнения Алекс не 
испытывал. Не было сомнений иу 
Элиссии, 

она затаща дыхание и подалась 
вперед всен телом. = Отдай мне 
его. Пусти меня к приборам. 

— Сядь, - холодно ответил 
Алекс и Элиссия зло на его посмо- 
трела 

- У меня с ними большие счеты 


- Пилот этого корабля убил мо- 
его отца. ‘ 

- Они убили всю ною семью! ны 
бехали с Теорга и обратились к 
НИМ за помошью, мы просили немно- 
го припасов. Они захватили меня и 
сестру в качестве’ рабов, а ко- 
рабль ноего отца расстреляли. Мне 
Удалось бежать, а сестра погибла. 
Алекс, отдай мне этого ублюдка! 

- Сейчас уже поздно... 

Всшашка полыхнула со стороны 
“Кобры”, “Немезиду“  ТРЯхНУЛО. 
Алекс нацелил ракету и всадил 
мошный заряд из носового лазера в 
противника. хелтым цветком рассе- 
ялась энергия на защитных экранах 
"Кобры", 

Она ускорила’ свой ход, Алекс 
тоже прибавил скорость, но ‘завис 
над станцией и противником: 

“Мы не ножем сражаться с ней. 
У нас пока нет ни достаточого 
вооружения, ни средств зашиты. 
Пока еше нет! Что же делать?” - 
ПРОонОСидИиСЬ МЫСЛИ в его голове. 

На заднем экране Алекс видел 
КОНТУР мрачного УбИЙЦЫ, выПЛываю- 
шего из-за орбитальной станции, 
ВСПЫЕНУЯ сигнал приближающейся 
ракеты и Алекс задействовал сис- 
тему ЕСМ на ее подавление. Сделав 
это, 
корабля прошли встречными курса- 
ми, разрывая друг друга на части. 
два величественных металлических 
галеона, поливающих ДРУГ друга 
огнем. снова разворот и очередное 
сближение. 

пвахды они схватывались в та- 
кой дуэли, "Немезида" стонала под 
тяжестью лазерных ударов. Энерге- 
тические отсеки начали сдавать и 
вновь соннения захватили Алекса. 
Эта "Кобра" знает, кто перед ней 
и не даст ему уйти. Он тоже хочет 
ее смерти. Но ведь он еше не 
готов! Нет, еше нет! 

Так, несмотря на упреки Элис- 
сии, Алекс развернул корабль и 
направил его к звезде. “Кобра” 
начала преследование. Оба корабля 
наневрировали, сплетая в петли 
траектории полета. То тормозясь, 
то ускоряясь Алекс не упускал ни 
одной вознохности для стрельбы 
корновым лазером и это немного 
сдерживало напор пирата. Алекс 
сбил еше три выпушенных  против- 
ником ракеты. Хотелось дунать, 
что весь запас ракет пирата ис- 


он развернул корабль. оба‘ 


черпан, но Алекс не позволил себе 
расслабиться. Собственная ‘ракета 
оставалась нацеленной и готовой к 
пуску. Алекс медлил, сознавая, 
что ее, ядет быстрая и бессмыс- 
ленная кончина. 

Звезда придвинулась. Она сияла 


в своем огромном великолеции. 
Тенцература в кабине "Немезиды" 
начала постепенно повыматься, 
Сверхестественными чудовимани, 


порожденными расплавленныи океа- 
ном, всплывали вихряшиеся рукава 
раскаленной плазмы необъятных 
размеров. К одному из них напра- 
вил свой корабль Алекс, подгото- 
вив топливозаборное устройство. 
“Кобра“ сделала еше выстрел и 
вновь заскрежетали силовые экра- 
ны. Сражающиеся корабли начали 


погружение в раскаленную преис- 
подню. .. 

- Смотри, ОНО работает, - ска- 
зал Алекс. 


Стрелка датчика горючего по- 
ползла вверх, по мере ‘того. как 
топливозаборное устройство всасы- 
вало потоки сырой плазмы и кон- 
вертировало ее в Форму, необхоци- 
ную для работы гиперпространст- 
венных двигателей. *Нненезида" 
скользила по краю огненного океа- 
на. рукава выбросов солнечной ко- 
РОНЫ ДОСТИГали миллионов миль В 
длину и тысяч миль в поперечнике. 
Они свивадлись в огромные воронки, 
похохие на водовороты. В ‘центре 
‘такой воронки образовывается от- 
носительно спокойная, более бе- 
зопасная и менее раскаденная 05- 
ласть. 

Туда и направил корабль Алекс. 
Рубка наполнилась сверхестествен- 
ным сияниен. Солнце светило непе- 
реяосиным блеском и температура 
корабля начала катастрофически 
повышаться. Пламя заиграло на об- 
водах корпуса, застонали силовые 


экраны, 
- Только не долго, - сказала 
Элиссия. В конце концов и она на- 


чала понимать, что они еше не го- 
товы к последней битве с врагом. 
Сейчас им надо уйти отсюда и по- 
быстрее. До ближайшей звезды 
шесть световых лет, а у них топ- 
лива, судя по показаниям датчика 
- всего на четыре, Но стрелка 
продолжала подниматься. | р 

Выбрав спокойный участок в 
океане огня, корабль остановился. 
где-то в. яркон потоке слепяшей 
плазмы, окрухившей их,  продоллад|. 
свои поиски смертельный враг. По- 
видимому, здесь они были в 6езо- 
пасности - никакие электронные 
средства обнаружения не ^ 
работать. в потоке 
радиации, ‘излучаемой солнечной 
короной. Браг остался без глаз и 
без ушей, 

- Пять световых дет, заряд 
нормальный. Приготовься к старту; 
курс введен. .. 

- Готов. - ответил Алекс. он 
старался не думать о возможных 
последствиях такого дальнего не- 
КОИТРОЛИРУЕМОГО ГиПерпрыхка В 
первый момент ему пришла в голеву 
мысль попробовать перемещаться 
малыми скачками, но он решил это- 
го не делать - гипериривод мог не 
выдержать нногократных запусков. 
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Алекс развернул корабль и при- 
дал ему небольшое врашение, вни- 
мательно проснатривая окружающее 
пространство в поисках возможной 
опасности, 

- Пять точка пять 
лет, Бше одна нинута. 
шестьдесят секунд... 

- Всего тридцать секунд. , 
Корабль вибрировал всен корпу- 
сон. По лицу Алекса сбегали круп- 
ные капли пота. 

- ве двадцать секунд, Алекс и 
мы полетин. 

Едва различимое пятнышко ниг- 
выдавая 
пиратской "Кобры" 
Она находилась по 


световых 
Всего 


сплошного огня разделил 
их. Немезида” и убийца стояли 
друг ПРОТИВ друга, отделенные 
стеной солнечного пламени. 

- Ны готовы, - долохила Элис- 
сия. - Вперед, Алекс! Пошел! 
Алекс Райдер отрицательно трях- 
нУл Головой. - Нет, пока еше 
нет. . , 

- Алекс! 

Он ТРОНУЛ корабль вперед, в 
направлении огня. Нерцающее, еле 
различиное изображение на экране 
сканера тоже перенестилось. На- 
чалось сближение, 

Дикий крик вырвался из ГРУДИ 
Алекса, когда он дал максимальное 
ускорение кораблю, вложив всю 
возможную ношь в двигатели. Ко- 
рабль рванулся вперед навстречу 
стене огня и плазны. Исчезли все 


изображения на экранах, единст- 
венное, что видел Алекс перед 
собой - это лишо отца и ЯРКУЮ 


вспышку пламени, 
гибла "Авалония". 
Горечь, гнев и ненависть - 
только эти чувства он ошушал в 
это нгновенье. Он знал, 
у него есть ракета, уже нацелен- 
ная на вражескую “Кобру”, у него 
еше остается один последний отча- 
янный шанс. 
Корабли сближались. Теперь их 
разделяла только тонкая стена 
плазменного водоворота.  Плазиа 
играла на корпусе “Немезиды“ и 
силовые поля уже не выдерхивали 
напора. Дальше двигаться было 
нельзя. Глубле - нельзя... Опас- 
ность!.. И Алекс запустил ракету. 
крошечный снаряд нырнул в сол- 
нечное пламя, отыскивая свой путь 
к цели. Алекс не видел ракету на 
экране, не видела ее и пиратская 
”Кобра", пока не ‘стало слишком 
поздно. х 
В последний момент “Кобра” 
включила ЕСН. За вспышкой света 
последовала детонационная волна и 
еше через ` нгновенье ракета пре- 
вратилась в стремительно врашаю- 
шийся огненный клубок, вобравший 
в себя инерцию ракеты, силу взри- 
ва и потоки раскаленной солнечной 
плазны. Развивая скорость и мопь, 
этот клубок рванулся к врахескому 
кораблю и не было никакой силы 
зашитных экранов, способной оста- 
новить этот клубок солнечной 
энергии. Через мгновенье “Кобра“ 
купалась в потоках плазмы, захва- 
ченная вихрем протуберанца. Алекс 
не отрывал глаз от экранов и 
Вдруг... все кончидось. "Кобра" 


в которой по- 


была уничтожена. 
Сгинула навсегда, 
` Медленно развернувшись, “Неме- 
зида” легла на обратный курс. Ни- 
кто на ностике не проронил ни 
слова, но в ярких лучах стареюте- 
го светила блестели слезы на двух 
счастливых лицах. 


Она погибла. 


ГЛАВА 8. 


Галоизображение РейФа Зеттера 
дролало в боевой рубке корабля и 
гордо светилось. за ним на пе- 
реднем экране просматривался 
гостеприимный диск планеты Лейв. 
Остатки мимуртов с их драгоцен- 
ными паразитани к этому времени 
уже были перегружены на два 
*Эспа” военного Флота. Сунма 
окончательного вознаграждения, 
правда, еше не была согласована, 
но получалось не неньше, чем по 
сотне кредов за экземпляр. 

- Я знал, что ты сможешь это 
сделать, - сказал Рейф, счастливо 
пережевывая свою хвачку и лихо 
сплевывая ее в сторону. - Я был 
уверен настолько, что направил 
тебя на Сираг ненного раньше, чен 
ты окончательно подготовился, 

- Но мы могли погибнуть. от 
этой системы мурашки бегут. по 
коже. 

- Настояший боец, даже если он 
“Элита”, знает, когда надо отсту- 
пить и как надо отступать, Я гор- 
ЖуУсь тобой. Ты отстуиил... и по- 
бедил. 

В это вреня привло сообщение с 
“Кориолис-6” из штаб квартиры га- 
лактической полиции. 

"ОТ имени Гадактического Сод- 
рухества Ниров поздравляем Алекса 
Райдера и приносим благодарность 
за проявленное умение и нужество 
при уничтожении пиратских кораб- 
лей. Согласно представленному ра- 
ПОРТУ, подтвержденнону пленкой 
бортовой регистрационной У-систе- 
ны, присваиваем боевой ранг 
“Снертельный". Ваш правовой ста- 
тУС "В розыске" снимается. Новый 
боевой рейтинг "Снертельный" бу- 
дет введен в каналы Галактической 
сети в течение стандартного дня, 
Хелаем быть МУДРЫМ и СИЛЬНЫН В 
бою. * 

Вот так и случилось, что не 
достигнув и двадцати лет, Алекс 
оказался всего на шаг от. боевого 
класса, о которон большинство лю- 
дей даже и не мечтают. Он вошел в 
класс "Смертельных", ОН УНИЧТОЖИЛ 
"Кобру”, которая неизвестно за 
что убила его отца, Почему это 
было сделано, Алекс конечно не 
знал, а спросить у пилота-убийцы 
не подумал. Он предполагал, что 
это было ПРОСТО заказное убийст- 
во, за которое бандит получил 


вознаграждение. 

Внесто этого, он спросил зет- 
тера: - Ты знал, что этот корабль 
на Сираге? 

- Предполагал, Алекс. Вот по- 


чену мы послали тебя с ГРУЗОМ 
‘тарглетов. Ты знаешь, никто, аб- 
солютно никто не в состоянии ус- 
тоять перед искушением захватить 
такую добычу. Я знал, что ты `со- 
берешь всех пиратов в радиусе 
светового года, но я такхе знал 
и то, что ты с ними справишься. 
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. Алекс, 


’ тем, 


Более того, я был дахе уверен, 
что такая наживка привлечет и| 
эту “Кобру“. 

Ты бился отлично. Я вижу в те- 
бе те же инстинкты бойца, которые 
были и в Дкейсоне. И он был прав. | 
Ты именно тот чедовек, который| 
сножет пойти по его стопам. 

- Куда пойти по его стопам? 

Рейф кашлянул и покачал голо-| 
вой. - Знаешь, это сложный воп- 
рос. Твой отец искал следы миФи-| 
ческой Раккслы. Он котел узнать, 
существует ли она на саном деле? 
Если легенды не врут, то там дол- 
жна быть установка, 
инопланетным разумом, 
которой открываются проходы в 
другие Вседенные, ко всем ик сок- 
ровишам. 

Джейсон Райдер был уверен, 


лиги. Темного Колеса, 
дарных первопроходцев, 
колько лет он исчез ия не имел 
никаких сведений ни от него, ни о 
нем до самого последнего времени 
перед его гибельр. Тогда он рас- 
сказал нне, 
доказательства сушествования Рак- 
кслы. Он вернулся из глубин кос-| 
носа, чтобы сфорнировать команду. 
- РейФф горько ‘улыбнулся. - Но 
перед самым отлетом он взял нес-| 
колько дней для отдыха в спокой- 
ном несте вместе с сыном... 
его и встретил наенный убийца. 
- Но почену? Почему его убили 
из-за рРаккслы? | 
- Потону, 
давно люди. 


что на Ракксле уже| 
Правда, 


сделали с дхейсонон, она | 
от истины, Мы давно подозревали, | 
что корпус "Элиты" создал тан ба- 
ЗУ И ШИРОКО использует переход в! 
иные Вселенные. Это ногушествен- 
ные и решительные люди. У них до-| 
статочно средств, чтобы нанять! 
негодяя и уничтожить того, кто| 
несет УГРОЗУ их превосходству. | 

РейФ приблизился чуть вперед, 
его глаза сияли. 

- Я контролировал твои шаги, | 
а также и Элиссии. Тенное 
Колесо нуждается в вас. В обоих] 
вас. Но поверь нне, то, через что 
Вы ухе прошли - ничто по сравне- 


нию с тен. что Вас ждет в буду-| 
шем. Алекс, вы должны стать “Эли-| 
той". А это означает многие меся-| 


ны, а ножет быть и годы трениро-| 
вок И сражений, Но после этого 
Вселенная распахнется перед Вани! 
так, как Вы не можете себе даже! 
представить. 

Алекс стоял и глядел на стари-| 
ка в молчании и задумчивости. На- 
половину скрытая в тени, в угол-| 
ке стояла Элиссия. напуганная! 
что только что услышала. | 

- Ну как, твое горе утихло? -| 
спросил РейФ и Алекс. кивнул. Ста- 
РЫЙ Торговец УЛЫбНУлСЯя. 

- Скажи, что ть чувствуешь 
став богатым? 

-  Опустошенность, т 
рассмеялся. 

- да, ты подойдешь для Тенного| 
Колеса. Это точно! || 
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"ИНФОРКОМ" 
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Носква, Г-19, а/я 16 


СПЕКТРУМ 
В ШКОЛЕ 


дорогие друзья! Ван никогда в 
детстве не приходилось играть в 
игру "Холодно-Горячо"? это когда 
один играющий прячет в коннате 
акой-то предмет, а другой пыта- 
ется его отыскать по сообшениям 
типа “холодно!" - "Холодно" - 
"Теплее" -"Горячо" -"АФРИКА! ! !". 

Вполне серьезная игра для на- 
УЧНЫХ работников всех сплециаль- 
ностей, имеющих дело со сложными 
Далгебраическини уравненияни ис 
системами таких уравнений. Вы по- 
ка учитесь в школе, и Вам может 
быть рано решать проблемы числен- 
ных методов математической Физи- 
ки, но сыграть, в такую игру с 
компьютером Вы вполне можете. 

давайте вдунаенся, ведь в 
любом  алгебраическом уравнении 
“спрятан” его корень 
есть). Если вместо неизвестного Хх 
В уравнение подставить этот ко- 
то уравнение обратится в 
А если подставить не ко- 
|рень, а другое число? Тогда оно в 
ноль не обратится, а будет равно 
какону-то числу "4" и чем больше 
эта "невязка" 94, тем "холоднее" 
Ваш ответ. Вот так играя мы можем 
решать достаточно сложные уравне- 
ния. 
Возьмем простенькое уравнение: 
Е С 

И попробуем "угадать" его ре- 
шение. Подставим вместо х едини- 
У: 


9 = 5*1^3 - 3 - 10,625 = -68,125 
Пока "холодно", подставим х=2, 
3 = 40 - 6 -70, 625 = -36,625 


Это уже "теплее". 
перь х-=3. 

4=5=27 - 15 - 10,625. = 49, 315 

Надо же - опять "холодно", но 
обратите внимание на то, что наша 
“невязка” 4 изменила знак. Раньше 
она была отрицательной, а теперь 
стала положительной. Это говорит 
ю ‘том, что мы прРоСкочили МИиНо 
спрятанного корня и ушли не в ту 
СТОРОНУ. Надо вернуться назад и 
искать более Тшательно. Пойдем от 


Проверим те- 


(«если он: 


числа х-2 более аккуратно. Вместо 
шагов по единице будем шагать 
по 0.1. 


Проверим х-г.1, х- в.в и так 


далее, пока не дойдем до х=2: 5. 
Вот это и будет "АФРИКА" - точное 
решение, при котором "невязка“ 
равна нулю. 


К сожалению, точное решение 
возможно только для таких простых 
уравнений, как наше. А что де- 
лать, если уравнение посложнее? 
Например: 

2Х^0. 8 - 1 (3х) -1.Т1Т=0 

Оно не имеет точного решения, 
да ведь оно нам и не нужно! Да- 
вайте зададин величину "Ь", кото- 
рая является предельно допустимой 
"невязкой". И будем бегать, под- 
ставляя Х, взад-вперед, уменьшая 
шаг в десять раз после каждого 
изменения знака “невязки" до тех 
пор, пока она не окажется меньше 
ранее заданного числа “Ь". 

Как видите, все очень просто. 
конечно, с карандашон на бумаге 
двадцать раз вычислять одно и то 
хе выражение занятие не из прият- 
ных, ну а для чего нам компьютер? 
он сан и подставит значение “"х" и 
подсчитает невязку "4" и сравнит 
ее с предельной величиной “"Ь” и, 
если предел не достигнут. изненит 
х, снова все посчитает, проверит 
знак “невязки” и т.д. Этот прием 
очень просто алгоритмизируется. 


10 ТНРОТ х: КЕМ Начальное значе- 
ние х Вы должны задать сани. 
20 1НРОТ Ь: ВЕН Предельное значе- 
ние "невязки”. Чем оно меньше, 
тен точнее Ваш расчет, но тем 
больше времени он потребует. 

30 1НРОИТ а: КЕМ Это начальное 
значение шага по "х”. далее 
компьютер будет рассчитывать 
его сам. 

40 СО 50В 500: ВЕН Расчет "не- 
вязки". 

50 ТР АВЗ а<Ь ТНЕН СО ТО 800 

50 БЕТ ю=а 

ТО ГЕТ х-я+а 

80 СО 598 500 

90 ТЕ АВЗ 4<Ь ТНЕН СО ТО 800 

100 1Р 561 4 <> 5СН ш ТНЕН 60 ТО 
600 

110 ТР АВ$ @& > АВ$ ш ТНЕН 60 ТО 
700 

120 СО ТО 60 


Вниманию читателей! 

Мы продолжаем публиковать ад- 
реса пунктов, В Которых . НОЖНО 
приобрести наши материалы: 


г. Воронех. Студия компьютер- 
НЫХ ИГР бАН-бАН. нагазин-салон 
Тел. 

г. Днепропетровск, ул. 
ко, 34. Фирна “ЭКОС”. 

610014, г. Киров, УЛ. ПРОИЗВОД- 
ственная, д. ет, "дом науки. и 
техники”. Нагазин-салон "НАРС". 

г. Носква, Новый Арбат, д.2, 
19-ое отделение связи, 1-ый этах 
операционного залпа. Ежедневно, 
кроме выходных, с 10 до 17 часов. 
Перерыв с 14.00 до 15. 00. 

г. Нижний Човгород, Ул. Горь- 
кого, 146. Наг. "ФОТОЛЮБИТЕЛЬ". 
ИНА “Ф-ПЛЮС". Тел. 35-07-18, 


Вниманию дистрибуторов! 
Апреса наших оптовых покупате- 
лей публикуются бесплатно. 


500 ГЕТ 9:.......... И 
(Здесь надо записать Ваше 
уравнение) 

510 РЕТИТ *"х= "; к, "4= "; а, 

520 ВЕТОЕЯ 


600 КЕМ Если мы "проскочили" мимо 
корня, надо вернуться на 
шаг назад и уменьшить 
величину шага. 

610 ГЕТ х-х-а 

620 [ЕТ а-а/10 

630 60 то 10 


100 КЕН Если ”“невязка" после шага 
стала больше, чем была, 
значит ны пошли не в ту 
Сторону. Надо вернуться 
на шаг назад и изменить 
знак шага (идти В другую 
СТОРОНУ). 

710 1ЕТ х-х-а 

720 ЪЕТ а=-а 

730 со ТО То 


800 5ТОР 


Этим нетодон ученые пользуются: 
уже не одну сотню лет. Он называ- 
ется нетодом простой итерации. На 
его основе разработано еше очень 
иного других полезных методов, 
позволяющих решать очень большие 
системы самых слохных уравнений. 
Если Вы подумаете, то безусловно 
найдете пути, как улучшить этот 
нетод. Правда. к сожалению, ско- 
рее всего ножет оказаться, что 
Ваше улучшение уже было кем-то 
открыто несколько десятков лет 
назад и уже носит чье-то имя. на 
всякий случай, если что-то изо- 
бретете, то загляните в какой- 
нибудь матенатический справочник 
в раздел, посвяшенный численным 
нетодам. 


Желаем успеха! 
Ваш “"ИНФОРКОН" 


з3 


ЭПУСЬАТЕ 
ГоСо 


(Продолжение. 
начало см. на стр. 69 - 74) 


Команды "Черепашки”. 
}"Черепашка” в ЛЮГО имеет не- 
большую систену собственных 
команд. Рассмотрин эти команды, 


РЕБСЕ. 

Обычно, когда "черепашка" до- 
ходит до границы экрана, она но- 
жет продолхать свою работу, вихо- 


дя за него. При этом если она по- 
кинула экран справа, то/появляет- 
ся на экране слева. Если покинула 
экран сверху, то появляется, со- 
ответственно, СНИЗУ. действует 
эФфФект автонатического возврата, 
Это во многих случаях бывает удо- 
бным, но ‘не всегда. Если Вы хоти- 
те, чтобы Ваша “Черепашка” оста- 
навливалась дойдя до границ экра- 
на и не возвращалась, то можете 
дать команду РЕНСЕ. 


Утром. 

Команда РЕНСЕ отключит возврат 
“черепашки” с противоположной 
стороны. но не позволит ей поки- 
нУуть пределы экрана. Может быть, 
Вам нужен вариант, когда она мо- 
жет покидать экран в любом на- 


правлении без возврата. В этом 
случае используется команда 
МНО. Представьте себе, что 


Ваша “черепашка” ходит по огром- 
ному столу, а Вы снотрите сверху 
на этот стол через небольшое 
"окно” своего экрана Размером 
256*176. Покинув экран, “черепам- 
ка” продолжает движение в любом 
направлении. Она нохет ‘удалиться 
ют центра экрана на расстояние до 
затбт шагов. 


УВАР 

Этой командой отбивают дейст- 
вие включенных команд РЕНСЕ и 
\ТЕООМ и возврашают “черепашку” к 
норнальной работе "с возвратом”. 


РЕВУР. 

Обычно в своих перенешениях 
“черепашка” оставляет вычерчивае- 
ный на бунаге след. Это можно 
устранить, дав команду ‹‚ РЕНОР, 
Перо поднинается и “черепашка” 
мохет переместиться в новую точ- 
ку, не оставляя линию на бунаге. 


РЕНГОМН. 
команда на опускание пера, 
Черепашка” опять готова к рисо- 


аки ПРОРАнНИРОВАНИЯ] 
ванию. 

Если Вы вспомните, что ”чере- 
пашка” - это как бы наленький 
робот-манипулятор, установленный 
на колесной тележке и подключен- 
ный к компьютеру, то Ван все ста- 
нет ясно, С помошью электромагни- 
та по командан от компьртера ее 
пишуший узел (карандаш, Флонас- 
тер, шариковый стержень и т.п.) 
нохет подниматься или опускаться. 


РЕНЕКАЗЕ. 

“Черепашка” на нашен экране - 
вообрахаеная и потому она может 
делать немного больше разных ве- 
шей, Чем настоящий робот. Так, 
например, с помошью команды 
РЕНЕКАЗЕ можно дать задание на 


стирание всех линий, которые 
встретятся на ее пути. 

РЕНКЕУЕКБЕ - еше более хитрая 
команда. Для "черепашки" это ука- 


зание стирать все нарисованные 
линии на своен пути там, где они 
есть; а там, где их нет - наобо- 
рот рисовать. 


ЗЕТРС - эта команда расшифро- 
вываётся как ЗЕТ РЕН СО.ОВ - Ус- 
тановка цвета пера. Спектрум” 
работает с восемью цветани: 

0 - черный 
- синий 
- красный 
- ПУРПУРНЫЙ 
- зеленый 
голубой 
- желтый 
- белый $ 
мохете задать любой из 
восьми цветов в качестве цвета 
пера. напринер, команда 5ЕТРС 6 
установит в качестве текущего 
цвета желтый. Все новые линии 
будут изображаться желтым цветом. 
Более того, все то, что нарисо- 
вано в пределах одного звакоместа 
рядом с нарисованной пинией, тоже 
будет окрашено в желтый цвет. 

Для работы с цветом, ЛОГО име- 
ет ‘еше одну удобную процедуру. 
Это процедура РЕНСОГОЕ, С ее по- 
ношью ножно получить число, кото- 
рое соответствует номеру включен- 
ного в данный момент цвета. Таким 
образон, манипулируя с цветани, 
Вы можете. запомнить текумий цвет 
в какой-либо переменной и потом. 
когда надо, к нему вернуться: 


эзолват- 
Я р 


Очень ‘хорошей практикой при 
работе с цветои яваяется при 
входе в любую процедуру, в кото- 
рой изменяются цвета, 
текумие цвета в переменвых, потом 
делать то, что требуется, а перед 


зо 


запоминать. 


выходом из процедуры восстанавли- 
вать ранее запомненные цвета, 


ЗЕТВС - эта команда расшифро- 
вывается как 5ЕТ Васксгойта. она 
устанавливает цвет Фона экрана, 
Такин образом, она так же экива- 
лентна команде РАРЕВ БЕЙСИКА, как 
конанда 5ЕТРС эквивалентна конан- 
де тик. 

Процедура ВАСКСКОЧНР аналогич- 
на процедуре РЕНСОГОЕ и приненя- 
ется в тех же целях. С ее понотью 
можно определить текуший включен- 
ный в данный номент цвет Фона и 
запомнить его в какой-либо пере- 
ненной. 


ЗЕТВОРОЕВ 
Эта команда служит для пере- 
ключения цвета рамки экрана и 


эквивалентна команде БЕИСИКа 
ВОКПЕЮВ, 

В заключение этого раздела ны 
рассмотрим несколько примеров 


процедур. Вы можете развить эти 
примеры, дооснастив их нанипуля- 
циями с цветом. 


свирали, 
Без этого примера не обходится 
ни одна книга по ЛЮГО. не знаем, 
что уш в нем так понравилось ав- 
торам книг, наверное дело в том, 
что здесь используется рекурсия, 
о Начнем так же, как мы начинали 
ПРИ рисовании квадрата: 
РОКМАКО :512Е ЕТЕНТ 90 
Но теперь, чтобы получить э$- 
Фект спирали. нам надо увеличить 
размер стороны (5128) “квадрата” 
после одного витка и повторить 
все тоже саное несколько раз. 
ТО 5С0АВЕЗРТ :512Е 
РОЮМАЮО :517Е 
ЕТСНТ 90 
НАКЕ "5128 :517Е+5 
ЗОПАВЕЗРИЕ :512Е 
рекурсия здесь состоит в тон, 
что в описании процедуры 
ЗО0АКЕЗРТ есть вызов саной этой 
же пропедуры. При этом вызове 
компьютер обрашается к ее описа- 
нию и в нем "натыкается" опять же 
на ее вызов и так далее. В даннон 
случае эта спираль ногла бы рисо- 
ваться бесконечно, поскольку ни- 
какого разумного выхола из рекур- 
рентной последовательности нет. 
Ван же придется нажать ВВЕАК для 
того, чтобы прервать работу про- 
цедуры. 
спирали ив обязательно должны 
быть ПрянсУГолЬными. Вы можете 
изменить приведенную выше проце- 
дуру, задав поворот после каждого 
шага не на 90 грарусов, а на 


Рис. 1 


ЗОСАВЕЗРТ 10 


ЯЗЫКИ ПРОГРАММИРОВАНИЯ — 


Рис. 2. 
АБРТ 50 9 90 


столько. на сколько Ван нужно. 
Может быть, Ван нужно управлять и 
величиной прирашения. на которую 
увеличивается размер спирали 
после каждого витка. Это могло бы 
быть полезным в тех случаях, ког- 
да "черепашка" слишком быстро вы- 
ходит за пределы экрана. Так в 
итоге мы подучин процедуру для 
рисования спиралей с треня пара- 
метрами: 

517Е - размер начальной 
стороны; 

АНСГЕ - УГОЛ ПОВОРОТА; 

ТЕС - приращение стороны 
на каждом новом витке. 


ТО 5РЛВАЕ :517Е: АНСЬЕ: 1НС 
РОБМАЕЮ. :517Е 
ВТСНТ :АНСЬЕ 
НАКЕ “512Е :512Е + :14С 


ЗРТВАГ :З12Е :АНСЬЕ :1НС 
ЕН. 
Проверьте эту процедуру на 
конкретных примерах. — Наиболее 
интересные эффекты получаются, 
когда угол АНСШЕ почти (но не 
точно) равен углу правильного 
многоугольника. Испытайте, напри- 
мер, следующие примеры: 
ЗРЛВАГ, 10, 121, 5 
БР1КАГ 10, 119, 5 
ЗРТВАГ, 10, 135, 5 
Вы можете менять не только ли- 
нейный размер витков :517Е, но и 
Угол поворота спирали :АНСГЕ. 
ТО АЗРТ :$512Е: АНСЁЕ: ТНС 
РОЕМАЕЛ -: 517Е 
ВЕСНТ :АНСЬЕ 
НАКЕ “АНСЬЕ : АНСЬЕ + :1НС 
ЗРТИАЕ :512Е :АНСЬЕ : ИС 
ЕН 
Посмотрите, что получится для 
следующих вариантов: 
АЗРЯ 1005 
АЗРТ 10 40 30 
АЗРТ 102 20 
Один из примеров приведен на 
Рис. 2. 
Не менее интересным будет изо- 
бражение части спирали, а ‘затен 
повторение ее вновь из другой 
точки, в которой в данный номент 
времени находится “черепашка”. В 
этом случае вместо изменения зна-, 
чения 512Е (которое должно быть 


постоянным) мы делаем шаг РОЕМАЕО 
на переменную величину, которая 
Рассчитывается как произведение 
512Е на некоторое число соонт, 
изменяющееся от единицы до макси- 
нального значения НАХ. 
ТО ВЕЗРТ :512Е :АНСЬЕ :МАХ 
НАКЕ "СООТ 1 
ВЕРЕАТ :НАХ (РОКМАБО :$17Еи 
:Соинт 
ЕТЕНТ :АНСЬЕ 
НАКЕ “СОПТ 
:СООНТ + 11 
ВЕЗРТ :З17Е :АНСЬЕ :МАХ 
ЕН 
Один из возможных 
приведен на рис. 3: 


принеров 


Рис. 3 
ВЕЗРГ 10 120 5 


ннииикнизининиииниииикииикинихии 
ПРИМЕЧАНИЕ “ИНФОРКОНА”. 

Подобная технология имеет 
очень широкие возможности приме- 
нения в создании игровых  про- 
ГРамм. Аналогичными приемани, ос- 
нованными на рекурсии, в послед- 
нее время начали пользоваться для 
создания графических изображений 
квазирегулярной структуры. К нин 
в первую очередь относятся естес- 
твенные природные объекты: — лес, 
трава, облака, снежинки. ледники, 
контур береговой линии материка 
или острова, 
ка и многое-многое другое. Смысл 
состоит в том, чтобы не кранить в 
компьютере картинку с изобрахени- 
ем. например, облака, а всякий 
раз, когда надо его нарисовать, 


дым от горяшего тан-. 


вызывать для этого процедуру-ге- 
нератор облака (дыма, леса и 
тв. 

конечно, такие процедуры пишут 
не на ЛОГО, а на АССЕМБЛЕРе, но 
для "обкатки” алгоритма, прежце 
чен переносить его на "АССЕМБ- 
ЛЕР", ЛОГО очень удобен, ведь на- 
до подобрать и иссиедовать все 
паранетры. 

технология создания подобных 
объектов квазирегулярной структу- 
РЫ хоть И не сложна, но почему-то 
налоисследована -‘то пи у нногих 
до нее не дошли руки, то ли надо 
кто об этом знает, то ли инфорна- 
цию об этой технологии закрывают 
как ценное “ноу-хау“ 

Вы имеете уникальную вознох- 
ность провести подобные исследо- 
вания, используя ЛОГО в качестве 
удобного подручного инструнента. 
В исследованиях стоит стрениться 
К тону, чтобы Ваш объект (напри- 
нер дым) выглядел как можно более 
натурально. Он ножет быть дина- 
ничным, т.е, постоянно меняться и 
переливаться на экране. Вознохно 
задействование команд управления 
цветом. Стоит также стремиться к 
тому, чтобы алгоритн, положенный 
в основу генератора, был негко 
переносим на АССЕИБЛЕР. 

НЫ с радостью напечатаем ре- 
зультаты наиболее интересных ис- 
следований. Так что дерзайте, Вас 
ногут ждать потрясающие открытия. 
укиииикикиииниикииииими иниииниии 


Объекты. лого. 

ЕСЛИ Вы еше не запутались со 
всеми двоеточиями и кавычками, с 
которыми пришлось иметь дело в 
предыдуших разделах, то это очень 
ХОРОШО, Дело не в том, что трудно. 
разобраться, где что нужно ста- 
вить, просто это такой вопрос, 
который лучше ие объяснять, а де- 
нонстрирОовать на примере. Если хе 
сейчас что-то покажется не очень 
понятным, не пугайтесь, у Вас 
всегда будет возможность вернуть- 
ся к этому разделу, когда Вы 6У- 
дете сами писать свои процедуры. 

Итак, ЛОГО имеет дело с четы- 
РЬМЯ различными видами объектов: 

» Слова ны 


ы Числа 
* ` Процедуры 
* Списки ` 


О списках мы поговорим в сле- 
дующей главе. 

Что касается чисел, так офици- 
ально их тоже квалифицируют как 
“слова”, но поскольку они подчи- 
няются несколько иным правилан, 
мы их выделили в отдельный объ- 
ект. Числа состоят из десятирич- 
ных цифр от 0 до 9. Возможно ис- 
пользование знака “минус” В на- 
чале числа, а также использование |` 
десятичной точки. Числа, превыша- 
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ются в экспоненциальной Форме. 
Так, например, 2. 3Е+9 означает: 

2 300 000 000 
Запись Е+9 обозначает, что де- 
сятичную точку следует перенести 
а девять позиций вправо от Того 
места, в котором она показана в 
числе 2. 3. 
Точно так же для очень налых 
чисел величина экспоненты может 
быть отрицательной. Запись 1. 4Е-6 
Ююбозначает перенос десятичной то- 
|чки влево на шесть позиций. Полу- 
чин: 

0. 0000014 

При такой Форме записи ножно 
работать почти с любыми числани. 
ли Ваше число окажется больше, 
[чем 1Е+38 (а это крайне маловеро- 
Пятно), то тогда будет выдано со- 
общение об ошибке 
ь Нишьег 100 18 

Число слишком велико. 

Если же Ваше число окажется 
еньше, чем 1Е-38, то оно воспри- 
нимается‘ конпьютерон как ноль. 
Обычно ЛОГО считает, что вся- 
кое слово. которое встречается в 

гранме, является командой. ко- 

рУЮ следует исполнить, или име- 
ем` процедуры, которую следует 
разыскать в памяти, прежде чем 
исполнять или выдавать сообщение 
©б ошибке, если эта процедура не 
Разыскана. Поэтому, если Вы хоти- 
те; чтобы Ваше слово воспринима- 
юсь только как слово, а не как 
оманда и не как имя процедуры, 
Вам необходимо перед ни поставить 
кавычки, например: 

а: "РЕ 

Будьте‘ внимательны и следите 
‘тем, чтобы между кавычкани и 
|словон не образовалось случайного 
пробела. Дело в ‘том, что лого 
признает существование “пустого 
слова", в которон нет ни одного 
символа. В программе такое  “пус- 
‘тое слово" изображается кавычка- 
ни, за которыми следует пробел. 
Этот странный объект на самом де- 


ле не столь бесполезен, как нно- 
Гим нохет. показаться. Когда мы 
манипулируен со словани, обраба- 


тывая цо очереди букву за буквой, 
"пустое слово” является отличным 
индикаторон того места, где сле- 
[дует остановиться. 

Слово может быть иненем како- 
го-либо другого объекта. Ны с Ва- 
ми ухе расснатривали примеры, ко- 
гда слово являлось именем проце- 
дуры или именем числовой перемен- 
ной. Как Вы помните, последнее 
достигалось с помошью  конанды 
НАКЕ- 

| НАКЕ ”"НОЗ 15*40/100 

По этой команде будет рассчи- 
тано значение #05, равное 6. Мы 
можен сказать так, что "6" - это 
содержание того, что именуется 
словон Н05.. Для того, чтобы по 


ЯЗЫКИ ПРОГРАМНИРОВАНИЯ 
юшие 10 миллионов в ЛОГО печата- 


найти его СОДЕРЖАНИЕ служит 
команда ТНТНС. Например: 

РЕТНТ ТНТНС “Н05 

В результате получите число 6. 

Поскольку поиск СОДЕРЖАНИЯ пе- 
ременной по’ее ИМЕНИ очень и 
очень часто встречающаяся задача, 
решено было упростить Форму запи- 
си и вместо ТН1ЫС ставить двоето- 
чие: 


РЕТИТ :Н05 
Впрочем. команда ТНЕНС и дво- 
еточие - это не вполне эквива- 
лентные веши и не всегда ногут 


быть использованы одно внесто 
другого. 06 этом мы еше поговорим 
чуть ниже, 

Команда НАКЕ всегда имеет сле- 
ДУЮМУЮ КОНСТРУКЦИЮ: 

НАКЕ ‹имя> ‹содерхание> 
Поскольку первым параметром 
всегда идет ИМЯ, оно обычно начи- 
нается с кавычек. Второй параметр 
ножет быть словон, числом или 

списком. 

НАКЕ "РЕТСЕ 27 

РЕТЫТ РЕТСЕ. 

гт 

Число 217 является значением 
перененной с иненен РЕТСЕ. 

Другой пример: 

НАКЕ "НАРУ "СОНТРАЮУ 

РЕТНТ "НАКУ 

НАБУ 

Поскольку в команде РЕТЧТ сто- 
яли кавычки, то мы точно указали, 
что мы хотим напечатать именно 
слово НАБУ, что и было сделано. А 
вот если сделать так: 

РЕТНТ :НАКУ 
- то. это указание на то, чтобы 
распечатать содержиное НАКУ и в 
итоге получим: 

СОНТВАЕУ 

А вот еше более 
нер: 

НАКЕ “ЕАН :НАВУ 

РЕТНТ : ЕАН 

СОЕТВАЕУ 

Команда НАКЕ присвоила имени 
ЕАН содержиное имени НАКУ. оно, 
как мы помним равно СОНТВАРУ, что 
ны и получили по команде РЕТИТ, 
дав указание распечатать содержи- 
ное ЕАН. 

На первый раз ножет показаться 
нелепым использовать одно слово 
вместо другого, но при создании 
ПРОГРамм ЭТО может быть поаезным. 
Так, например, Вы хотите, чтобы 
Ваша программа сначала спросила 
как зовут того, кто с ней работа- 
ет, а потом в диалогах с нин 
всегда пользовалась этин именем, 
Тогда Вы, не зная заранее имени 
пользователя, всюду в диалогах 
используете вместо него например 
имя АНЗМЕЕ. А когда узнаете его 
иня, присвоете переменной АНЗЧЕВ 
необходимое содержание. 

ТО СВЕЕТ | 

РЕТНТ (МНАТ 15 УООЕ НАМЕ} 


СЛОЖНЫЙ ПРИ- 


э2 


НАКЕ “АНЗМЕЕ ВЕАПЕТУТ 

РРТИТ "НЕБО ° 

РЕТЫТ : АНЗУЕЕ 
ЕНО 

Когда Вы работаете в БЕИСИКе, 
то для ввода имени пользователя 
Вы использовали бы команду 1НРОТ, 
Здесь же ны воспользовались для 
этой цели вызовон процедуры 
РЕАРЕЛЗТ. О том, что это за про- 
цедура мы поговорим, когда придет 
время. Пока же. Вам достаточно 
знать, что она возьмет слово, 
набранное пользователен с клави- 
атуры (или список слов) и присво- 
ит его в качестве ‹ параметра в 
конанде МАКЕ. 

теперь Вы можете видеть, что 
если, скажем хОНН является именем 
человека, работающего на компью- 
тере, то АНЗМЕЕ является именем 
переменной, содержаниен которой 
является слово ЗЮНН. 

Рассмотрин еще более сложный 


принер: 
НАКЕ "СТР, "НАБУ 
РЕТНТ "СТВ 
[233 


Пока все идет тривиально прос- 


РЕТНТ : СТ 

НАБУ 

Это мы тоже ухе проходили. 
РЕТНТ ТНТС :СТЕЬ 

СОНТВАВУ . 

А вот это уже что-то новень- 
кое. Фактически мы дали ‘конанду 
напечатать содержание имени, 
которое ‘° является содержаниен 
переменной по имени СТЕ!.. 

В принципе конструкция 

ТНТЫС СТВ 
эквивалентна конструкции 

сте , 
которая не разрешена, 
СТРрУКцИИ | 

ТНТНС ТНТНС ств 

Последнюр конструкцию Вы нохже- 
те проверить сами. 

Фактически ны имеем два уровня 
вложения имени: 

СТЕГ ---> МАКУ ---> СОМТВАРУ 

Вот перед вами как раз тот 
случай, когда команда ТИМ и 
знак "двоеточие" не вполне взаи- 
мозаненяемы, о чем мы и упомянули 
выше. 

Зачен нам может быть нужен 60- 
лее, чен один уровень вложения 
инени? - для большей гибкости 
языка, для создания более универ- 
сальных процедур. 

Рассмотрим пример. У Вас на 
складе лежат разные товары: кас- 
сеты, дискеты, джинсы и пр. Каж- 
дый из этих товаров обладает раз- 
ной ценой (РЕТСЕ). Предположим, 
что Вы котите написать процедуру, 
которая быстро сообщит Ван’ данные 
по запрашиваеному товару. 

Чтобы не делать по кахжлому 
виду товара свою процедуру, Вы 
сделаете подстановку имени: 


или кон- 


ТО НАМЕРЕТНТ :ОВЛЕСТ 
РЕТНТ : ОВУЕСТ 
РЕТНТ ТНУМб :ОВУЕСТ 


ЕКО 

Предположим, что джинсы стоят 
15 долларов, кассеты - г, а дис- 
кеты - 1. 


НАКЕ " ЛЕАН$ 15 
НАКЕ "САЗЗЕТТЕ$ 2 
НАКЕ "ОТЗКЕТТЕ$ 1 


| Когда же эта инФормация нам 
будет нужна, мы всегда ее получим 

помошью процедуры НАНЕРЕТНТ, 
адавая при вызове интересующий 


по такой 


команде 


ПОЛУЧИМ 
| сообщение: 
| `ЛЕАН 
15 
Если воспользоваться еше и 
оператором ЗЕНТЕНСЕ (с ним мы 
будем разбираться позже), то мож- 


но программировать целые отчеты 
от компьютера, например: 

ТО НАНЕРЕТНТ :ОВЗЕСТ 

| РЕТНТ (ЗЕНТЕНСЕ "ТНЕ_РЕТСЕ_ОЕ 
:ОВЛЕСТ "1$ ТНЕНС :ОВУЕСТ) 


Если теперь дать команду 
НАМЕРЕТНТ “УЕАН5,. то получите 
сообщение: 


ТНЕ РЕТСЕ ОР ЛЕАН$ 1$ 15 

(Пена джинсов - 15) 

Еше более интересно использо- 
вать такую технику в команде 
НАКЕ, что дает возможность кос- 
венного присвоения и переприсво- 
ения перененных. Пример: 

НАКЕ "ООАНТТТУ "РЕТСЕ 

НАКЕ :ООАНТТТУ 27 

РЕТНТ :РРТСЕ 

гт 

Саное интересное в том, что мы 
нигде не присваивали числового 
| значения переменной РЕТСЕ и, 
не менее, когда оно нан понадоби- 
| лось, смогли его получить по ко- 
манде РЕ1НТ. Все дело во второй 
|Строчке, где содержимому перемен- 
иной СОАНТТТУ присваивается значе- 
иние 21. Поскольку содержиное име- 
ни ОПАНТИТУ равно имени РЕТСЕ, то 
пи получилось Так, что значение ет 
пприсвоилось перененной, имя кото- 
Йрой РРТСЕ. 

В заключение, говоря о прави- 
лах использования кавычек, мы 
должны сказать еше пару слов. 

Как Вы знаете, в ЛОГО все сло- 


| 
| 
| 


| 


Таким образон, 
встретив например слово ЛУМР, ЛО- 
ГО либо перейдет к поиску и ис- 
полнению процедуры МР, либо 
{если она не задана), выдаст со- 


тем 


[бзыки ПРОГРАННИРОВАНИЯ- 


НАКЕ "Р Г1$Т ЕТЕЗТ ТНТНС :А ЗЕКТЕНСЕ “РЕ ОКО СНАЕ 34 :А 
Рис. за 


НАКЕ "Р 115Т Е1ЕЗТ ТНТНС :А ЗЕНТЕНСЕ "РЕ МОКР СНАК 34 : 
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обшение об ошибке. Но ведь бывают 
случаи, когда Ван надо сделать с 
процедурой что-либо иное, напри- 
нер вызвать ее для редактирова- 
ния. В этом случае перед именем 
процедуры должны стоять кавычки: 
ЕР "ЛИР : 

То же самое относится и к сис- 

темным операторам РО, ЕВ и 5ЗАУЕ. 


й 


Виды процедур. 


В ЛОГО имеет смысл различать 
‘два вида процедур. 
Первый вид - команды, которые 


дают компьютеру указание выпол- 
нить какие-то действия, например: 

РОЕМАЕЮ 50 . 

РЕТНТ "НЕМО 

РЕНУР ° 

ЗАМЕ "МУРВОС 

ити. 

Второй вид - операторы. Их за- 
дача - рассчитать результат и вы- 
дать его для исполнения командой. 
Например: 

50Н 

рту 

и т.п. . 

В ЛОГО все‘команды принимают 
параметры (если они нужны для ра- 
боты) справа от себя, а всякий 
оператор выдает результат своей 
работы влево от себя. Именно поэ- 
тону, когда ны рассматривали 
арифметические операции, мы всег- 
да слева вставляли команду РЕТНТ. 

Единственным исключением этого 
общего принципа "Вход справа - 
выход налево” являются знаки 
арифметических операций +, -» /, 
>, <, =. Эти знаки ставятся между 


своими операндами - это исключе-. 


ние является как бы данью тради- 
ции, 

Те процедуры, которые встроены 
в ЛОГО без Вашего участия и явля- 
ются систенными, называют ПРИНИ- 
ТИВАНИ. 


Иногда строки в ЛОГО ногут вы- 
глядеть очень сложными. Посмотри- 
те, например, на строку, приве- 
денную на рис. 4а. р 

Тен не менее, существует про- 
стой спосоё разобраться с такой 
конструкцией. Прежде всего, най- 
дите в строке имена процедур. Это 
не числа и они не начинаются с 
кавычек или двоеточия. Разбери- 
тесь сколько параметров каждая из 
них ожидает после себя и поставь- 
те это число под иненем процедуры 
(рис, 4.6.). 

Большинство слов в этой строке 
Вам пока незнакомо, но это даже и 
хорошо для того, чтобы научиться 
анализировать непонятные строки. 
Пока скажем только, что все про- 
цедуры являются встроенными при- 
митивани. 

Теперь на листе бумаги наниши- 
те первое слово строки. Это обя- 
зательно команда. К нему проведи- 
те столько стрелок, сколько пара- 
метров требует ‘эта команда, › см. 
рис 4в. В конце первой стрелки 
запишите следующее слово. Если 
это не имя процедуры, то следую- 
шее слово запишите в конце следу- 
юшей стрелки. Если же это проце- 
дура, то к ней тоже проведите 
столько стрелок, сколько парамет- 
ров она требует. . 

Продолжайте такин образом, по- 
ка не дойдете до конца ЛОГО-Сстро- 
ки. Результат для данной строки 
показан на Рис. 4в. Здесь ясно 
видно как и от кого каждая проце- 
дура ожидает входные данные и 
куда направляет результат своей 
работы. 

Если же этот нетод не сработал 
и либо в строке есть слова, кото- 
рые некуда подключить, либо есть 
стрелки, которые ничем не конча- 
ются, то значит в написании стро- 
ки инеется ошибка, 
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` ГЛАВА 4 
СЛОВА и Списки 


Что такое список, знают конеч- 
но все и объяснять этого не надо. 
Даже совсем не рассеянные люди, 
готовясь к поездке, составляют 
список того, что надо захватить 
в дорогу. 

Список как объект языка ЛОГО 
ничем не отличается от тех спис- 
Ков, К КОТОРЫМ Вы ПРИВЫКЛИ В Обы- 
денной жизни. Правда, ЛОГО любит, 
чтобы списки для него заключали в 
квадратные скобки, а отдельные 
элементы списков отделяли друг от 


друга с ‘помошью пробелов. Порядок 

элементов в списке играет важную 

РОЛЬ. Так, два нижеследующих 

списка являются различными: 

ГОАКОАЕУ РЕВЕОАЕУ НАВСН] 

ГЛАКЧАЮКУ НАВСН РЕВЕОАКУ} 
Эленентани списков являются 


либо слова, либо тоже списки. Со 
списками, состоящими из списков 
мы поговорим в следующей главе, а 
пока остановимся на списках, со- 
стоящих из слов, 

Обычно нет необходиности слова 
в списках начинать с кавычек. Ло- 
ГО полагает, что два нижеследую- 
ших списка идентичны: 

[СЛАНОАВУ РЕВКОАКУ НАЕЮСН1 
["ФАНОАКУ "РЕВКОАКУ “НАЮСН} 

Аля чисел ны вводили имена пе- 
ременных, точно так же можно дать 
иня списку. Это тоже делается ко- 
нандой НАКЕ. 

НАКЕ "ЗНОРРТНС [ВВЕАР ВОТТЕК НИК 


ЗТАНР$] 
Списку предполагаемых покупок 
(хлеб, масло, молоко, почтовые 


марки) ны присвоили имя ЗНОРРТНС, 
Преинушество работы с инено- 
ванным списком состоит в том, что 
мы можем ссылаться на него по 
имени. Например, команда 

РЕТЫТ ; ЗНОРРТНС 

напечатает нан весь список: 

ВВЕАО ВОТТЕЕВ НИ.К ЗТАНР 
Обратите внимание на то, что 
при печати списка ‚ЛОГО опускает 
квадратные скобки. 

Ны можем присвоить списку дру- 
гое имя или, наоборот, списку с 
заданным именем присвоить иное 
содержание. напринер: 

НАКЕ "ВООСНТ :5НОРРТНС 
РЕТИТ :ВОИСНТ 

ВВЕАР ВОТТЕВ НИК ЗТАНМР5 
Так у нас появился новый 
сок вооснт. 


спи- 


Выбор элементов списка. 

В списках было бы очень мало 
пользы, если бы с ними можно было 
работать только как с одной цпель- 
ной вешью (хранить,  переименовы- 
вать и распечатывать}. Нан нужны 
приемы, с помощью которых мы мог- 
ли бы иметь доступ к отдельным 
элементам списка. ЛОГО предостав- 
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ляет несколько таких приемов. Са- 
мый простой и наиболее широко 
применяющийся - ошератор ЕТВ$Т. 
Он выдает первый элемент списка. 
Например: 
РЕТНТ ЕТЕЗТ [ЛАНУАВУ РЕВЕЧАБУ 
НАВСН} 
УАНОАВУ 
Оператор ЕТЮЗТ может работать 
и с иненованными списками тоже: 
РРТЫТ ЕТЕЗТ :ЗНОРРТНС 
ВВЕАР 
Разобравшись с первым  элемен- 
том списка, мы хотели бы разобра- 
ться и с остальными. для этого 
наиболее стандартным является 
оператор ВОТЕТА5Т. Он создает 
ВТОРОЙ СПИСОК, СОСТОЯЩИЙ ИЗ всех 
элементов исходного списка, кроме 
первого. Т.е. как бы, отбрасывает- 
ся первый элемент, а ‘оставшиеся 
элементы становятся новым спис- 
ком. 
РЕТНТ ВОТЕТЕЗТ [УАНОАВУ РЕВЕОАКУ 
МАРСН] 
РЕВКОАКУ НАКСН й 
Совершенно аналогично для име- 
нованных списков: 
РЕТЫТ ВУТЕТЕЗТ ; ЗНОРРТНС 
ВОТТЕВ МИХ ЗТАНР 
Кроме естественного различия 
между РТЕЗТ и ВОТЕ1В5Т есть еше 
одно очень важное различие: 
ЕТЕЗТ - дает слово; 
ВОТРТЕЗТ - дает список. 
Специально для удобства поль- 
зователей со списками ножно ра- 
ботать не только с начала. но ис 
конца. Оператор ТАЗТ дает послед- 
ний элемент списка: 
РЕТНТ ГАЗТ : 5НОРРТНб 
ЗТАНР5 
Есть и оператор ВУТ.АЗТ, кото- 
рый, как Вы уже очевидно догала- 
лись, создает новый список, рав- 
ный исходному 6ез последнего эпе- 
мента. 
РЕТЫТ ВИТЬАЗТ (НОМРАУ ТОЕЗРАУ 
МЕОНЕЗРАУ ТНУЮ5ОАУ 
РЕТПАУ] 
НОНРАУ ТОЕЗРАУ МЕОНЕЗРАУ ТНОЮ5БАУ 
ножно выбирать не только пер- 


: вый или последний элемент из спи- 


ска. для того, чтобы получить лю- 
бой произвольный элемент. служит 
оператор ТЕМ, который требует 
после себя указания двух паранет- 
ров - номера нужного элемента 
списка и самого списка. 

РЕТЫТ ГТЕМ 2 [АРЕИ. НАУ МЕ) 

НАУ 


Список ножет быть задан своим 
именем: 
`РЕТНТ ТТЕМ 3 :5НОРРТНС 
них 

Часто бывает важным знать, 


сколько же элементов содержится 

в Вашем списке. Для этого служит 

оператор СОПЯтТ. 

РЕТНТ СОПМТ [ЛАНОЛЕУ РЕВВОАКУ 
НАЕСН) 

3 


РЕТНТ СООТ : 5НОРРТИб 
я 
нногие 


РЫМИ МЫ уже сталкивались. Тако-| 
ва, например, команда ВЕРЕАТ, 
после которой должны быть два| 


параметра. Первый паранетр - чис- 
ло ПОВТОРОВ. Второй параметр = 
список повторяющихся команд. Это 
один из тех случаев, когда кавыч- 


ки могут быть ВНУТРИ списка, при- | 


чем опустить их нельзя: 
КЕРЕАТ 4[МАКЕ "НОМВЕК : НОМВЕВ +1] 


Хоть команда ВЕРЕАТ и принима-! 


ет список как список, тем не ме- 
нее команла МАКЕ, стояшая в спис- 
ке, требует, 
ранетрон было имя. Если Вы захо- 
тите испытать этот пример, то 
предварительно не забудьте задать 
первоначальное значение перемен- 
ной НОНВЕК. 

некоторые из встроенных прими- 
ТИВОВ МОГУТ Работать как со сло- 
вани, так и со спискани. Приме- 
Ром ножет служить команда  РЕ!НТ, 
которая распечатает и слово и 
список. Фактически именно для та- 


ких случаев в ЛОГО и ввели прави- | 


ло, по которому списки должны 
ки, 

Вы можете создавать и 
процедуры для работы со списками. 
Так, например, ‘ниже 
процедура для печати 


но список 
строчку). 
Процедура работает в 
ВЕРЕАТ, переходя от одного 
мента к другому и выхватывая его 
с помошью оператора ТТЕН. 
ТО ГВЬ :АБТЗТ 
НМАКЕ "СООНТЕК 1 
ВЕРЕАТ СОУНТ :41,15Т 
[ГРЕТЕТ ГТЕН :СООНТЕЕ : АЕТ5Т 
НАКЕ "СОУМТЕЕ :СООНТЕЕ+11 


распечатывается в 


ЕНО 
Тогда команда: 


ЬВЕ ВЕ $ТАНО5 РОВ ГТНЕ ВУ ГТНЕ] | 


даст результат: 

ЬВЕ 

ЗТАНО5 

РОВ 

ГТНЕ 

ВУ 

1:15 

Попробуйте сани в порядке 
сперимента написать процедуру, 
которая сможет печатать список в 
обратном порядке. 

Используя ухе изученные ин- 
струменты и приены, 
менять списки для того, 
хранить и обрабатывать инфорна- 
цию. Например, Ван надо сохранить 
в базе данных 
расходы в ‘течение года, а потом 
найти их среднюю величину и сум- 
ну. Тогда Вы составите список, в 


чтобы ее первым па-| 


быть заключены в квадратные скоб- 


приведенай 
элементов! 
списка в столбик по одному (обыч-| 


цикле | 
эле- | 


эк- 


мы можем при- | 
чтобы! 


свои ехемесячные! 


стандартные процедуры! 
ЛОГО воспринимают списки в качес-! 
тве входных параметров. С некото-1 
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[током первын элементом будет 
расход за январь, вторым - за 
февраль и т.д. Нижсприведенная 
процедура пройдет по списку таким 
хе образон, как это делала проце- 
дура `1В6. Только она не будет 
(распечатывать найденные элементы, 
|а будет накапливать их текущую 
[сумму в переменной ТОТАЕ, которая 
| 
быть  занулена. 
расходов 


Средняя величина 
определится делением 


НАКЕ "ТОТА! © 
НАКЕ "СОЦНТЕВ 1 
ВЕРЕАТ 121МАКЕ "ТОТАЁ :ТОТАГ, + 
ТТЕМ: СООНТЕЕ : АГ.т5Т 
НАКЕ "СОУНТЕЕ :СООНТЕВ + 1} 
НАКЕ "АУЕБАСЕ : ТОТАЕ./12 
РЕТЫТ "ТОТАЕ 
РЕТНТ :ТОТАЬ 
РЕТЫТ "АУЕВАСЕ 
РЕТНТ :АУЕВАСЕ 
ВЕР 


Испытайте эту процедуру с лю- 


|туры выполняют с помошью операто- 
ра ВЕАП15Т. Результат его работы 
долшен быть тут же передан какой- 
либо переменной или процедуре. 
Обычно это делают с помошью кс- 
манды НАКЕ. Например: 

НАКЕ "АНЗМЕК КЕАПГ,15Т 

По этой команде компьютер пе- 
реходит в состояние ожидания до 
тех пор, пока Вы ие наберете то, 
что Вам нужно на клавиатуре. 06о- 
значается это состояние вопроси- 
тельным знаком на экране. Список 
ввода состоит из тех слов, разде- 
ленных пробелами, которые Вы на- 
берете до нажатия клавиши ЕНТЕК, 
после чего ввод будет закончен, 

Попробуйте и посмотрите, что 
Вы набрали: 
НАКЕ “АНЗМЕК ВЕАОГ.ТЗТ 
РЕТНТ : АНЗМЕЮ 
1060 не имеет соответствующего 
оператора для ввода только одного 
слова, но в нем и нет необкоди- 
ности. обычно, когда в этом воз- 
никает необходимость, пользуются 
конструкцией: 

Р1ЮУТ ВЕАБЕТЕТ , 
которая вводит нервое слово вход- 
ного списка. Все остальные слова 
ИГНОРИРУЮТСЯ. 

Ножет быть, Вы хотите получить 
отдельно первое слово списка и 
всю остальную часть списка. В 
этон случае НЕПРИМЕНИНА о такая 
КОНСТРУКЦИЯ: 

НАКЕ "ЗТАВТ РТЕЗТ ВЕАРЬТЗТ 

НАКЕ "ВЕЗТ ВИТЕТКСТ РЕАШЕ15Т 

Просто встретив КЕАГ.15Т вто- 
рой раз, компьютер снова войдет в 
состояние ожидания и примет окон- 


конечно в начале процедуры должна . 


ЯЗЫКИ ПРОГРАММИРОВАНИЯ 


чание списка, но’ ЭТО БУДЕТ УЖЕ НЕ 


ТОТ СПИСОК. \ 
ЕСЛИ Вы хотите, чтобы у Вас 
все получилось норнально, то 


единственный путь - принять весь 
<писок и только потон заниматься 
его разделением. 

НАКЕ “АНЗМЕК ЕЕАВЕТЗТ 

НАКЕ “ЭТАКТ Е1®ЕЗТ :АНЗМЕЮ 

НАКЕ ”РЕЗТ ВИТЕТЕЗТ : АНЗЧЕЕ 


Пустой список. 


Свисок, в котором не содержит- 
ся ни один элемент, является нео- 
бычным, но очень полезным  объек- 
том, Обозначается он - [1 и назы- 
вается пустым списком. Он нужен, 
например, при создании списков в 
качестве исходного элемента, Он 
же используется для сигнализации 
< конце работы, когда какой-то 
заполненный список сканируется и 
элемент за элементом извлекаются 
из него и отправляются на обра- 
ботку процедурами. 


Создание и слияние списков. 

Для этих целей широко исполь- 
зуется процедура 5ЕЖТЕНСЕ. ны 
уже встречались с ней в команде 
РЕТЫТ. Она принимает в качестве 
входных параметров два или более 
слова или списка и объединяет их 
в один список. Например: 

МАКЕ "РЕОУЕВВ ЗЕНТЕНСЕ "МАМУ 
"НАХО5 

РРТИТ : РЕОУЕВВ 

МАНУ НАНО5 

Мы слили два слова: МАНУ и 
НАБО5 в один список НАНУ НАНОЗ. 
но ЗЕНТЕНСЕ ножет сливать и спи-. 
ски: 
МАКЕ “РКОУЕЮВ ЗЕНТЕМСЕ ГИЛМУ 
НАКО5) (МАКЕ ГТСНТ МОЕЕ) 

РЕТЫТ :РКОУЕЮВ 

НАМУ НАКОЗ НАКЕ 11СНТ \ОКК 
Или: 

НАКЕ "НЕМЗАУ1НС ЗЕКТЕНСЕ 
:РКОУЕЕВ (ОЕ 5РОП, ВЕОТН] 

РЕТНТ :НЕМЗАУТНС 

НАНУ НАНОЗ ВАКЕ 11СНТ МОЮЁ ОВ 
5РОИ. ВКОТИ 

Оператор ЗЕНТЕНСЕ может иметь 
более двух входных параметров. В 
этом случае и ЗЕНТЕНСЕ и парамет- 
ры дояхны быть заключены в кКрУГ- 
лые скобки. 
РЕТИТ (ЗЕМТЕМСЕ ГА КОлТНС) Г5ТОМЕ 
САТНЕЕ51 [КО Н0551) 
или: 
МАКЕ "ОБОЗАУТЫЕ (ЗЕМТЕНСЕ (ТНЕ 
5АУ1НС} :РЕОУЕКВ [1$ ТКОЕ) } 
РТТИТ :ОБРО5АЧТЫС 
дает в результате: 
ТНЕ ЗАТ1ИС МАНУ НАКО5 НАКЕ Г1СНТ 
МОЕК5 15 ТВОЕ 

Команда РЕ1ЫТ всегда требует 
При себе только одного входного 
параметра - слова или списка, 
поэтому Вы не можете напечатать: 


РЕТНТ "НАНУ “НАК 
вам на помошь приходит список: 
РЕ1НТ [МАШУ НАНО5] 
Но если текст еше более сложен 
и требует слияния списков и слов 
в одно целое, то мы пользуенся 
оператором ЗЕЯТЕНСЕ: | 
РЕГНТ ЗЕНТЕНСЕ (ТНЕ ЗНОРРТНЕ 615Т 
153 ;ЗНОРРЕМС 
В результате Вы получите: 
ТНЕ ЗНОРРУНб 115Т 15 ВВЕАЮ БУТТЕЕ 
НИХ 5ТАНР5 
до сих пор ны использовами 
ЗЕНТЕНСЕ для слиячия списков. Те- 
перь посмотрим, как ножно созца- 
вать новые списки. Пусть,  напри- 
нер, перед нами стоит задача соз- 
дать список ехомесячных расхолов, 
которым мы уже пользовались В 
одном из вышеприведенных приме- 
ров.  Процелура должна печатать 
по порядку названия месяцев, при- 
нинать с клавиатуры величину рас- 
хопа в данном месяще и вводить ее 
в список расходов. 
Мы начнем с того, что создадии 
список несяцев - УЕАЮ, а список 
расходов ЕХРЕНЮ сделаем пока 
пустым списком. Затем повторик 
двенадцать раз процедуру ввода 
данных с клавиатуры - ТЯМОНТН. 
ТО ВОТыЯ5Т 
НАКЕ "УКАБ ГЛАКОАЮУ ЕЕЗВЕЗАКУ 
НАРСН АРЕЦ. МАУ 
МЕ ЛУ АОСО5Т 
ЗЕРТЕНВЕЮ ОСТОВЕЮ 
МОУЕНВЕЕ РЕСЕНВЕК} 
МАКЕ "ЕХРЕНО (] 
НАКЕ "СООНТЕК 1 
ВЕРБАТ 12 (ТУНОНТН) 
ЕН ‚ 
Процедура 1ННОНТН должна печа- 
тать название очередного месяца и 
принимать с клавиатуры данные по 
расходам за этот месяц. для это- 
го используется техника  Е1®5Т 
ЕБАБЕТЗТ, рассмотренная выше. 
ТО 1ННОяТН 
НАКЕ "МОНТН ТТЕМ : СОИЧТЕЕ :УЕАЮ 
РКТЕТ ; МОКТН 
НАКЕ “ЕХРЕНО ЗЕНТЕНСЕ :; ЕХРЕНЮ 
ЕТЕ5Т КЕАПЛЕТ с 
НАКЕ СООЫТЕЕ :СООНТЕЕ + 1 
ЕН 


Есть еше один изомренный нетод 
исполяения того, что делает опе- 
Ратор ЗЕЯТЕНСЕ. Обычно изомрения 
В програнмировании ‘восе ие явля- 
ются необходимыми улучшенияки, но 
в данном случае у нас появляется 
одно преимущество. В этой техно- 
логии используется идея, описан- 
ная в конце предыдущей главы, 
давайте ‘рассмотрим слова в списке 
УЕАВ как имена переменных, содер- 
ханием которых является еженесяч- 
ный расход. Тогда, например, 
*ЗАНСАЕУ - зто имя месячного рас- 
хода за январь. Тогда процедура 
ТНМОВТН ножет выглядеть так: 

ТО ТАМОКТН 
НАЕЕ "НОНТН ГТЕН :СОСНТЕЮ :УБАЮ 
РКЗЫТ : НОНТН 


НАКЕ :МОКТН Е1В5Т ВЕАПТЗТ 
МАКЕ “СОУНТЕЮ : СОИМТЕК + 1 

Ем 

Вторая команда НАКЕ использует 
содержание НОНТН в качестве свое- 
Го первого параметра, в результа- 
ЗАНОАВУ станет иненем тех дан- 
ных, которые будут считаны с кла- 
виатуры по ЕТЕЗТ КЕАП. ТТ, 

Такой подход дает нам то пре- 
имущество, что каждый о элемент 
данных может быть легко индивиду- 
ально изменен. При написании про- 
грамм всегда следует думать о 
том, что должен сделать пользова- 
тель, есди случайно допустит оши- 
бку. Есаи Мы будем работать таким 
то нам не нужен список 


Как упражнение напишите проце- 
дуру СНАНСЕ, которая примет с 
клавиатуры название месяца и рас- 
ход в этом месяце и изменит эти 
значения в списке. 

Если Ван захочется сохранить 
результаты этих экспериментов на 
кассете в виде сборника процедур 
для ведения личной бухгаатерии, 
ОГО обеспечивает для этого толь- 
ко одну возможность. ‹ Вы можете 
воспользоваться конандой ЗАУБАШМ., 
после которой надо указать имя 
файла: 
: ЗАУЕАЕ, "НОНЕУ 

По этой команде на ленту будет 
выгружено все, что накодится в 
бочей области, т.е. и все про- 
щедуры и всё переменные, В этом 
тохе есть удобство, поскольку ко- 
гда Вам опять понадобится Файл 
„ То загрузив его Вы не то- 
лько загрузите все данные, но и 
-веобзодиные для 


Работа со словами. 
Многие процедуры,  предназна- 
ченные для обслуживания списков и 
слов внутри списков, могут на са- 
мом деле применяться только для 
работы со словани и даже с симво- 
лами, из которых эти слова состо- 
ят. Так, напринер, команда ЕТКЗТ, 
если ее применить не к списку, а 
|к отдельному слову, выдаст первый 
символ этого слова. 
РЕТНТ ЕТЕЗТ “АВС 
А 


Точно так же: 

РЕТНТ СООНТ "ЕЕТРАУ 
даст в результате: 

6 
Из рассмотренных в этой главе 
процедур только две неприменимы 
для работы с отдельныни  словани. 
Это процедуры 1ТЕМ и ЗЕНТЕНСЕ, 
Аналог процедуре ТЕМ ны сде- 
лаем несколько позже,  воспользо- 
вавшись для этого ТЕТ, ЪАТ, 
ВИТЕТВЬЗТ, ВОТЬАЗТ и рекурсией. 
вот в качестве аналога `про- 
цедуры ЗЕНТЕНСЕ для создания слов 
есть специальная процедура мов. 
она и работает как  ЗЕНТЕЮСЕ, 
принимая два или более слов, но 
сливает их не в список, а в одно 
слово, т.е. не оставляет между 


составляющими словами пробелов. 
РЕТИТ МОЕО "ВЬАСК "РОО, 
ВЫЬАСКРОСТ. 
Так же. как и ЗЕНТЕНСЕ, проце- 
дура МОВР требует наличия крУГЛык 


кавычек, если входных данных 6о- 
лее, чем два. 
РАТНТ (МОБКО "ВЕН “1МС “НАМ) 
ВТЕНТНСНАМ 


В качестве примера ны рассно- 
трели несложную процедуру,  кото- 
рая принимает с клавиатуры от 
пользователя слово и печатает его 
задом наперед. Для приена слова 
мы опять используем технику Р1В5Т 
ВЕАОЕ15Т. Затен, начиная с конца, 
это слово сканируется и символ за 
символом собираются в новое слово 
с помошью оператора ЧОП. исходно 
новое слово задается пустым сло- 
вом, 

ТО ВЕМЕЕ5Е . 

РЕЛНТ ТСТУЕ НЕ. ^ МОЕ} 

НАКЕ "ТНЫМОВР ЕТЮ5Т ВЕАШ. ТТ 

НАКЕ “НЕММОРО “ 

КЕРЕАТ СОЧНТ : 1НМОЕР 

{НАКЕ "НЕУЗМОКО 
МОРО :НЕММОЕО ТАЗТ : ТЫМОЕВ 
НАКЕ "ТЫМОЕО БОТТАЗТ : 1МОЕО 

РЕЛЕТ : НЕММЮВО 
Ем 

Те, кто програмнируют на БЕЙ- 
СИКе, лолжны быть знакомы с `про- 
цедурани, отрезающими левую или 
правую часть слова. В ЛОГО нет 
собтветствующих встроенных прими- 
тивов, вместо этого ны напишем 
свою процедуру, которая принимает 
в качестве входных параметров 
слово и число символов, которые 
должны быть "отрезаны" от слова, 
считая слева, то есть от начала 
слова. Эта процедура создаст два 
НОВЫЕ спора, назовем их 1ЕЕТ и 
АТеНтТ, 

Работа этой продцелуры похожа 
на работу ранее рассмотренной 
Процедуры КЕУЕК5Е. В качестве 
исходного значения правой (В1СНт) 
части ‹ задается все  искодное 
слово, а в качестве исходного 
значения левой (ГЕРТ) его части 
задаетсх пустое ‘сяово. затен не- 
обходиное количество символов 
переносится из ВСНТ в ТЕРТ. 

ТО 5РЬТТ :АЗМОВО ВОН 

НАКЕ “ВТСНТ : АМАЕР 

НАКЕ “ТЕЕТ 

ВЕРЕАТ :НОН 

{НАКЕ "БЕРТ ОКО БЕРТ Е БТ 
ЕАСНТ 
НАКЕ "ВТСНТ ВОТЕТЕЗТ :ЮТОНТ] 
ЕНр 
Для эксперимента попробуйте: 
ЗРЬЫГТ "РЕРТНЕО 4 
РЕШТ :ЕТЕНТ 


РЕТИТ БЕРТ 
В результате должно получиться 
НЕ 
РЕЕТ { 
А сейчас мы промаемся с Вани 


до следующего выпуска, в котором 
рассмотрим работу с ‘циклами и сше 
немного углубим свои взгляды на 
"черепаюью графику”. 


{Продолжение следует) 


Короткое, 
нисьно прислал наш читатель 
Радзевич А. А. из г. Нальчик. оно 
очень заинтриговадо нас. Вот его 
письмо практически дословно: 

"Нучая свой БТМСТЬАТВ я раско- 
пал нечто такое, что Вас может 
заинтересовать. Запустите следую- 
шую программу и Вы все увидите 
сани. * 

10 РОТ а 

20 ©15 

30 РОТ 441, 8Т 

40 ПБАМ 174,0, (2ча+1 у иРТ 
50 60 ТО 10 

Наиболее любопытные 
возникают, если ввести числа 91. 
100. 125, а также и любые другие. 
можно еще включить режин ОУЕЮ 1. 
Попробуйте, Вы не зря потратите 
время!" 

Набрав эту програмну, ны убе- 
кились, Что это действительно 
*нечто такое". Не скроен, мы с 
интересом “играли” с этой прог- 
раммой, залавая всевозможные 
числа и набиюдая за тем, что про- 
исходит при этом на экране компь- 
ютера. . 

Программа предельно проста, но 


Яо очень интересное 


эффекты 


эффекты, которые она создает, 
совсен неочевидны. Через некото- 
рое время, "“ваигравшись”, мы за- 


цунались над тен, как же все-таки 
она работает. Причудливый орна- 
мент образуется на экране. и весь 
он создается всего лишь одним 
оператором ОВАМ. Что лежит в 
основе проискодяшего? Работа 
встроенного калькулятора? Округ- 
ления чисел? Любители головоло- 
нок! Если Вы заинтересовались 
ПРОИСхОДЯШИМ, попытайтесь объ- 
яснить, как же все-таки работает 


эта програмна? 


Стюарт Николс. 


НРИНЕНЕНИЕ АССЕНБЛЕРА 
АЛЯ СОЗДАНИЯ БЫСТРОРАБОТАЮЖИХ 
ПРОГРАНН 


Перевод с английского 
Пашорина В. И. 


Продолхение. 
Начало см. с. 9-12, 48-61. 
4. СЛУЧАИНЫЕ ЧИСЛА 


Случайные числа являются неот- 
ъенлемой частью большинства игро- 
ВЫХ ПРОГРАамм. ПОЛУЧИТЬ случайные 
числа с помошью программы в на- 
шинных кодак довольно легко и, в 
зависимости от диапазова выборки, 
определякщего гранипы интервала, 
в котором необходимо ПОЛУЧИТЬ 
случайные числа, различают два 
способа. 

Первый способ, вполне удов- 
летворительный для большинства 
ИГРОВЫЕ ПРОГРамм, основан на ис- 
пользовании системных переменных 
|ЗЕЕР и ЕКАНЕЗ. Примевяться этот 
способ ножет при следующих диапа- 
зонах выборки: 


для этого в регистровую пару 
НГ, записывается значение систем- 
вой переменной 5ЕЕШ (5СТ6бНЕХ = 
23570 БЕС), а в регистровую пару 
РЕ- значение младшего байта сис- 
‘темной перененной ЕЕАМЕЗ (5СТВНЕХ 
= 23612 БЕСУ. Затем эти два числа 
СУМНИРУЮТСЯ И результат заносится 
в систенную перененную ЗЕЕФ (это 
нужно для выборки очередного слу- 
чайного числа). В регистр А поо- 
йчередно записываются значения Ни 
Ь и путем аогической операции 
АНР наскируются незначиные. биты 


для задания диапазона выборки 
случайного числа. 

В программе 4.1, к прииеру, 
для задания диапазона выборки 


©: Зе для получения таких 
же случайных чисел, ках и Шю 
ВА51С-команде ТИТ (КНО*32), в 
регистре А маскируются биты с 
пятого по седьмой. 

хак уже отмечалось, такой спо- 
соб может быть использован для 
получения случайных чисел в стро- 
го определенных диапазонах. Одна- 
ко, представленную программу Нох- 
но усовершенствовать и расширить 
диапазон фиксированных интервалов 
для случайных чисел. Например, 
для реализации ТНТ (БНОиг3) иеоб- 
ЕоДИМО добавить: 


4 3Зак.390 


РАБОТА В НАШИННЫХ КОДАХ 


Ове 23760 


ЕО в, 10 
РИБН ВС 


БО НЬ, (23670) 


10 рЕ, (2з6т2) 


АБО НЕ, БЕ 
0 (23670), Н. 


ОА, Ь 
АНП 31 
РОЗН АР 
ЕО А, 2 


САЫ. 5633 


2 А, гг 
БСТ 16 
Е А.В 
В5Т 16 
ГО А, 10 
в5Т 16 
РОР. АЕ 


САМ. 11560 


САМ, 11747 


о А;Н 

АНО 15 

гр НА 

р А 

АН т х 
АО А, Н 


Обратите внимание на то, что в 
програнме 4.1 регистр. В использу- 
ется как счетчик шагов, цикла (10 
магов) и значение этого хе регис- 
тра используется в РЕ!НТ-процеду- 
Ре: РЕШИТ АТ В,10 для вывода 
случайных чисел на экран. 

для получения случайны чисел 
из произвольного интервала прине- 
няется второй способ. этот способ 
основан на использовании ВЯр-про- 
цедуры из системного ПЗУ компью- 
тера. К сожадению, эту процедуру 
нельзя вызвать простой командой 
СА. ВНО, т.к. она не завершается 
конандой ВЕТ. Процедура эта зани- 
нает участок памяти с адреса 9725 
по адрес 9765 (г5ЕЮНЕХ. .. гбе5нЕХ) 
и в своей работе использует 
встроенный калькулятор, ‘а по 
завершении работы иеняет значение 
переменной 5ЕЕЮ. для этого в на- 
чале работы это значение извлека- 
ется из ЗЕЕЮ, преобразуется, а 
затем дважды записывается на вер- 


э? 


Листинг 4.1 


КОННЕНТАРИИ 


; Счетчик ва 10 шагов. 
;Запомнили состояние счет- 
; чика. 

Приняли в НЕ состояние 
‚системной переменной 5ЕЕР. 
;Приняли в БЕ состояние 
;системной перен. РВАНЕЗ. 
:Нашли их сумму 

;и установили результат в 
; 5ЕЕО, 


;Гашение ненужных битов. 
:Запомиили результат. 


‚Открытие канала печати на 
‚экран и выдача управяя- 
; ющих кодов для установки 
; позиции печати 
; 
т 


АТ В. 10 


сстановление числа со 
; стека. 
; Процедура ЗТАСК_А (помеша- 
;ет на стек калькулятора 
; число, записанное в акку- 
;нуляторе процессора, 
Процедура РЕТИТ_ЕР. Печата- 
;ет действительное число, 
‚накодящееся на вершине 
; стека калькулятора. 
; Восстановление счетчика. 
‚Уменьшение счетчика и воз- 
; врат на новый шаг. 
Выход из процедуры. 


вину калькуляторного стека. 'Пер- 
вое значение на вершине стека пе- 
редается в системную переменную 
ЗЕЕР для генерации очередного 
случайного числа, а оставшееся на 
вершине‘ стека значение преобразу- 
ется для получения соответствую- 
шего ему числа в диапазоне 0...1 
(но не = 1). Чтобы использовать 
эту процедуру, необхоцино ее’ ско- 
пировать из ПЗУ и затем вызывать, 
как подпрограмму. 

Подпрограмма 4.г показывает 
применение этого способа для `по- 
пучения случайных чисел 

ТЕТ (©НО"12345) ; 
и вывода 44 из них в два столбца 
на экране путем использования 
СНЕ$б. Ь 

ЕНО-процедура использует нес- 
колько новых для нас кодов каль- 
кулятора, которые могут быть 
полезны и для других процедур: 

Код. 161 (АН) - зчаск. опе - 
помешает на ‘вершину стека кальку- 
лятора единицу. 

Код 52 (ЗАН) - ззаск_даза - 
интерпретирует следующие за ним 
пять байтов как действительное 
число с плавающей точкой,  запи- 
санное в интегральной Форие и по- 


мешает его на вершину стека каль- 
кУлЯятоРа. 

Код 50 (з2н) - попов ш - вмес- 
то делимого (п) и делителя (т) 
эта команда помещает на стек ос- 
таток от деления и пелое частное. 

Код 02 - еее - команда 
служит для удаления числа с вер- 
шины стека калькулятора. 

Цоследние два кода редко ис- 
ВОЛЬЗУЮТСЯ В ИГРОВЫХ программах, 


Вызов процедуры ЕР_ТО_ВС, нахо- - 


дяшейся по адресу 11682 ° ЕС 
{2РА2НЕХ) - САМ, 11682, позволя- 
ет иззлечь число с вершины стека, 
ЮкруглиТь его до ближайшего цело- 
го числа и затен записать в ре- 
ГИСТРОВУЮ Пару ВС. В отличие от 
этой процедуры, процедура 
находящаяся по адресу 
11Т330ЕС (2005НЕХ), передает чис- 
мо с вершины стека в регистр А. 

В данной программе скопирован- 
вая ЮНО-пропедура заканчивается 
шо адресу 23810, а начиная с ад- 
реса 23811 и по адрес 23820 нахо- 
дится. процедура, осушествляющая 
дальнейшее преобразование случай- 
ного числа, записанного на стеке. 
для этого на стек записывается 
число 12345. определяющее диапа- 
зон выборки, а затем производится 
|перемножение случайного числа из 
диапазона 0...1, находящегося на 
стеке, с этим числом. затен кодом 
калькулятора 0г (де1ефе) удаляен 
со стека дробную часть произведе- 
вия и на вершине стека остается 
целое число 1Т(ЕНО=12345},  ПРОо- 
цедура РЕТНТ УАГОЕ выводит на эк- 
ран 44 случайных числа в г столб- 
за. 

демонстрационная програнма 4. 5 
показывает, как применяется про- 
медура ЮНО. Здесь эта процедура 
используется для задания случай- 
ным образом цвета и высоты донов 
|в городе и может быть использова- 

*Бомбарди- 


Все необходимые символы 


9р0б здесь уже определены и Вы 
можете легко  усовершенствовать 
эту программу для своих целей. 
Начальное изображение на экра- 
не Формируется с. помошью БЕИСИКа, 
а последующее, через несколько 
секунд, с помошью программы в 
машинных кодах, что позволяет 
сравнить скорость выполнения Фун- 
кции ВНР. Чтобы не менять вачаль- 
ное значение для генератора слу- 
\учайных чисел, используйте для вы- 


"переменная" = 
Можно использовать команду РЕТИТ 
935 “адрес”, если Вы хотите полу- 
чить число, записанное в регис- 
тровой паре ВС после выхода из 
процедуры в машинных кодах. Дая 
установки цветов РАРЕК и ТЕ в 


34 80 41 0000 80 
з2 


АССЕМБЛЕР 


овес гзтво 
ВР А,2 
САН, 5633 
САМ, 3435 
ЬО В,44 ° 
РОЗН ВС 


0 БС, (23670) 


САЫ, 11563 


В5Т 30 
зфаск_опе 
а9З 
з4аск_паьег 
Е 1Р1У 
з+аск_пивьег 
пам 


челе+е 
з1аск_опе 
зиъегас1 
дир11сале 
епаса1с 

САМ. 11682 
12 (гз6то), вс 
О А, (НЫ) 

АЗО А 


В 2.2 
508 16 


РО (НЫ, А 


0 ВС, 12545 
САМ. 11563 


Е5Т 40° 
09311171 У 


114 
епдса1с 
10 А, ог 
САМ, 5653 


САМ, 11ТАТ - 


Листинг 4,2 


КОМНЕНТАРИЯ 


‚ зОоткрываен канал для печа- 


;ти на экран, 


; чика. 
Приняли в ВС текушее зна- 
‚чение системной перенен- 
`;ной 5ЕЕр. 

;Переброска содержимого вс 
‚ва стек калькулятора. 
;Включение калькулятора. 
‚На стеке (56ЕР), 1 

} (БЕТ) +1 

‚На стек понешаем число 75. 
$ ((5ЕЕ0}+17ч75 

} Число 65537 

‚деление на 65537 с остат- 
; ком. и 
‚Частное удалили, оставили 
; только остаток, 

: "остаток", 1 

; "остаток" -1 

‚На стеке сделали копию. 

; Выключение калькулятора. 

: Перенос результата со сте- 
:ка калькулятора в регист- 
:ровую пару ВС. 

‚установка вового значения 
; системной переменно 5ЕЕР. 
;Экспонента числа, находя- 
;шегося на вершине стека. 
;Выставление флагов. 
‚Обход, если экспонента = 0 
;Вычитание числа 16 из экс- 
; поненты эквивалентно деле- 
;нию на 65536. 

‚изменили экспоненту числа, 
‚на вершине стека. 

:Теперь ва вершине стека 
‚случайное число в диапазо- 
;не от 0 до 1. 


Число 12345 РЕС переносим 
;на стек. 

Включение калькулятора, 

; Умножение. На стеке слу- 
;чайное число от 0 до 12345 
Выделение целой части. 
:Выключение калькулятора. 


; Открыли канал печати на 
: экран, 
Процедура РЕТИТ_ЕР. Печата- 


‚}ет действительное число, 


:; находящееся на вершине 
; стека калькулятора. 


‚Печать кода СНЕ 6, 
{Восстановление счетчика. 
;Возврат на’ повторный маг. 
Выход из процедуры, 


мешает его на вершину стека каль- 
процедуре используется 
\ Го (+83), 47 

внесто 

Г А, 47 и 

0 (17+83), А, 
как это было в предыдущие приме- 
Рах, что позволяет уменьшить тре- 
буеный пля процедуры объем памя- 
РИ. 

Перед вызовон генератора сду- 
чайных чисел в регистр А записы- 
вается значение коэффициента п 
в Форнуде ЮНОап, которое затеи 
передается в ячейку по адресу 
23581 (в стандартной версии это 
неиспользуемая ячейка в области 
системных переменных). . это число 
скругаяется до ближайтего  цезого 
числа и записывается опять в 
регистр А. а оттуда, с помошью 
пронелуры САШ. 11133 переписыва- 
ется на вершину стека. 

Необходимая дяя организации 
вывода на экран информация нахо- 
дится в буфере принтера в следую- 
щей посдедовательности; 

АТ(22), ку, К (16), аз, $. 


5. ОБСЛУЖИВАНИЕ КЛАВИАТУРЫ 


Сушествуют два способа созда- 
ния программ в нашинных кодах для 
юпроса состояния клавиатуры. Оба 
способа вполне приемлемы, но кон- 
кретный выбор одного из них 
завивит от типа программыы. 


5,1. Использование системной 
перененной ГАЗТ_КЕУ. 


В области памяти ПЗУ компью- 
тера "7Х-5рес4гиш" имеется проце- 
дура КЕУЗСАМ которая вызывается 
каждую 1/50 секунды для опроса 
состояния клавиазтуры и изменения 
соответствующих систенкых пере- 
менных. В случае, если будет на- 
хата произвольная клавиша, то 
установится 5-й бит системной 
переменной #1.А65 (23611  РЕС = 
ЭСЗВНЕХ!, сигнализирующий о Фак- 
те нажатия клавиши, а код нажатой 
клавиши запишется в системную 
переменчую 1.АЗТ_КЕУ. Есди хе не 
бущет нажата ни одна клавиша, то 
при каждом вызове процедуры 
,КЕУЗСАН будет увеличиваться на 1 
только значение системной пере- 
менной РЕАМЕЗ. 

Поскольку конанда процессора 
НАСТ приостанавливает выполнение 
программы до очередного ‘вызова 
процедуры КЕУЗСАН, то можно реа- 
аизовать в машинных кодах про- 
грамиу, ‘аназогичную по действию 
ВАЗТС-команде РАЦЗЕ О (см. листинг 
5.1). Эта програмна зациклена на 
непрерывной проверке 5-го бита 
систенной перененное Р.АС$ и, как 
только будет обнаружено, что этот 
бит вкаючен (т.е. после очередно- 
го нажатия клавиши), выполнение 


3993я 3895 


Э3 


Е 


Эээ 


096 23160 

ТО А, о 

САЫ, 8859 

ЕО 114+83),47 


10 А, 2 

САШ, 5633 
САМ. 3455 
10 11, 23296 


10 (4+0), г2 
10 {14+03), 16 
ТР 11, 23610 
10 А, 31 


12 (23298), А 


10 А, 10 
БО (23681), А 
САШ. ВКО 


10 1. А 
10 А, 19 
50 Ь 


10 (23297), А 


1 ^, а 

ГО (23681), А 
СА, ВО 
АПР А, 148 


10 (23301), А 


10 А, 4 

12 (23681), А 
САМ. ВО 

ЫР (23300), А 
р А, 02 

САШ, 5633 
р ^, гг 

В5Т 16 

1 А, (23297) 


1 А, (23298) 
РТ 16 

10 А, 147 
в5т 16 


172 Е, 23296 
р вс, 06 
САМ, 8252 
Гл А, (гз297Т) 
НС А 

Гр (2з297Т). А 
СР 21 


3% 82,12 


10 А, 153 


:регистровая пара 11 ста- 

‚ вовится указателем на 6у- 
;Фер принтера. 

;В буфер принтера помещаен 
:код 22 - код АТ. 

{Туда ме (со смещением +3 
;‚ помешаем код 16 - код ТИК. 
Восстановление 1% в ис- 
:ходное состояние. 

Счетчик столбцов экрана. 


{Текушую координату Х по- 
;нестили на ее место в 67- 
:фере принтера. ( 
‚Иножитеаь 10 дая кино, 
:Сожравяем его в 23681. 

; Вызов копии процедуры ЕН. 
: копия организована в 23905 
Случайное число. 


19-28010 - это У-коор- 

‚ дината позиции печати. 
;Заложили ее на свое место 
:в буфере принтера. 


;Нножитель при ЕН равен 2. 
ТЕТ (Ее) 

}ТЫТ (ЕНО"2) + 148 - выбор 
‚символа 90С - 148 или 149. 
‚Код печатаеного символа 

;‚ переносим в буфер принтера 


;Ннохитель при ВНП равен 4. 
ТИТ (ЕНОн4) 

‚Код цвета ТК 0...3 
‚;‚кКавал 2. 

‚Открыли канал экрана. 

: Печать кода 22 - АТ. 

; Координата 7. 

17-1 

:...АТ -и.... 
оордината Х. 

$ ...АТ Ч-И.Х 

; Сиквол 906 (СНЕ$ 197). 

; РРШЕТ АТ (1-1), Х: СНЕ® 147 


‚Начало буфера принтера. 
‚шесть кодов из буфера. 
3Печать серии символов. 
; Координата У. 


: УЕУ+1 $ 

Проверка на конец игрово- 
‚го поля по вертикали. 
‚Возврат на 12, если конец 
УНе ДОСТИГНУТ. 

;Код символа 006. 


ше. Необходимо при этом сразу же 


РТ.АСЗ для того, чтобы при очеред- 
юн вызове процедуры опять срабо- 
тала задержка до нажатия произ- 
вольной клавиши. 


5.2 Опрос клавиатуры, как 
внешнего порта: 
ЗНА, (С) 


Аналогично команде БЕЙСИКа 11, 
при этом способе проверяется со- 
стояние одной из половин ряда 
клавиатуры. Спецификация проверя- 
еного ряда находится в регистро- 
вой паре ВС, а код нажатой клави- 
ши передается в регистр.А. Так 
каждая половина ряда клавиа- 
туры включает по 5 клавиш, то для 
идентификации нажатой клавиши ис- 
пользУют С 0 по 4 биты аккумуля- 
‘тора. Нулевой бит соответствует 
внешней клавише ряда, а четвертый 
бит соответствует внутренней 
клавише полуряда клавиатуры. 

Все биты регистра А изначально 
Установлены и, если не нахата ни 
одна из клавиш, то значение ре- 
гистра А должно быть равно 255. 
Если хе одна из клавиш будет на- 
хата, то сбрасывается бит. соот- 
ветствующий этой клавише. Напри- 
мер, если будет нажата клавиша 
"0", то сбрасывается нулевой бит 
гистра А и значение этого ре- 
Гистра теперь будет равно 254. 
При этом способе можно определить 
одновременное нажатие более чем 
цной клавиши путем анализа битов 
аккумулятора. 

Этот способ оказывается весьма 
полезным для создания игр, в ко- 
торых участвуют два и более игро- 
ков. либо для организации переме- 
шения объектов по экрану одновре- 
менно в двух ‘направлениях. Одним 
словом, этин приемом пользуются в 
тех случая, когда надо обрабаты- 
вать нажатие пользователем второй 
клавиши при неотпушенной первой. 
В Програмне 5.2 показано, как 
осушествить задержку в выполнении 
програны до тех пор, пока не 57- 
дет нажата клавиша "О". 

Есть еше один случай, когда 
ЮпРОС клавиатуры как внешнего 
порта оказывается единственным 
рабочим приенон - случай, когда 
прерывания работы процессора 
отключены конанлой рт. 

Даже во время выполнения‘ Вашей 
собственной програмны, написанной 
в машинных кодах, 50 раз в секун- 
ду будет вызываться процедура 
КЕУЗСАН и, в результате, увеличи- 
вается время выполнения Вашей 
программы, Можно отменить эти 


СбРОСИТЬ 5-й бит переменной. 


РАБОТА В. НАШИННЫХ КОДАХ 
программы будет продолжено даль- 


Продолжение листинга 4.3 


НАШ. КОД АССЕНБЛЕР КОННЕНТАРИЙИ 
З2 05 5В 10 (23301), А 
ЗЕ 0Т 10 А, Т :;Белый цвет ТНК. 
32 04 5В ЪО (23300), А 
11 00 5В р БЕ, 23296 Начало буфера принтера. 
01 05 00 го вс, 06 ;Шесть кодов из буфера. 
ср зс го САБ, 8252 ‚Печать управляющих кодов. 
ЗА 02 5В Г А, (23298) ;Координата Х. 
зо РЕС А }ХЕХ-Е 
ЕЕ ЕЕ СР ЕЕ ;Х сравнили с -1. Г 
го 93 Е НА ЗЕсли еще не все столбцы 
‚обработаны, то возврат на 
; метку 11. 
с9 ВЕТ ; Возврат. 
ОВС 23905 
ЕО 4В 76 5С О ВС, (23670) :;Значение $ЕЕБ. 
ср гв го САЫ, 11563 ;Переносим его на стек. 
ЕР Е5Т 40 ;Вкаючение калькулятора, 
А1 зласк_опе 
ог ааа 
34 37 16 зтаск_пашьег копия системной проце- 
04 114 1Р1 У ДУРЫ ЕНО. Конмен- 
34 8041 00 00 80 зфаск_патьег тарий см. в 4.1 
з2 п_109_№ 
02 еее 
А, зкаск_опе 
03° зчыгаса 
31 Зир!1сафе 
38 епаса1с 
Со Аг г0 СА. 11682 
ЕР 43 76 5С 10 (23670), ВС 
ТЕ ГЛ А, (НЬ) 
АТ АО А 
28 03 К 2,13 
06 10 598 16 
17 О (Н.А 
ЗА 81 5С 1 А, (23681) ;Иножитель при ЕН. 
ср гз гр САТЛ, 11560 ;Понестили его на стек. 
ЕР Е5Т 40 ;Вкаючение калькулятора. 
04 1 1Р1У ; Умножение. 
2т 104 ;Выделение целой части. 
38 еюаса1с ;Выключение калькулятора. 
со 05 го СА. 11733 Перенос результата в акк-р 
с9 КЕТ Выход из процедуры ЕНО. 
Листинг 5.1 
АДРЕС НАШ. КОД АССЕНБЛЕР КОННЕНТАРИИ 
Окс 23760 
11 
23160 ЕО СВ 01 бЕ ВТ 5, (1У+) ; Проверка 5-го бита. систен- 
:ной переменной Е1.АС5. 
23164 28 ЕА В 2,11 ; Зацикливание на метку [.1, 
‚если никакая клавиша не 
: нахата. 
23766 ЕО СВ 01 АЕ — БЕЗ 5, (1+1) : Принудительное выключение 
:5-го бита, если клавиша 
; была нажата. 
237719 с9 БЕТ Выход из процедуры. 
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программы. используя 
Однако, это будет оз- 
что все прерывания запре- 
следовательно, нельзя бу- 
дет использовать процедуру 
1.А5Т_КЕУ для считывания состояния 
клавиатуры, т.е. команда {Я оста- 


В программе 5.3 показан поря- 
док работы при запрете прерыва- 
ний. 

‘Всегда помните, что перед вы- 


ходом из процедуры, где Вы ис- 
пользуете команду ОТ, необкодимо 
‚записать команду В1, разрещакщую 


прерывания. Попробуйте выполнить 
программу 5.3 без этой конанды и 
увидете, что из этого получится. 
Сброса программы не произошло, но 
компьютер “завис” и для того, 
чтобы клавиатура вновь заработа- 
ла; необходимо выключить и опять 
включить компьютер. 

Програмна 5.4 является анадо- 
гон БЕЯСИК-команлы РАМЗЕ п, т,е. 
позволяет остановить выполнение 
программы на заданный промежуток 
времени, либо продолжить выполне- 


основана на том, что сканирование 
клавиатуры происходит строго че- 
рез кахдые 0.02 секунды, а коман- 
да НАЬТ приостававливает выполне- 
ние программы до очередного ска- 
вирования клавиатуры. 


6. МУЗЫКАЛЬНЫЕ И 
ЗВУКОВЫЕ ЭФФЕКТЫ 


В этой главе мы расснотрим не- 
которые способы улучшения работы 
Ваших програми путем включения в 
них специальных звуковых эффектов 
или музыки. Но прехде мы должны 
разобрать способ представления 
чисел с плавающей запятой в ком- 
пьютере “2%-5ресагив”, а также 
способы записи этих чисел в уна- 
кованной Форме. 


6.1 Интегральная Форна ‘записи 
действительных чисел. 

Лрбые числа: цедые, пробные, 
положительные, отрицательные, мо- 
гут быть представлены в 5-байтной 
Форне, Первый байт в такой Форме 
записи числа определяет экспонен- 
ту, а оставшиеся четыре - мантис- 
су числа. Перевод обычной записи 
числа в 5-байтную Форму осушест- 
вляется в четыре этапа: 

1. Переводим число в его экви- 
валент в двоичной системе счис- 
ления. Например: 

11, 375 = 1011,011. 
напомиим, что в двоичной сис- 
тене счисления 


0,5 0.1 
0,25 :.0.01 
0, 125= 0. 001 


ит.д. 


р отионЕ РАБОТА В НАШИННЫХ КОДАХ 
чтобы сократить время 


листинг 5.2 


НАЯ. КОД АССЕНБЛЕР КОННЕНТАРИИ 


ОБС 23760 


01 РЕ ЕЕ 


ЕО ВС, 51458 Установка в ВС адреса 
‚внешнего порта, соответ- 
;ствующего верхнему правому 
: ПОЛУРЯА? Клавиатуры. 

;Ввод данных из порта в ак- 
; КУНУЛЯТОР. 

Проверка нулевого бита, 

; который соответствует 
‚внешней клавише полуряда. 
Если бит выключен, то кла- 
‚виша нажата, Следует воз- 
;‚ врат из процедуры. 


ЕО 18 ВА. ‹С) 


сват ВТ 0,А 


ВЕТ 2 


В противном случае состоя- 
; ние ожидания следует про- 
‚:попжить и вервуться на 1,1. 


листинг 5.3 


АДРЕС НАМ. КОД АССЕНБЛЕР КОМНЕНТАРИЙ 
Окс 23760 

23160 РЗ рт :Запрет прерываний. 

м 

23161 01 РЕ ЕЕ 10 ВС, 61438 ; Установка в БС адреса 
‚внешнего порта, соответ- 
;‚ ствующего верхнему правому 
:‚ подуряду клавиатуры. 

23763 718 НА, (С) ;вВвод данных из порта в ак- 
; кУМУЛЯТОР. 

23766 СВ 47 ВТ 0,А ; Проверка нулевого бита. 

237168 20 РТ 3 НА Если бит включен, то кла- 
;виша не нахата. Следует - 

к й :повторять проверку, 

езтто РВ ЕТ ;Разрешение прерываний пе- 
‚ред выходом. 

23711 с9 ВЕТ ;Выход из процедуры. 


Листинг 5.4 


АССЕНБЛЕР КОНИЕНТАРИЙ 


овс 23760 
10 вс, 500 


; Размер паузы 


НАСТ 


;Оставовка процессора до 
прохождения прерывания. 


23164 РО СВ 01 бЕ ВТ 5. (11%!) Проверка 5-го бита ‘систен- 
вой переменной РЬАС$5. . 
23168 20 05 8 2,12 Если 5-ый бит РЪАбЗ вкаю- 
:чидся, значит была нажата 
: какая-то клавиша и пауза 
; прерывается. следует пере- 
:жод на гг. 
23170 ов ОЕС ВС уменьшение счетчика. 
23111 78 1 А, В у 
2зтта в1 ос ; Проверка счетчика на 0. 
23713 20 РТ Зе Н7, 11 ;Если счетчик не обвулен, 
: то пауза продолжается. ' 
ь2 . 
23115 РО СВ 01 АЕ — БЕЗ 5, (1+1) ; Принудительное выключение 


;вятого бита 21.465. 
Выход из процедуры. 


ВЕТ 


1041 


ны РАБОТА В НАШИННЫХ КОДАХ 
ГУ Определяем зкспоненту - — 


числа. Дяя этого перемешаен деся- 
гичную точку влево или вправо, 
зюка ве дойдем до крайней единицы 


листинг 6.1! 
АДРЕС НАМ. КОД АССЕМБЛЕР КОННЕНТАРИЙ 


справа или саева. При этом счита- ОРС 23760 
ен число щагов перемешения. Экс- гз760 ЕЮ 5В 65 5С 1 ПЕ, (23653) ;В РЕ установили то, что 
нонента будет равна 128 плюс чис- ‚хранится в 5ТКЕНО, 
жо шагов. Есий двихение произво- 23764 21 ЕА 5С ЛХ НЕ, ДАТА В НЕ. - адрес наших 10-ти 
дилось влево, то оно считается ;‚ сайтов. 
попожительным, а есди вправо - то гзтет 01 ОА 00 0 вс, 10 ‚ :В В© - количество пересы- 
Юютрицательным. В нашем примере ;‚ паеных байтов. 
понучик после четырея магов гзтто ЕР ВО БЕ ; Переброска данных на вер- 
вправо: ‚шину стека калькулятора. 

; 1014011 г2зтта ЕЮ 53 65 56 1 (23653), 0Е :Переустановили новое зна- 
и, следовательно, экспонента рав- ; чение ЗТКЕНР. 
на 128+4=132. 23776 СО Рё 03 САМ, 1016 Вызов процедуры ВЕЕР. 
д 3. меняем состояние бита с9 ВЕТ ;Выхол. 


справа от десятичной точки в 
РЕРМ 125. Тб, 204, 204,204 ; Число 0.1. 
РЕРИ 132,48, 0,0,0 $ Число 11 


Листинг 6.2 


то его нано оставить включенным. АССЕНБЛЕР КОНМЕНТАРИЙ 
таким образом, этот бит будет 0юб 23760 
сигкализировать о знаке чисиа, О ПЕ, (23653) :В ОЕ установили то, что 

В нашем примере число бышо ‚ :жранится в ЗТКЕЕЛ. 
положительным и поэтому после Гр НЕ, ВАТА :В М, - адрес нашего 5-ти- 
смены состояния бита оно будет ‚байтного числа. 
иметь вил: 2 вс, 05 ;В ВС - количество пересы- 

; 00110410 ;лаемых байтов. 

4. Опредедяен `мактиссу чис- ОТР ;Переброска данных на вер- 
ша. Для этого, не обрашая внима- :шину стека калькулятора. 
вие на десятичную точку, добавим О (23653), ОЕ ;Переустановили новое зна- 
справа определенное количество ‚чение ЭТКЕЕНЛ. 
вулей, чтобы получить 32-х раз- 1 А, 11 ;В аккумуляторе число 11. 
рядное число. Теперь распределим СА, 11560 ; Число 11 помещено на вер- 
32 разряда чиспа между четырьмя ‚ ущину стека калькудятора. 
байтани и определин значение ках- САМ, 1016 {Вызов процедуры В 
дого байта: ВЕТ ; Выход. 


00110110154) 06000000 (0) 
90000000{0} 00000000 ‹0} 
Таким образом, 5-байтное ыы 
представление числа 11,315 будет в их 5-байтную Форму: кальктляторный стек число 11. ис- 
иметь вид: О. 1=125 75 204 204 204 пользуя регистр А. 


РЕРМ 125, 76, 204, 


04, 204 ; Число 0.1 


132 54 ооо 11 =132 48 о 4 
Если Вы хотите проверить все Теперь необходимо передать 6.2 Упакованная Форма записи 
зышесказаниое, то Вам необкодимо последовательно эти 10 байтов на пействительных чисел. 
ввести короткую программу, позво- калькуляторный стек. Как это сде- Теперь познакомимся с записью 


пярщую считывать 5 посаедователь-  лать, показано в программе 6.1. чисел с плавающей запятой в упа- 
вых байтов (например, через РЕЕК) Здесь используется команда пере- кованной Форме и с использованием 
#з участка памяти, где записаны дачи блока ГОТ. При этом в ре- кода калькулятора 520ЕС для рабо- 
переменные ВАЗТС-програнмы. Зна- ГИСТРОВУЮ пару Н. записывается ты с числами. находящимися на 
чения переменных в этой области адрес начала этих 10 байтов в  калькуляторном стеке в этой Фор- 
жранятся именно в 5-ти байтной памяти, а в регистровую пару БЕ - ‘ме. ы 

форне. адрес вершины стека, который по- Перевод ‘5-байтного числа в 
Теперь вернемся к гланной те- стоянно хранится в системной  упакованную Форму включает в себя 
ме этой главы. Операнды ВАЗтС-ко- переменой 5ТКЕНЬ (23653). В спедующие этапы: 

“авды ВЕЕР. определяющие ддитель- регистровую пару ВС записывается 1. Начиная с пятого байта, 
мость и товадьность звука. запи- число перемешаеных байтов. Пропе- убираем все числа, равные нулю до 
сиваются в калькуляторный стек. дура ВЕЕР извлекает два числа в тех пор, пока ие выйдеи на нену- 
Калькуляторный стек оперирует и  5-байтной Форме с вершины стека и левое число или не достигием вто- 
хранит числа, записанные именно в адрес вершины стека восстанавли- рого байта 5-байтной записи чис- 
5-байтвой Форме. Поэтому. чтобы вается, т.е. становится таким ла. 

вацисать програмну в машинных же, как и до записи туда чисел. г. Определяем число удаден- 
кодак для получения звука иди му- Другой способ передачи чисея ных байтов К и рассчитываем число 
зыки, несбжодимо значение этих на стек калькулятора основан на #8 3з-к 
снераниов занести в калькулятор- использовании команды 10 А, ци 3. Вычитаен 80 из числа, 
ный стек именно в 5-байтной Фор- процедуры Пзу 5ТАСК_А, накодя- записанного в первом байте м, 
ме. шейся по адресу 11560, если пере- если результат больше или равен 


Пронедура БЕЕР, находящаяся по  цаются целые числа в диапазоне 64, то переходим к п. 6. 
алресу 1016. извлекает эти два 0...255. 4. Неняем зиачение экспонея- 
числа с , калькудяторного стека и Если надо передать целые числа ты (число в первон байте) на чис- 
воспроизводит звуково сигнал в из диапазона 0...65535. то можно’ ло: экспонента нинус 80 паюс я*64 
косответствии со значениями этиЕ воспользоваться переброской через $. Переходим к н.тТ. 
чисел. Например, для поучения ‚регистровую пару ВС и вызов про- 5. Экспонента числа заниизет 
эффекта, аналогичного конавде  цедуры ПЗУ ЗТАСК_НС/ ваходяшейся г байта. Значение первого байта 
БЕЙСИКА _ ВЕЕР. 1,51, необходимо . по адресу 11563. В програнме 7.2 ` равно &#64, а второго 80. 
числа 0.1 и 11 вначале перевести показано, как можно передать в т. записываем оставшиеся 
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нодиФицироваивой 


для выполнения обратного пе- 
рехода необходимо: 

1. Разделить значение перво- 
го байта на 54. 

я г. Если будет остаток от де- 
ления, то экспонента будет равна 
80 + остаток. 

3. ЕСсЯи остатка от дезения 
за 64 не будет, то экспонента 
тавна 80 паюс значение второго 
Йбакга 

4. Частное от деления на 64 
используется дая определения ко- 
мнчества последующих байтов. Это 


для числа 11 
кованная Форна имеет вид: 
52.48 

делим 52 на 64 и получаем: 
частное : 0. а остаток = 52. зна- 
чит, посде экспоненты, равной 
30+52=132, следует только оф 
1} байт. В упакованной Форме запи- 
си он равен 48. Следовательно, 


упа- 


5-байтная запись числа 11` будет 
иметь вил: 
13а 48 о 0 о 
Програнма 6.3 показывает, как 


При этом значения длитель- 
вости и тональности звука подают- 
ся не на стек калькулятора, а со- 
ответственно в регистровые пары 
ФЕ и Н.. 

Программа 6.4 показывает, как 
можно програнмно менять тональ- 
ность звука, используя пропедуру 
ВЕЕР в цикле. При этон будет не- 
вяться и длительность. потому что 
длительность звучания  явияется 
Функдией значений записанных в 
РЕГИСТРОВЫЕ парах НЕ, и ГЕ. 

существует еше один метод 
воспроизведения звука в компьюте- 
Прах бресфгию. Для этого нужно 
частоту смены высокого и 
нмзкого уровня пия каждой ноты и 
ютиравлятъ сигнал прямо на дина- 
ник, минуя процедуры 13У. Этот 
метод можно использовать в игро- 
вых програннах для создания “бе- 
мого шуна“. эффекта взрыва и т. д. 
Ри этон используется команда 
Ю0Т {254}, А. Причем этой командой 
можно ие только управлять работой 
динамика, но и менять цвет ранки 
экрана {двет ВОВрЕВ). 


1. Есаи тодько нулевой бит ре- 
гистра А включен, то ВОБОЕК - 
синий. “ 
2. Есши только первый бит ре- 
гистра А вкаючен, то ВОВОЕЕ - 
красный. 

3. Если тодько второй бит ре- 
гистрРа А включен. то ВОЮРЕЕ - 
зеденый. 

4. Если бит 4 регистра А вклю- 
чен, 


что если периодичес- 
ки менять состояние 4-го бита 


Овб 23760 
23160 ЕР Е5Т 40 
23761 34 ЕШб 4С СС СС СС зак_даза 
23767 38 34 30 з4к_даза 
23770 38 епдса1с 
23171 СО Р8 03 САЫ, 1016 


ВЕТ 


АДРЕС НАШ. КОД АССЕМБЛЕР. 
овЕ 23760 
23760 05 ЕР ЬР В.255 
23762 21 01 00 ьр нЕ, 1 
ТООР 
23765 11 01 00 ЦО БЕ, 1 
23168 Е5 РУЗН Н, 
23169 с5 РО5Н ВС 
23710 со в5 03 см. 949 
23713 С1 РОР ВС 
23114 Е! РОР НЬ 
23115 23 18С и. 
23116 10 23 р.7472 100Р 
23118 с9 ВЕТ 


‚включение калькуаятора. 
‚На стеке 0.1 

‚На стеке 0.1, 11 
;Выключение калькулятора. 
;Вызов процедуры ВЕЕР. 

; ВЫХОД. 


Листинг 6.4 
КОНИЕНТАРИИ 
; инидиализация счетчика. 
инициализация высоты тона. 


; Инициализация плительности 
; звука. к 

‚Надо предохранить НЫ и ВС 
‚от поРрЧИ процедурой ВЕЕР. 
:Вызов процедуры ВЕЕР. 


; Повышевие высоты тона. 
‚Повтор цикла. 
Выход из процедуры. 


О А, «НГ 


регистра А и использовать команду 


001 (254},А, то частота звука из 
динамика будет пропорциональна 
частоте смены состояния 4-го 
бита. Для создания “белого шума” 
пермод чередования состояния 4-го 
бита должен быть случайным, но 
при использовании стандартной 
процедуры генерации  саучайных 


чисел, программа будет выполнять- 
ся слиюком  недленно. Поэтому 
лучше использовать в качестве 


случайных чисел содержимое в ка- 
ких-то ячейках паняти и, тем са- 
мым, переключать уровень сигнала 
на динанике (см. программу 6.5). В 
этой программе в одном цикле 
трижды используется команда 
СТ (254).А ‚а 

также ряд команд НОР, что необхо- 
Дино для‘ создания врененной за- 
держки. 

Длительность звука ограничена. 
для этого используется команда 

СР 60 


цвет ВОКРЕЕВ также меняется 
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23164 оо ВОР ; Цауза. 

237165 23 РЕ ОТ (25%), А : Выдача сигнала на динамик 

23767 00 КОР 

23768 90 ВОР 

23769 03 РЕ СОТ (25%), А 

23771 00 НОР 

а2зтте оо НОР 

23173 23 РЕ СОТ (25). А 

23115 00 ВОР 

2зтт6 23 18 в. ; Переход к следующей ячейке 
; ПЗУ. 

23111 тс О А, Н 

23718 РЕ 3С СР 60 ;Проверка на конец работы. 

23780 20 © Л Ша :Возврат к началу цикла. 

23182 с9 ВЕТ Выход из процелуры. 


листинг 6.4 
КОННЕНТАРИЯ 


:Ны начинаем брать данные 
зы *белого шуна” пряно из 
зу. 


: Очередной байт из ПЗУ. 


случайным образом. Чтобы этот 
цвет оставался постоянным, необ- 
ходимо переписать биты 3-5 с сис- 
темной переменной ВОБРЕК в биты 
0-2 регистра л^. 

Есаи Вы хотите поэксперииенти- 
ровать с созданием нузыки, ис- 
пользуя этот метод, то Вам необ- 
ходимо помнить. что кавдую 1/50 
секунды Важз програниз будет пре- 
рываться процедурой сканирования 
клавиатуры, поэтому, чтобы сохра- 
нить частоту звука, необходимо 
в начале программы запретить пре- 
рывания командой 01, а в конце 
программы вновь разрешить их ко- 
нанлой ЕТ. Кстати, именно поэтому. 
невозможно прервать выполнение 
команды ВЕЕР клавишей ВБЕАК. 

помните также; что в игровых 
програннах звуковые эффекты не 
должны быть слишком. длинными, 
т.к. на это время ножет приоста- 
навливаться движение персонажей. 


{Продолжение следует) 


Нам пишет Галунов В. А. ; 
Расскажите, похалуйста в 
2Х-РЕВЮ-93" о спрайтах; что это 
такое (формулировка). Как их 
хранить в памяти, как ими поль- 
зоваться и как создавать. Расска- 
жите, похадуйста о нультиваика- 
ции. Если Вы намечаете осветить 
эти воПРОСЫ В своих книгах о 
графике "Спектрума", то большое 
спасибо. .. 

ВФК: Спасибо Ван, уважаемый 
читатель за хороший вопрос. Дей- 
ствительно, все о спрайтах войдет 
„|в третий тон "Графики Спектрума”, 
который называется “Динамическая 
графика” и работа над которым 
сейчас близится к концу. 

КОРР: Все Ваши книги я с 
радостью покупаю и буду покупать. 
ИФК: После этих слов хочется 
Работать, работать и работать. 

‚ КОРР: . Да, кстати. 


грамм под ТК-00$ и о нногом дру- 
гон, связанном с этой системой, 
ведь все большее и большее Число 
пользователей приобретает диско- 
Воды, 
иФфк: к сожалению все большее 
число пользователей уходит не 
только в 'ТК-005, но и еше дальше 
- на работу с 1ВИ-совместимыми 
нашинани. Поскольку ны всегда 
думаем не только о завтрашнем 
дне, но и © послезавтрашнем, то и 
сани постепенно дрейфуен в том же 
направлении. Т.е. все меньше аю- 
дей остаются на “Синклеровском” 
фронте и нам бывает трудно объи- 
мать необъятное. 

Тем не менее. нет никаких про- 
блем для того. чтобы печатать на 
наших страницах те материалы, 
которыми, готовы поделиться наши 
читатели, и для ТЕ-0О$ мы всегда 
дадим зеленую улицу, если такие 
энтузиасты найдутся. 

КОРР; И еще один вопрос; как 
снять со стека калькулятора чис- 
ло, чтобы работать с ним в ма- 
шинном коде? 

ИФК: Поделимся простым прие- 
ном. Если Вы вызоветё калькулятор 
[из наш. кода командой В5Т гвн, а 
потом тут же выйдете” из него 
конандой РЕРВ 38Н (еп4_са!<), то 
В результате этого автонатически 
в регистровой: паре Н, установится 
значение, равное 5ТКЕКО -5. Такии 
образом, Ваша регистровая пара Ни. 
укажет на начало пятибайтного чи- 
сала. хранящегося на вершине сте- 
ка. Далее байт за байтом Вы "про- 


шелкаете", что там есть и пере- 
гоните его туда, куда Вам надо и 
так. как Ван надо. Надеемся, что 
с форматом записи таких чисел Вы 
знакомы, а если нет, то надеемся, 
что  заказанная Вами литература 
дошла успешно и Вы этот вопрос 
разберете. 

Это, так сказать, теория, а на 
практике Вам вряд ди когда зако- 
чется обрабатывать вне калькуля- 
тора действительные числа с пла- 
зающей точкой. Скорее всего, Вам 
и нужно-то взять оттуда целое 
число в диапазоне от -65535 до 
+65535. А раз это так. то можно 
сделать еше проще, воспользовав- 
шись готовой процедурой ПЗУ. ко- 
торая называется ЕР_ТО_ВС и нахо- 
дится, по адресу 2РА2 (11682 ПЕС). 
Вазовом этой процедуры Бы окрУГ- 
плите то число, которое есть на 
вершине стека калькулятора ло пе- 
лого и перегоните его в регис- 
ТРОВУЮ Пару ВС, после чего можете 
делать с ним все, что хотите. 

Как Вы понимаете, не всякое 
действительное число может быть 
“вТиснУТо” в такие ограниченные 
рамки. Нолет быть, оно туда и не 
*влезло” и процедура не сработа- 
ла. Чтобы узнать 06 этом, надо 
после вызова процедуры ЕР_ТО_ВС 
проверить состояние некоторых 
флагов регистра РЕ. 

Если результат слишком велик, 
т.е. больше 65535. то процедура 
включает флаг переноса САВКУ. 

© том. что число отрицательное 
сигнализирует выключенный Флаг 
нузя - Флаг 2ЕБо. 


Нам пишет Д. Зайцев из Пензы: 

Я провел небольшое исследова- 
ние программы МАТЕ. Байты 16 к 
17 - это внутренние часы игры. 
Только по определенным значениям 
этих байтов Ван предлагают выпол- 
нить миссии. ,,. 

иФк: напомним читателям, 
речь идет о байтах отгружаеного 
блока при сохранении состояния. 
Байты 16,17 не были идентифициро- 


ваны ранее (см. 7Х-Р-92, Н 5,6, 
СТР. 123, 124). 

КОРР:... Например, если за- 

” спать в 16 байт число 31, то пос- 


ле гипреперехода Ван предложат 
выполнить первую миссию. Если хе 
записать в этот байт число 128, 
то Вам встретятся корабли-неви- 
димки. При этон байт 93 должен 
быть обнулен (он свидетельствует 
© наличии на борту  СОАКТС 
РЕУТСЕ). Это надо сделать, потому 
что если тан находится число 67, 
то ини первую, НИ ВТОРУЮ миссию 
Вам уже не предложат. Числа, ко- 
торые должны быть записаны в 16 и 
11 байты для перехода к третьей 
миссии мне неизвестны, Т.к я 
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‘кодитесь. 


что‘ 


имею рейтинг РАЯСЕРОИ$ (в байтах 
с 13 по 15 у меня числа 175,г.9). 
Теперь о неизвестных байтак 
71-18, По моему ннению, это дан- 
ные о планете, на которой Вы на- 
К примеру, 73 байт - 
это техническое развитие планеты, 
Неизвестный 9г-ой байт - это 
байт, отвечающий за третью нмис- 
сию. Если Вы запишите в него чис- 
ло 1 или 2, то Вам предложат ее 
выполнить. Если Бы установите в 
этон байте число 3, то миссию Ван 
уже предложили. и Вы ножете лететь 
взрывать станцию, захваченную 
Таргонами, 
чнниниикиикиияуикииииикаяниииники 


Нан пишет пишет Пушкарев Алек- 
сандр Николаевич из г. петропав- 
ловска-Камчатского: 

Я по поводу МЛТЕ. Копаясь в 
ЗЮУЗТТСК СЗ - версии я нашел 
один интересный РОКЕ 39517,0. Он 
отключает расход энергии. самое 
интересное, что теперь можно без 
ограничений использовать СтОАЕТНС 
РЕУТСЕ, которое из малополезного 
УСТРОЙСТВа, — ЗРЯ раскодуюшего 
энергию, превратилось в очень 
полезную вешь. 

ЕШе я решил исследовать один 
вопрос, а куда же летят все ко- 
рабли?.., 

ИФК: Ны страшно горды тем, что 
вкус к исследовательской работе 
стая характерной чертой истинного 
*синклериста”. —, 

КОРР: ... Все корабли — летят! 
со скоростья 0,5 максимальной и 
направляются ` они к звезде, где 
бесследно исчезают. Обычно я при- 
страивался в хвост и, уравнивая 
скорость и курс. плелся 
следом. Интересно, что 
выключал СТОАКТНС РЕМ1СЕ, 
резко набирали скорость и взныва- 
ли вверх. й 

ИФК. : Еше бы! Кому же приятно, 
когда у него на хвосте сидит кор- 
респондент “2Х-РЕВЮ“! 

КОРР: Исспедовал я и вопрос, 
почему не у всех получается за- 
правка топливом у звезды. дело 
это непростое и требует аккурат- 
ности. Надо подлететь к звезде 
перпендикулярно, снизить скорость! 
до половины и ждать. когда датчик 
температуры поднимется тоже до 
половиин. Только тогда. появится 
сообщение © заправке. 

решил я попробовать и “Грязный 
бизнес" - торговаю наркотиками. И 
вот, что оказалось: Примерно че- 
рез 10 - 15 перелетов при входе 
на станцию корабль оказывался за- 
хвачевным пиратами. И никаких 
КОМПРОМИССОВ, ЭТО ПРОИСХОДИТ ВСЯ- 
кий раз. Пираты подстраивают ло- 
вушки дельцам, занимающимся гряз- 
ным бизнесом НЕПРЕРЫВНО. 

ИФК: Блеск! Если бы Вы знали, 
сколько килограммов писен с жало- 


тов мы получаем. — оказывается, 
"кто-то кое-где у нас порой” 
ведет себя в космосе не по-хрис- 
тиански и бывает заслуженно за 
это наказан. Особенно нас обрадо- 
вало в этом’ сообщении то, что 
такую гипотезу мы выдвигали в 
одном из ранних выпусков "РЕВЮ" и 
‘теперь она подтвердилась. 

КОРР: Хочу также отметить одну 
особенность 3ОУ5Т1СЕ-СМЛВ-версии: 
здесь очень часто встречаются 
“Кобры” и Ни разу не видел ни 
одного корабля “АБРЕВ". Наверное, 
их заменили на “КРАТТ". ` 

Хочу также поделться с читате- 
ляни несколькими  разысканными 
мною РОКЕЗ. 

РТ77Я 3 - 63001,0 (РЕС А). 
ТОТ (разе 1)-50297.0 

ТОТ (разе 3}-49693, 0 

ТОТ (РЕазе 4) -49485, 0 

АТ_МАВ а - 48831, 255 (1.0 А, п) 
СОР ОПТ - 32811,255 

НТИЛА СОНМАНОО -290Т6, 255 
С_ТВАЗЕЕ - 

загрузить в #6148, #888ВА, 

#В0СО - число не более 9. 

Програнма выполняет 

проверку! 

9. ТНОЯ (.а3% Сгизаве) 
Блок цлиной 20992 (45200) 
загрузить начиная с #6000. 
После этого: 
#0ЕРО, О (не убывает оружие) 
#А044,$3С (доагая жизнь) 
ЗАОЕЗ, #3С 

10. ПРАСОНИ$ - 64215, 0 

11. ЭНОСЕ МАУ - загрузить стан- 
дартно, а затем: 
#в4гт, 0 ; яв4гв, о. 

Во многих современвых играх 
найти `РОКЕЗ для "бессмертия" че- 
рез аккумулятор не удается. В 
программах, например  ОБАСОНИ$, 
ЗНОСК МАУ иодр. не используется 
операция БЕС А. Вместо аккунуля- 
тора работает регистровая пара 
Н:. Выглядит это примерно так: 

1.0 А, п 

10 (адрес), А 

ГР НЕ, (адрес) 

РЕС НЬ 
Для обессмерчивания игр я ис- 
пользую МОНИТОР МЕ88Н++, который 
загружается в экран, благодаря 
чему можно грузить Файлы любой 
длины, кроме тех, которые сани 
тоже грузятся в экран. Обессмер- 
тив игру, я выгрухаю ее или здесь 
зе и запускаю. 

ИФК: Спасибо, Александр Нико- 
паевич! С нетерпениен жден новых 
ОТКРЫТИЙ. 


ииииииниининиккиииииииимиииничиик 
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Нам пишет Алексей Березин из 
г. Колпашево. Томской области: 

Я подписался на Ваш журнал в 
1991: и в 1992 г.г. и теперь с 
удовольствием отнечаю, что не зря 
потратил деньги. Особенно мне 


бани на неэтичное поведение пира- [тож] 


нравится раздел РОБИН. .. 

ИФЕ: Спасибо, Андрей! Ты уже 
понял, что после принятых мер он 
будет еше более оживленным и на- 
деемся, что теперь он тебе понра- 
вится еше больше. 

КОРР: Кроме’ того, сам я 
ненного хаккер и люблю вскрывать 
разные игры. Мие даже удалось 
переделать игру ГОРЕВОННЕК. Пере- 
делал я не только УРОВНИ. НО и 
персонажей. 

Весьма заинтересовала меня Ва- 
ша классификация версий программы 
“ЕРТТЕ“, данная в номерах 3,4 за 
1992 г. сам я давно пользуюсь 
версией, помеченной джеком о’ лан- 
териом (Таск О’Газр4егп ргезер1з), 
а недавно я нашел и версию 30у- 
311СК С1аЬ’а. Теперь имею вознох- 
ность сравнить их. 

Во-первых. сразу после загруз- 
ки версия .С. выдает надпись 
Ргезз расе, Сошвапаег, а версия 
5. 0°1. - надпись “Гоаа Нем сот- 
вапаег Уез ог Но?" 

Если нажать ‘“У" и выгрУЗиТЬь 
ситуацию, а потом войти В игру, 
то Вам дают несколько миллионов 
кредов. статус Рия141уе. рейтинг 
ЕБТТЕ, а корабль забросят в 4Т-ю 
галактику, да к тому хе сразу 
предложат и первую ниссию (спасти 
беженцев). После этого Вы попаде- 
те в 8-тю галактику, причен если 
совершить оттуда нехгалактический 
перелет, то Вы попадете в первую 
галактику, но ни одной знакомой 
звезды там не увидите. нет тан ни 
ГАУЕ. ни ТТОНТЗЬА, нет к сохале- 
нию и планеты КАХХЕА: 

Во-вторых, в версии 7. 0’1 от- 
сутствует корабль ЕВА!Т, но дока- 
зано, что сушествует ЗТЕАНСЕВ, 
похожий на астероид. ., 

ИФЕ: В свое время мы о нен 
неоднократно упоминали. 

КОРР: Я неоднократно встречал 
этот “объект” в 1-ой галактике 
нехду планетами ОМЕТЖА и ГАРАГЕ и 
около ТТОНТ5ЪА. Если начать стре- 
лять в него, он выпускает 2-5 
"Сайдуиндера" или “Эддера". 

В-третьих, корабли “Сайдуин- 
дер", “Эддер“ и, возмохно, “Эсп- 
Нк-2" здесь всегда пираты. Виро- 
чем, насчет “”Эспа" я не совсен 
уверен. хотя, кажется, ни разу не 
встречал МИРНО настроенного 
*Эспа“. 

Захваты пиратами в версии 
5. 0*Ь. очень редки. Со мной такое 
ПРОИЗОШЛО ЛИШЬ ОДИН раз... 

иФк: Это не Факт. Возможно, 
что Вы просто веди цедонудренный 
образ жизни и Вас не за что было 
наказывать? 

КОРР: Вокруг станции всег- 
да пустынно и ие летают дахе по- 
лицейские "Байперы"”. Таргоны, ес- 
ли встречаются, 
одиночке. В версии 4. 0*1.. 


летают всегда по- 
работа- 
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ют все РОКЕЗ, напечатанные Вами. 
Также хорошо проходит. заправка 
топливом от звезды. 

В заключение хочу предложить 
собственную разработку описания к 
програмне ВТСЕ ПАНСЕВОЦЗ, некото- 
рые РОКЕЗ и несколько. "жучков". 

Некоторые РОКЕЗ. 
1. СОЗА НОЗТЕА - 39717, 0 


2. ВЕХ-1 - 39402,0; 40057, 0 

3, ВЕХ-2 - 39116, 0; 40303, 0 

4. В1СЕ БАН. - 58356, 0; 64075, 0. 
й 64166, 0 й 

$. ЗТАБ ВОННЕК - 49560, 183 

6. 0127У-3 - 302173, 182 

71. 0127\-4 - 63001, 183 

8. РУНАНТТЕ РАН- 29002, 182 

9. РАРЕЖНЕТТ-3000 - 30818, 0 


Некоторые пароли. 


ЕВЕООУ-2 897653 
НУР505-2 РОМ $ $ АРТ 
РНАЯТ!5-2 18757 
ТЕЧЕНО-2 270653 
МАУУ МОУЕЗ-2 63123 
САМЕ ОУЕК-& 1802 
ВЕХ-& 8980818908609407Т 


Некоторые секреты. 


{. СНЕОНО$ -`В таблице лучших ре- 
зультатов набрать большими 6у- 
квами слова : МНС ТТ ВАВУ - 
получите супер-лазер. 

2. ПБОМЫ ТО ЕАВТН - при игре нах- 
мите одновременно клавими 2, 3, 
4,5 и, удерживая их, нажиите 
1. загорится надпись “РЕАНЕТ 
СТЕАБЕО” и Вы перейдете на 
следующий уровень. 


ИФК: БОЛЬШОе спасибо, Алексей. 
Ну какой же “синклерист“ откажет- 
ся от свежего РОКЕ. Без хорошего 
РОКЕ компьютер сирота. Я 

Правда, с описанием В.Г. ны, 
пожалуй подождем. Знаете ли, игра 
ведь в общем-то аркадная и требу- 
ет не столько работы головой, 
сколько пальцами. Так что вроде’ 
бы и описание для нее не очень 
КРИТИЧНО. Хотя все равно спасибо 
за труд, особо отметим, как крРа- 
сиво Вы его распечатали. Г. 

Если сможете “раскрутить” что- 
либо требующее специальных зна- 
ний, 


ух о стратегических програмнах, 
нашим восторгам не будет предела. 
Хлем контакта. 
чииниинииикикиикиииииминикииииии 

Нам пишет чЧугайнов А.Г. из 
Владивостока. Г 

ОГРОМНОЕ спасибо всем. кто пи- 
шет “ИНФОРКОНУ" в раздел “Форун“. 
нне очень помогли Ваши советы, а 
особенно РОКЕЗ. .. 
ИФК: Боже! Как Вы правы! ведь ес- 
ли кону и говорить спасибо, так 
это нашим читателям и корреспон- 
дентам, которые четыре года под- 


Е УВЕЗ ИЕР 


держивают наше общее дело и доб- 
Рыни словами и полезными советами 
и, что грека таить, материально. 
Сейчас ведь без крепкого рубля в 
кулаке ни строчки не напечатаешь. 

КОРР: к сожалению, я не 
вашел пока ничего для своих люби- 
мых игр ТЕЧЕНО_г и САМЕОУЕК_г. ВЫ 
ведь знаете, некоторые Фирменные 
ИГРОВЫЕ програмиы делают в нес- 
кольких частях, а если вторая 
часть. зашишена ‘паролем, то не 
удается войти в программу. Вот с 
‘такой пробленой я столкнулся... 

ИФК: Здесь нам трудно удер- 
заться от того, чтобы не поставить 
мегабайт восклицательных знаков. 
Смотрите предыдущее письмо! ! ! 

КОРР; ...И еше. Недавно я ‘до- 
стал 4 программы из серии 0122. 
Программы адвентюрные, а значит 
очень интресные. .. 

ИФК: Не совсем так. Это не ад- 
вентюрные программы, а аркадно- 
адвентюрные. Но они действительно 
безунно интересные и, кстати, 
далеко не самые сложные, посколь- 
ку все действия в ник довольно 
корректно логически обоснованы. 
Кстати, тех любителей этого жан- 
Ра, которые планируют переходить 
на уви-технику, должны предупре- 

ть, что там этот жанр представ- 
лен весьма и весьма слабо. Там 
развитие программного обеспечения 
идет по другин направлениям. У 
нас Коллекция немалая, порядка 
1000 програмн, но ны испытываем 
Грусть и ностальгию из-за нехват- 
ки аркадных адвентюр. Пока мы 
знаем их не более десяти, 

КОРР;... 
ловину прошел, только про некото- 
рые предметы не знаю, для чего 
они, а за остальные пока еше не 
брался. Не могли бы Вы напеча- 
тать в "2Х-РЕВЮ", как пройти. эти 
програнмны. 
дорогие читатели. Здесь 
есть масса проблем. В принципе, 


конечно, это ножно сделать. Мы и 
сани их прошли, да и писем от 
тех, кто это сдепал, накопилось 
немало. Несколько человек уже 
прислали свои проработки этих 
программ, еше больше получено 
предпожений. 


дело в другом. Вы знаете клят- 
ВУ Гиппократа - “Не сделай боль- 
ному хуже". Ны уже двадцать раз 
могли бы опубликовать технику 
прохода этих программ, но есть 
какое-то сомнение, которое мы ни- 
как не можен перешагнуть, ведь 
после этого будет утрачен весь 

рес к игре. В общем, нет у 
нас пока такого законченного на- 
териала, который мы не побоялись 
бы опубликовать, а дать список 
”кинтов" было бы просто насилием 
Бад интересными програмками, тем 
более что по рынкам страны и так 
ходит штук двадцать разных  Кус- 


Первую часть я напо-. 


тарных сборников "кинтов". 
давайте мы поступин так. Вы 
знаете. что ны начали эксперимен- 
ты над новым жанром “Компьютерной 
новеплы”. Если у нас это дело 
пойдет, то в выигрыше будут все, 
кто любит игры и тогда, может 
быть, ны сможен перешагнуть через 
тот груз ответственности, который 
сейчас вяжет нас по рукам и но- 
ган. 
икикиинииииииииииикиииинякикикиии 


Нан пишет Денис Садошенко из 
Г. Днепропетровска; 

Здравствуйте, коллеги! 
Очень обрадовался я заглянув на 


211 страницу выпуска 9-10 *2Х- 
РЕВЮ"-92. Как Вы понимаете, тан 
было описание игры ВЫТЯКУ” 3,  лЮ- 


безно проверенное Вашин редакто- 
ром. Результатом я вполне удов- 
летворен, хотя все же некоторые 
нрансы имеются... Но я очень рад, 
ведь это мое первое сочинение и 
первая его публикация, 

ИФК: Спасибо денис! Будем ра- 
ботать еше лучше. Кстати. вату 
работу почти не пришлось редак- 
тировать, Вы пишете очень хоропо. 

Позвольте высказать только од- 
но пожелание. Когда Вы пишете но- 
веллу, то перед Вами, очевидно, 
возникает образ человека, играю- 
шего в ЭТУ игру. Попробуйте за- 
ненить этот образ на человека, 
КОТОРЫЙ В. ЭТУ ИГРУ не играет и 
вообще ни в какие игры не играет, 
да и компьютера у него викогда не 
было. Попробуйте сменить акценты. 
На первон месте поставить не за- 
дачу дать необходимые подсказаки, 
а просто заинтересовать его иг- 
рой, а подсказки по-возможности 
запрятать где иносказаниен, где 
ВСТРОИВ ИХ В какой-либо диалог, 
а где только нанекнув на них. По- 
Сснотрите, что тогда получится. 
конечно, это только мнение и оно 
никак не должно ограничивать Ваше 
творчество. 

Недавно у нас был очень инте- 
ресный опыт именно такой прора- 
ботки. Ны в несколько рук "рас- 
КРУТИЛИ" ИГРУ “ТНе Еуе 0# Вево!- 
дег” (это для  1ВМ-совместиных 
машин) и передали ее для публи- 
кации нашим коллеган в журнал 
*НОНИТОР”. выйдет она в июне- 
июле. Если сможете достать этот 
журнал. почитайте. не пожалеете. 
кстати, там почти в каждом номере 
есть наши статьи по игровому по. 

КОРР: ... Скоро Ваша копилка 
пополийтся еше одним описанием, 
скожем с ЫЛИКУ”з - это сериал 
0172 с 1 по 6. Это та же конпью- 
терная новелла, так хе нравится 
НоиН дрУЗЬЯН и знакомын. 

ИФК: Ждем с нетерпением. Ножет 
быть, наконец-то это именно то, 
на что ны никак не ножем  решить- 


ся!? Такой сериал нам сейчас был 
бы очень кстати, поскольку нам 
редактор раздеаа “конпьютерная 
новелда”“ сейчас очень занят рабо- 
той над сериалом 5РЕЛВОЮНО - 
ЕНТСНТ ТУМЕ - УТОЮМВЕТНСЕР, а те, 


кто знают что такое адвентюрные 


игры, понимают, насколько 
эти программы 

КОРР; Я хочу предложить Вашему 
вниманию список адвентюрных игр, 
которые я знаю. Понятно, конечно, 
что здесь присутствуют далеко не 
все. Ножет быть Вы его опубликуе- 
те? Пусть читатели "РЕВЮ" его до- 
полнят. 

ВФК: Мысль интересная, Такин 
способом ножно определить наличие 
игр этого жанра, инеюнших кождение 
по СНГ. Правда, в вашен списке 
нет названий Фирм и этот недоста- 
ток сушественен, поскольку многие 
пополняют свои игротеки не по 
названиян игр, а по Ффиркамн. Точ- 
но так хе, как Вы собираете себе 
библиотеку по олюбинын авторам. 
Где смогли, мы дали названия Фирн 
от себя, 


КРУТЫ 


ИГРЫ ЖАНРА АБУЕНТОКЕ. 


АРТЕК5НОСК 

АРУЕЕТОВЕ 1 

АБУЕНТОКЕ “А” 
("РЕАНЕТ ОР РЕАТН”) АГА1С 


Тилегсер4ог 
Адчепхиге 


ТНЕ ВОбСТТ СВЬ 

ВОКЕР ОР ТНЕ В1НС5 Фе1ча 4 

ТНЕ СНАГГЕНСЕ Тешрфа+100 

РООНПАЕК*$ ВЕУЕНСЕ Веуопа 

РАУУ ЗОНЕЗ ГОСКЕЕ 7. Боскегьу 

РЕАКЕНЕН & ТНЕ СНАНВЕЕ 

ЕНЕКАГО 151.Е Гече1 $9 

ЕЗРТОНАСЕ Т5ЬАНО 

{АРУЕМТОКЕ "О" ) АГ 
1НСА СОЕ5Е 
(АРУЕНТУЕЕ “В") АРС 

ТСЕ РАГАСЕ 

ТЫНЕВТТАНСЕ Тловгашез 

ТНЗРЕСТОЮ РЫЖЕТТ й 

СНОЧЕ.ТЕЗ 1и5 

СНОМЕ КАНСЕК 

СВЕМЕТЫ$ Аачепхиоге 

НЕРОЕ5 ОЕ КАБН игсертог 

ТНЕ НЕБМ ;1геьлга 

НЕЛАСК Е1есагс 
Ргеатз 

НОВВТТ незьопгие 
Ноизе 

НЕАУУ ОН ТНЕ НАСТС Сагвот1е 
башез 

НТНАН Аауептоге , 

НУЯСНВАСК-1, 2, 3 Осеап 

НАНРТЕАП не1ьоигие 
Нопзе 

НЕАЕТЕАЕО 0411 

`ЛЕУЕ.5 ОР ВАВУГОН Имегсерфог 

КАКОЗЗТА Тосеиче 

КАУТЕТН Адуепиге 

КУАН! 

КТЫС*'5 СОЕЗТ 51егга-оп- 
ызпе 

КОБУАСНГ НАРУ назфегагоп1с 


ГОСК 5НЕБ 2 


106 


1.ГТТЬЕ СОМРОТЕВ 
РЕОРЬЕ 

1-АНВЕКУ НУЗТЕКУ 

СОКР ОЕ ТНЕ 1865 :,г Ме1ропгпе 


Ас11913100 


й Ноизе 

МАСТЕЙ ОЕ НАСТС назуегигоп1с 

|УНОЗНАРОМ Ас11913101 

МУЗТЕВУ ОЕ АВЕНЕМ — топдоп СЬго- 

НАНОЕ п1с1е 
НЕМЕРЕНОТНС 
ЗТОЮТ 1,2,3 осеап 

РОЗТКА РАНТОВУ 

РОВГЫ ОР ЗНЕЗЕОСК — Беша 4/511- 
уегзо{& 

ЕОННТЕ 60ЕЗ ТО 

| номлчоор 5-46 рау 

РЕБЕЛ. РЬАНЕТ 9$ боа 

ВЕР НАМЕ Ме1ьоигпе 
Ноцзе 

[ВЕР МООк ъече! 9 

ЗНЕЙ1.0СЕ Не1ьоигпе 
Нопзе 

ЗЕАНЕ КТЫС 

ИЗНТР ОЕ ООН 

АБУЕНТОРЕ *С* АГ1С 


ЗНАРОМ$ ОЕ НОЕГОВ 
(си. ТОВО ОЕ ТНЕ &1НС$ 2) 


51ЕТСОН ОБВЕАНЯ теуе! 9 
ЗНОМВАТТ, теуе! 9 
БОВРЕВОН” 5 5НАРОУ Веуопа 
ЗТОВМВЕТНСЕВ Наззеггоп1с 
ЭТОНЕУ АРЕАТЕ Таговгаюез 
ЗРЕШ.ВООНО Назхегигоп:с 
15АН СКОТ5Е Н1сгозрнеге 


ПУЕРА СЕИ$ АЕЕАТК 1.2 Тп+овгашез 


МТТСН*$ САПЬРВОН микго-ней 
МРАК Соде назфегз 
МОЕН ТЫ РАБАРТЗЕ Теме! 9 


пнникинииииииииииуиниииниикикиии 


нам пишет Владимир Зареев. 

}й Здравствуйте, пишет Ван Ваш 
читатель из г. Заволжье Нижего- 
Рродской области. Я читаю вами 
описания и заметки по программе 
ЕМТЕ и з0чу внести свой вклад 
для начинающих игроков. Дело в 
том, что во всех описаниях, кото- 
рые я прочел, стыковка с базой 
описывается, как сложное меропри- 
ятие и таким способом трудно СТы- 
коваться дазе опытному пилоту. 
Мой же способ позволил многим 
моим друзьям преуспеть в косми- 
йческом бизнесе. 

Однажды, вылетев из базы и ре- 
шив покончить жизнь самоубийст- 
вом. я нацелился пониже входного 
отверстия и на полной скорости 

влетел в базу. Меня это очень 
удивило, но попробовав еше нес- 
колько раз, я убедился, что это 
1не случайность. Этот снособ я 
проверял на двух версиях програн- 
ны: с пометкой №128 ив версии 
Заск О’татлегп. При этом очень 
Удобно пользоваться бестопливным 
перелетон с Кориолиса на Корио- 
лис, описанным в 2Х-РЕВЮ за 1991 
год. 

Прошу напечатать эту заметку, 
т.к. она поможет многим. 

ИФК: Печатаем с удовольствием. 


` челюсти, 


От себя хотим добавить, что Бог 
сделал все нужное простым, а все 
сложное ненужным. 

да и вообще, как показывет 
жизнь, очень часто интересные 
находки бывают неожиданвыми. У 
нас тут тоже на днях был интерес- 
ный эпизод. Заходим как-то в од- 
ной адвентюре в одну коннату, а 
там нападает какое-то чуловише, 
то ли воробей, то ли собака, но 
кашется составляют боль- 
шур часть туловища. Как назло, 
ружье забыли взять из сундука и 
как от этого монстра ни отбива- 
лись, ничто не помогает. В полном 
отчаянии хватаен со стола вазу и 
в него. Монстра, конечно, не уби- 
ли, зато ваза раскололась и из 
нее вывал ... ключ, которого ох 
как не кватало. Впрочем, это от- 
ступлекие к делу отношения не 
имеет и слухит скорее для поддер- 
жания духа экспериментаторства. 
Так что пойдем дальше. 

КОРР: А теперь несколько слов 


06 игре АТЕ, описанной С. А. Фоки- 
нын в “7Х-РЕВЮ-92" (выпуск 12, 
с.2568), Там сказано, что не надо 


слишком доверять автопилоту, т. к. 
санолет молет не успевать отсле- 
живать рельеф нестности и задева- 
ет за вершины холмов. 

Все дело в том, что надо уби- 
рать шасси. Это делается клавишей 
“У". Тогда самолет и скорость ра- 
зовьет больше и за коимы задевать 
не будет. кстати, режим автопило- 
та у меня включается клавишей 
"т", а не “М. При посадке же 
саколет тормозит автонатически. 
уциниисииимииикииинииниининиминии 


Нан пишет дворецков А.И. из 
г. Кургана. 

Привет, ИнФорком! 

Я отправил вам денежный пере- 
вод около Нового года, в надежде 
ПОЛУЧИТЬ “7Х-РЕБЮ"” за 91 и 92 
год. Отправил, и потерял все на- 
дезжды получить ответ. Но. каково 


хе было мое удивление, когда я, 
наконец, получил его (7Х-РЕВЮ) 
через 4 месяца! Как это пони- 
нать?. .. 

ИФК: К сомалению, сейчас такие 


задержки проискодят все чаше и 
чаше. Дело в том, что типографии, 
способные оперативно нас обсау- 
хить как правило малономные и но- 
тому наши тиражи невелики (2-3 
тыс. экземпляров), а при работё с 
более мошными типографиями срок 
ст подачи заявки и материала до 
выхода книжки растягивается ва 
пол-года (у них стоит очередь и 
госзаказы они пропускают вперед, 
отодвигая нас все дальше и даль- 
ше). Так и в Вашен случае. В ян- 
варе несколько оптовых покупате- 
лей оставили нас без сборника 
2Х-РЕВЮ-91. Ны охидали его оче- 


редную партию и спокойно . отдади. 
А типография получила госзаказ на 
пезать бандеролей для упаковки 
банковских купюр и два несяца 
цечатала только их (интересно, 
сколько ше купюр нас охидает в 
ближайшие несяцы?). Примерно так 
это и бывает. Конечно же Вам от 
этого не легче и мы просим про- 
шения как у Вас таки у других 
читателей за подобные задержки. 
Надеемся, что Бы нас простите и 
поймете. К сожалению, Вы читаете 


быстрее, чем мы пишем и печатаем. 
КОРР: ...Но когда я стал чи- 
тать, все мои опасения "как вет- 


РОН СДУЛО”. Да я просто не пред- 
полагал увидеть что-либо подоб- 
ное! Это превзошло все мои ожи- 
дания! Я думаю, что все синкле- 
рИСТЫ со мной СоГЛасятся. Ну, а 
‘теперь немного критики, 

1. Считаю ненужным давать опи- 
сания различных программ: ВЕТА 


ВАЗТС, НЕСА ВАЗ1С. Лучше выпус- 
тить их отдельной книгой. То же 
саное и "Секреты ИЗУ“. 

г. Статья Нихайленко В.С. ”За- 
щита программ” - полезная вешь, 
но много пустых слов. — Например, 


много было написано о СТРУКТУРЕ| 
заголовка (я называю его “шап- 
кой") и о тон, как лишить про- 
грамму автостарта. Все гораздо 
проще. Загрузите Бейсик-загрузчик! 
В СОРУ-86Н и нажмите клавину В. 
Выгрузив на ленту Бейсик-загруз- 
чик. вы лишите его автостарта. 
Вообще всем хакеран я бы посове- 
товал брошюру Н. Родионова "Адап- 
тация програнм к системе ТВ-Р0$. 
Издатель: Фирма “Питер” 1992г. 

3. Да. Харяман, Э.Хьюзон "80 
лучших процедур” - я в восторге! 

4. "Профессиональный подход“ 
Стива Тернера - выше всяких по- 
хвал. 
5. Слово экспертам - — анало- 
ГИЧНо ПУНКТУ 4 - так держать! 

6: "Форум". Ну а этону раздеау 
я отдар наибольшее предночтение. 

на этом вся критика закончи- 
лась. 

Ногу предоставить вам эксперт- 
ную проработку программы “ГЕСТОН 
ОЕ РЕАТН" (Бесплатно, а в награду 
я хотел бы получить доставерную 
информацию: где мне купить диско- 
вод и контроллер, возможно внесте 
со Спектрумон по доступной цене, 
Помогите! ) \ 

иФк: Спасибо огромное! ' Нас 
очень интересует эта проработка, 
Наверное, с этим. согласятся и 
ниогие наши читатели. Поскольку 
ны сами аппаратными вопросами не 
занимаемся и аппаратурой не тор- 
гуен, давайте попросин всех, кто 
знает, как это сделать, написать 
Вам. Наверное, и в саном Кургане 
Вы найдете надежных консультан- 
тов. Кроме того. очень корошо 
поставлено это дело и в регионах, 


10? 


соседних с Вашин - в Челябинской, 
Свердловской, Оренбурхской 
областях. Даен Ваш адрес: 


540004, г.Курган ‘ 
Уп. Онская, д.4, кв. 3, 


дворецкову А. И. 


КОРР: 
жениен, 


Ну вот и все! С ува- 
денис Дворецков 16 лет. 

й ИФК: До свидания, денис.’ Ждем 
с нетерпениен “Легионы смерти", а 
пока поспешите заказать самый 
большой почтовый ящик, какой 
только бывает. Стандартный ножет 
не выдержать, но Вы, надеемся, 
будете этому рады. 
ииикииикниминикииикииниинииичики 


Нам пишер Камразе Тимофей НМи- 
хайлович, г. Носква: 

Здравствуйте увахаеные 
вители рубрики “Форум”. 

Я увлекаюсь составлением карт 
к играм и хочу поблагодарить вас 
|за вашу отличную работу: “Форум” 
во многом облегчил мне жизнь в 
составлении плана к "НЕАУУ ОН ТНЕ 
МАСТС". 
могу предложить карты "Т1®-НА- 
НОС”, "УАСК  ТНЕ  НТРРЕВ 2”, 
"АГТЕНС”... 

ИФК: ОГРОМНОЕ спасибо! У Вас 
очень интересное хобби. Ны с ра- 
достьр примем карты, хотя здесь 
есть проблема. Дело в том, что 
подготовка к печати в текстовом 
Тредакторе кудожественно выполнен- 
ной карты крайне трудоемкий про- 
цесс, ца и вообше не всегда воз- 
ножна. а у нас нет постоянных 
кадров, которым можно было бы это 
дело поручить. Просить Вас, что- 
бы Вы сами сделали карты в виде, 
ПРИГОДНОМ ДлЯ Разнножения, разу- 
неется было бы бестактно. Вашу 
карту к игре АРТЕМ мы с благо- 
дарностью принимаем и даем для 
наших читателей, хотя она, ко- 
нечно многое потеряла при наборе 
в текстовом редакторе (см. на 
следующей странице). 

КОРР:... Сейчас я работаю над 
программой "РУН-ОАБАСН”. В связи 
|с этим я был бы вам очень призна- 
телен за освешение этой и других 
программ Фирмы “САРСОЧТЕ САНЕЗ”. 

ИФК: Шесть лет назад, в мае 
87-го работая с журналом “51п- 
с1азг 9зег” в библиотеке  ГИНТБ. 
что на Кузнецком Мосту. мы видели 
ОГРОМНУЮ статью, посвяшенную этой 
программе, с картой в разворот 
журнала. Ах, если бы тогда знать, 
что она может пригодиться... Кар- 
та представляла из себя план сре- 
дневекового ирландского города, 
весьма большого. и запутанного. 


соста- 


кельтских и 
‚мегенд и, 


шотландских 
надо сказать, был до- 


пространитель 


Если вам интересно, то, 


вольно труден для чтения на пони- 
нание при нашем ^ тогда еше не 
очень свободном знании англиийс- 
кого языка. Ориентировочно ‘этот 
хурнал относился к 84 голу и уже 
тогда был зачитан почти до ипыр. 
К сожалению, сейчас мало шансов 
разыскать его тан. . 

КОРР:... Теперь К вопросу об 
“ЕТЕ”. Этой зимой на рынке по- 
явилась програнна "Е!.1ТЕ-2" (рас- 
*5-5Т0010". корОвю 
известен “тушинским” синклерис- 
там). В чем разница нехду ТЕ. и 
ЕГТТЕ-2 установить не удалось. 
Отличие лишь в том, что невозмо- 
жен гиперпрыхок сквозь станцию. 
"АЛТЕ-2” очень напонинает ”вер- 
сию 3“ (см. 7Х-РЕВЮ НЗ, 4 1992). 

ИФК: В чем разница? Пожалуй, 
на этот вопрос лучше всего отве- 


И еше одно. — ЕСТЬ 

хотелось бы переделать 

ЕМТЕ под сеть для игры вдвоем. 

Возможность летать с другом, 

торый может тебя ПРИКРЫТЬ или 

вести 60й с живым противником, 
сделает игру неподражаемой. 

К сожалению, у меня нет доста- 
точных знаний. Поэтому я дарю 
свою идею тому, кто смохет ее во- 
плотить в зизнь. 

ИФК: К сожалению, здесь вряд 
ли что получится. Скавутся и не- 
достаточное быстродействие ком- 
пьютера и малый объем паняти и 
отсутствие аппаратного и програм- 
много обеспечения сетевого вари- 
анта. Проще, повидимому, написать 
НОВУЮ ПРОГРамму, которая и будет 
заниматься исключительно косми- 
ческими боями, а ВОПРОСЫ ТОРГОВЛИ 
и т.п. обойдет стороной. 

кстати, это как раз тот случай 
когда целесообразно использовать 
ТВН-совместиную нашину. Последние 
два года боевые имитаторы для 
этих машин выпускаются с возмох- 
НОСТЬЮ работы через модем с ‘живым 
партнером (противником), а в за- 
рубежных журналах появились объ- 
явления типа “”Ишу партнера для. 
ИГРЫ В .... И прилагается список 
ИГР". 


виники цииимиииккниииникииминиии 


Нам пишет Неведомский Алек- 
сандр Александрович, г. Томск: 

Здравствуйте! Давно хотел Вам 
написать, да все не получалось... 
Прошлын летом я прошел программу 
АСТЕНЗ по Фильму (“Чужие”), но до 
сих пор ни у кого не видел и ниг- 
де не слышал о том, чтобы кто-ни- 
будь составил для нее карту. Без 
карты эту игру можно пройти толь- 
ко либо будучи бессмертным, либо 
если помнить весь лабиринт. Посы- 
лаю Ван составленную нной карту, 
а это долгий И КРОПОТЛИВЫЙ 
ТРУд.... ь 


ко-` 


ифк: Больвое спасибо, Алек- 
сандр Алексанирович. Это дейст- 
вительно труд, заслуживающий 
большого уважения и мы надеемся, 
что наши читатеаи его оценят. 
Конечно же, Вам план и план Тимо- 
Фея Михайловича совпадают, ведь 
так и должно быть, поэтому мы 
здесь приводим один паан, принад- 
лехаший двум авторам. От себя зе 
добавим, что присланный вами 
оригинал выглядит гораздо лучше, 
чен то. что мы из него сделали (с 
учетон высказанного выше  сообра- 
жения о сложности наборе плана в 
текстовом редакторе). 

КОРР:...Здесь же привожу по-! 
лезные советы для игроков, со- 
ставленные по собственному опыту, 
хотя некоторые из них встречаются 
В других описаниях игры. 

1. Для того, чтобы пройти иг- 
ру, необходимо привести в комнату 
*натки” (а их в отличие от Фильма 
- несколько) не менее трех чело- 
век, иначе не хватит оружия (бое-| 
припасов). да и ‘то только в том 
случае. еслы вы бущете метко! 
стрелять. | 

г. Выбирайте для этой пели тех! 
героев. управление которыми наи- 
более Удобно (чтобы можно было 
следить за его уровнем энергии, 
номером комнаты и,'’конечно, экра- 
ном). Одного героя обязательно 
оставьте в комнате Н 1. `Там его 
никто не убьет, а вы вспомните 
мой совет добрым словом в конпе! 
ИГРЫ. 

3. Не рекомендую стрелять в\ 
“чужих” до комнаты 18, в которую 
надо довести максимальное число 
героев. . ` 

4. коконы имеет смысл “гасить” 
только в комнате 248. | 

5. Всегда целься в голову. У 
всех "чужих" голова находится на 
УРОВНе дверйого занка. 

6. Нет смысла "запечатывать” 
двери. Вы не пройдете, а “чужие” 
все равно пройдут. 

7. Не убейте по неосторожности 
ребенка. Это девочка. Ее зовут 
Нют и ее нало спасти. за ее обна- 
рухение получите ‘дополнительные 
1000 очков. 

8. Не пытайтесь открыть двери 
с пробитын замком. Не хватит здо- 
РОВЬЯ. 

9: Не устраивайте боев в поме- 
шении генераторной. 

10. Не убивайте "чужого" перед 
цверьр. Вы только опалите его 
ШКУРУ, а он будет ожидать Вас за 
дверью до тех пор. пока кто-то не! 
убьет его с дрУГой СТОРОНЫ (лужа 
перед дверью). 

11. Давайте отдохнуть своим 
Героям, иначе они потеряют  пои- 
ВИЖНОСТЬ. 

12. Если кого-то из героев за- 
хватили и посаиили в кокон, его 
еше можно попытаться спасти. Не- 
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которое время он остается живым. 
Спасти его можно уничтожив в кон- 
нате всех инсекторептилий и  раз- 
бив все коконы. 

{3. Боезапас пополняется толь- 
ко в оружейной. 

14. Не распыляйте свой отряд 
по разным помещениям. Так труднее 
сохранить людей живыми. 

ИФК: От имени наших читателей 
благодарим за полезные советы. от 
себя хочется добавить, что наи: 
лучшим советои было бы если и не 
посмотреть кинофильн (ведь ве У 
всех есть видеонагнитоФоны), то 
хотя бы прочитать книгу А. д. $0с- 
тер "Чужой. Чужие. Чужой-3." В 
одном томе собраны все три науч- 
но-Фантастических ронана. 


НАИЛУЧШИЙ НАРИРУТ 


Зее их ПН 
а С Г ы 

р О СН Е 

за - 33-32-25 - 50-09 
Доля - Ла вот. - 300 - 105 
104 - 103 - 102 - 10! - 106 - 99 
98 - 97 - 96 - 161 - 160 - 136 
159 - 158 - 76 - 19 - 60 - в: - 82 
83 - 81 - 184 - 185 - 186 - 167 
188 - 189 - 190 - ггт - гг4 

245 - 239 - 246 - 281 - 242 

геёт - ггв - 229 - 230 - 2949 - г48 


173 110 167 165 
ХХХ 176 174 171 168 164 163 162 
175 172 169 166 


1 - База 
28 - Оружейная 


Я се почти промед, 


КОРР; Я обратаюсь к Вам с про- 
сьбой. ЕСТЬ корОМая Программа То- 
ТМ. ЕСР5Е 2 (1991, 


тпсеплуе) . 


но не знаю, 


как пройти два места: 
где дверь быстро ис- 
чезает и появляется (причем над 
ней черный квадрат! ; 
В КОТОРОМ требуется 
слишком много ключей (порядка 4}, 
а ик нет (в наличии только 2), 


- место, 


- место, 


Это очень интересная игра, 


ней много сюрпризов и ни один не 
повторяется. 
зрачные стены, 


Воду, 
в камне, 


94 
95 
96 
97 
98 


с) 


198 
197 
196 
195 
194 
193 
392 


89 
91 90 
У 
93 


161 150 


99 

106 
101 102 
103 


31 
30 
29 
22. 19 
21 18 
20 117 
15 
15 
1% 


Неведомский Александр Александрович, 


202 
201 
200 
199 


ггб 


191 


58 


134 
135 
136 
137 
138 


104 


зе 


25 
24 
гз 


13 


78 - комната управления 
174 - Генераторная 


порог, 


двойные стены, 


Перечислю их: про- 


забирающий 


потайной ход 
‘тайная плита. Может быть 


есть что-то еше. Кстати. кто зна- 


ет, 


вое те, 


пля чего нужен брел, который 
поворачивает голову при’ выстреле 
в него. 
ИФК: Спасибо за ннение. Навер- 
кто думают над пополнени- 
ем своей игротеки к нему прислу- 
шаются. А ножет быть кто-нибудь и 
поможет с решениен списанных про- 


блен? 


КОРР: 


КАРТА ПРОГРАНМЫ АТЕНЗ 
(С) камразе Тинофей Михайлович, 


203 


228 
гет 
2г5 
224 
2гз 
190 
189 


85 
т 


132 
133 


159 


139 
140 


105 
106 


34 
33 


26 


12 
11 


188 


85 


131 


158 


141 


107 


35 


10 


ххх 
253 
25% 
205 
253 
248 
249 
230 
243 
246 
239 


206 


231 
244 
245 
238 


ггг 


130 


15а 


+57 


142 
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4г 


40 


68 


гот 


гзг 
233 
234 
236 
гзт 
2го 
2г1 


129 
128 


151 
150 


156 


143 
143 


110 
109 


43 
48 


56 
67 


181 - Столовая 


208 
209 
210 
211 


235 


219 


зат 


149 
148 
147 
146 
145 
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1993 


212 
213 
214 
215 
216 
гат 
218 


125 
125 


113 
112 


248 - Комната “матки” 


ххх 
124 
123 
122 


154 
116 


115 
114 


58. 


59 
50 
61 
62 


ххх - “смертельно” 


А недавно я прошел про- 
грамну РЕРЕНОЕЕ ОР СКОМ: Это как 
бы разминочная программа для тех, 
кто любит стратегические игры. У 
нее великолепная нузыка, да и ис- 
полнена она великолепно. 
ик: 
мнение. Любые отзывы о програмнах 
вахны нашим читателям. 


опять же спасибо за 


1993 
«вечная жизнь”: 
РОКЕ 31914, 6 


РОКЕ 30738, 6 
РОКЕ 34484, 195 


121 

1г0 179 182 

119 153 178 181 183 ХХ 
118 ттт 180 

ат 
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нам пишет Петухов Владимир из 
Г. златоуст Челябинской оби: 


уважаемый “Инфор- 
очень рад, что Вы возобновили 
водпискУ по почте. Журнал очень 
НУЖНЫЙ. Трое моих коллег после 
ознаконления с ним будут его вы- 
писывать. Ною подписку за 1991 
год зачитали до пыр. Придется 
новую выписывать. 

дай вам Бог здоровья и благо- 
получия каждому и процветания 
журналу и Фирме ва долгие годы! 

В качестве темы в журнале хо- 
телось бы видеть почаше материа- 
лы, посвященные дисководан, дис- 
ковой операпионной системе ТЕ- 
р205, управлению лисководоим из ма- 
шинных кодов. Хорошо бы увидеть 
материал в конкретных принерах, 
например, как это сделано в книге 
*Нетоды програнмирования на 
Бейсике” И. Кергадь. Перевод А.И. 
БРЯЛИНСкОогОо под редакцией 
Ю. М. Баяковского, Издательство 
"Кир" ,Носква 1991 год Глава 7, 

У Вас, я уверен, это получится 
хороню. В целом, занимаясь кон- 
пыютерон с 1990 года, я могу с 
уверенностьр сказать. что хотя и 
медленно. но уверенно общество 
перекодит на компьютеры с диско- 
водани. И если "деды" начинали с 
магвитофоном, то “новички” уже 
рвутся к комньютеру сразу с дис- 
ководом, невзирая на материальные 
затраты и отсутствие опыта и зна- 


В заключение своего письма еше 
раз желаю вам всего доброго. $ 
ик: Спасибо, Владимир, за 
теплые слова. Буден . стараться 
по-возможности и при наличии на- 
териала развивать высказанные Ва- 
ни пожелания. Включаем все каналы 
в режим “оп 1116“. Теперь все 
зависит от наших читателей. 
инкииниих ким ими кикимичикиниииннии 


Нам пишет Кохан Валерий Вито- 
вич, Южно-Сахалинск. 


Увахаемая релакпия “7Х-РЕВЮ“! 

У меня огромное желание инеть 
ваш журнал в‹лизной библиотеке. Я 
имею “7х-БРЕСТВУМ“ дома и моя ра- 
бота напрямую связана с этой за- 
мечательной машиной, Сам я рабо- 
таю  заведуущин лабораторией ЭВМ 
Сахалинского областного дома тех- 
ники и уже 3 года веду курсы 
(кружки) "Работа на 7Х ЗРЕСТВОМ и 
програнмирование на языке Бей- 
сик“. Желающих завинаться много, 
ведь у многих дона есть эти ком- 
пьютеры. “СРЕСТЕОМ” уверенно за- 
воевываех симпатии сахалинцев. 

Я написал много программ но 
курсу информатики для компьютер- 


ний. вот. этот момент, на мой: 
взгляк, ваяно не ПРОПУСТИТЬ 
"инфоркому". 


ных классов "2Х-5РЕСТКОМ” (я ра- 
ботаю на классе Протвинского ва- 


рианта - Калужская область. ЖуУ- 
ковский Р-н). Это программы-де- 
монстраторы, тренажеры, экзамена- 


Торы с выставлением оценки и под- 
счетом затраченного времени на 
СПРОС по следуршим тенам: 

- опрос по любому преднету 
{укажи номер правильного ответа) 

- програмна-диктант (найди и 
исправь ошибки в тексте); 

- Переводы чисел в систенах 
счисления (2,10, 16); 

- логические элементы и, 
ИЛИ; 

- составление арифметических 
выражений в Бейсике; 

- Работа простейшего процессо- 


НЕ, 


ра (решение арифметических выра- 
жений); 
- текстовый режим экрана (ри- 


сование картинки оператором РЕТНТ 

-графический режим экрана (ри- 
сование картинки по координатам) ; 

- наложение символов и созла- 
ние символов 906; 

- системные переменные; 

- Программы-денонстраторы при- 
менения тех или иных операторов 
Бейсика (программа-будильник, се- 
кундомер, жеребьевка, бюджет се- 
ньи, база данных “Фамилии, адре- 
са, телефоны”, тренажер и экзане- 
натор знаний арифметики и т. д. 

ЦРОоГгРаммы исключительно дело- 
вого приненения при ведении заня- 
тий по информатике или курсов 
программирования на стандартном 
Бейсику для классов 2%  ЗРЕСТВИН. 
Написаны только на стандартном 
Бейсике, без модудей музыкальных 
и графических заставок, поэтону 
проблен с работой этих програмы 
при нользовании дисководом и маг- 
нитоФоном нет. При ведении заня- 
тий я только объясняю теоретичес- 
кую часть натериала, а всю денон- 
страпионную, 
НУЮ работу выполняет сама ЭВМ. Я 
на это вреня становлюсь консуль- 
тантон. 

Сейчас я готовлю програмны к 
предложению на рынок. Можно ли 
икеть сотрудничество в этом плане 
с вашим журналом? Буду Вам благо- 
дарен, если дадите любой ответ. 
Я человек влюбленный в Спектрум и 
считаю. что информатику в школах, 
ПТУ лучше всего давать на этом 
компьютере. Мне хотелось бы, что- 
бы ной програнмы помогали препо- 
длавателям, работающим с конпью- 
терными классами 2х ЗРЕСТКОН. 

ИФК: Увахаеный Валерий Витович! 
С ракостью поможем Вам. Для нас, 
поверьте, это большая честь, ведь 
основная наша цель - именно обра- 
зование. 

КОРР:... Литературу по `2Х до- 
стать сложно. особенно нам, жи- 
вУшим на краю России. 


тренажернтю и опрос-` 


КТО ЗАИНТЕРЕСОВАН ] 


ВСЕ, 

В ПРИНЕНЕНИИ “"7Хх-БРЕСТВОМ" 
в учебном процессе, пишите 
по адресу: 

593008, Россия, 
Сахалинская область, 

г. Южно-Сахалинск, 

ПР-Т Победы, 15, кв. 19, 


Кокан Валерию Витовичу. 


ИФК: да, мы об этом знаем и 
всегда это учитываен. Если у вас 
случаются проколы с нехваткой 
каких-либо материалов, мы стара- 
емся в первую очередь обслужить 
хителей именно отдаленных регио- 
нов. кстати, основная насса наших 
постоянных клиентов 
именио там. Все-таки хителям 
центральных областей проше добы- 
вать наши материалы, которые не- 
шадно копируются и перепечатыва- 
ются пиратским способом нногими 
недобросовестными "Фирмани”. 
инииниининииииинимикихнииихиииниии 


Нан пишет Епифанов Андрей Ва- 
лерьевич из Санары: 


Привет, ИнФорком! 

Читаю я "7Х-РЕВЮ" и нравится 
нне там рубрика “Слово экспер- 
там”: в ней я много узная о про- 
граммах, которые у меня были, но 
я не знал, как и что в них де- 
пать. 

И вот решил я поделиться с Ва- 
ни, а заодно и со всеми читателя- 
ни "7Х-РЕВЮ" о похождениях ма- 
ленького дракончика в програнме 
"РИТТЬЕ РУРЕ”", выпущенной Фирной 
СОРЕ МАЗТЕК в 1989 г. 

Это программа типичного аркад- 
но-адвентюрного ханра. В этой иг- 
Ре Вы управляете маленьким заблу- 
дившимся дракончиком, — которому 


надо вернуться домой. Для этого 
ему надо собрать четыре части 
паспорта (пропуска) и золотую 


монетку. Если Вы захотите соста- 
ВИТЬ Карту, то лучше сразу брось- 
те, т.к. уровни (а их три - один 
под другим) смешены относительно 
друг друга довольно-таки жутко. В 
игре приятная музыка и графика, 
снешение плавное, а цвета не уто- 
нляют. В лабиринте есть ловушки, 
в которые лучше не попадать. 

Как играть в ЫТТЬЕ РОРР? В 
лабиринте разбросаны разные веши, 
которые можно поделить на два ти- 
па, которые можно использовать и 
которые не нужны (так я, напри- 
мер, так и не нашел применения 
пистолету), а также всякие Фрук- 
ты, за которые Вы получаете очки. 
Запас вемей, которые Вы можете 
нести одновременно, - ограничен, 
поэтому иногда Вам придется про- 
ходить в два приема. 

Несколько советов: 


1. Чтобы сжечь дерево. нужна 
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бутыль бензина. 

г. Чтобы проплыть (?) по воде, 
нужна помпа и спасательный круг. 

3. Чтобы включить лифт(?) надо 
молотком надо рубить ‘коробку и 
открыть дверь выпавтим ключом. 
` 4. ЕСЛИ ОТКРЫТЬ БУТЫЛКУ ШТОПО- 
Ром, то У вас будет еше олна 
часть пропуска, 

5. Чтобы уберечься от кокоса, 
надо взять третью часть пропуска 
в № 

6. Если положить кокос на кно- 
лку, то где-то можно отключить 
зашиту и взять четвертую (послед- 
нию) часть пропуска. 

7. Аля того, чтобы получить 


золотую (а не дырявую) монетку, 
надо распилить кокос. 
8. Подойдя к мосту, встаньте 


на него и подождите, 
ходите его прыжками. 

ИФК: Мы благодарим Вас, уважа- 
емый корреспондент за заботу о 
наших читателях. Наверное, многих 
заинтересует эта програмна и они 
скажут Вам спасибо. К сожалению, 
в некоторых местах почерк Вашего 
письма был не вполне разборчив и 
там мы поставили в скобках вопро- 
сительный знак. Впрочем, вряд ли 
Это кому-то помешает сыграть в 
ХОРОЩУЮ ИГРУ. 

КОРР:,..Как видите, это не са- 
мая трудная и сложная программа, 
но Бам постоянно будут мешать 
разные обитатели, а жизней у вас 
всего одна. 

Еше я хотел задать Вам один 
вопрос и высказать одну просьбу: 

Вопрос: не знаете ‘ли Вы или 
кто-нибудь из читателей, что и 
как делать в програнме 5МОРО АНО 
ЗОЕСЕКУ? и какой пароль в игре 
СРТ. ТКОЕНО 11? 

Просьба: в М! за 1991 год я 
прочитал ваше объявление о рас- 
сылке вами описания дизайнера 
программ Нос. Не могли бы вы 
прислать его мне? Конверт при- 
лагар. 

ИФК: Что касается геймдизайне- 
ра НИКС, мы уже очень давно за- 
кончили его распространение, но 
для Вас экземпляр найдется, вы- 
сылаен! 

По поводу ТЕУЕНО 2 давайте 


а потом про- 


вместе скажем спасибо Алексею 
Березиву. 
А вот что касается 5&5, то мы 


с этой программной не знакомы и 
лучше предоставим слово читате- 
лям. давайте наберенся терпения и 
наверное кто-то, кто прошел эту 
программу, поделится своин опы- 
‘том, ь 
ининиикииииниюиицииинииикиииииииии 

нам пишет Адексеев Николай 
[Алексеевич из г.инта, республика 
Коми: 

Здравствуйте, увахаемая редак- 
ция! 

Я читал 3 и 4 номера РЕВЮ-92 


и решил написать Вам об одной из 
версий “ЕГТТЕ", ВСКРЫТОЙ РОДИО- 
вовын. й 

Я не согласен с тен, что вер- 
сия, где появляется надиись “НА 
ТОАБТНС" похожа на "М128". Внеш- 
не ”Н:" и версия Родионова похожи 
как две канли воды, различие то- 
лько в том, что изменен звук ла- 
зера. В обоих версиях при попытке 
атаковать станцию никаких надпи- 
сей нет, просто не обращают вни- 
нания, только невозможно потом на 
станцию залететь. Полицейские из 
станции не вылетают. ракетой 
станцию не уничтожить, даже если 
иметь Е.С.М. . ЛАИМЕЮ, исключение 
составляет только база таргонов 
ТЗВЕНА. При попадании в Ваш ко- 
рабль защита выбивается нанолови- 
ну, так что если за Вани привяза- 
лись штуки 3 ракеты. то можно и 
погибнуть. Конечно, с противора- 
кетной систеной проблем нет. Вами 
ракеты действуют здесь неплохо, 
ини лучше уничтохить  корабаи 
АБОЕЕ, СОВРА, РУТНОН - самые 
уязвимые корабли. 

Пиратов в этой игре много, по- 
лиция не очень серьезная. Если 
пираты могут нападать скопом, то 
полиция всегда атакует по-одиноч- 
ке. Все типы кораблей ногут быть 
пиратами, за исключениен полидей- 
ских. В игре нет корабля типа 
КЕАШТ. Пираты обычно появляются 
вне видимости. Встречаются такхе 
станции (РЕВЮ-9г. Н!.2г). Их легко 
искать, надо только полететь на 
феодальную или анархическую пла- 
нету с низким уровнем. Наневри- 
Руя, они выпускают корабли тина 
ЗТРЕМТНОЕЕ и АББЕВ от 1 до 3 шт. 
очень сложно выполнить вторую 
миссию, когда пираты появляются 
до 10 сразу. С таргонами лучше 
всего сражаться с технологическим 
лазером, 15-20 попаданий выбивает 
ИХ ИЗ СТРОЯ. 

В обоих версиях ножно попасть 
в 471 галактику, у Вас будет много 
денег, отличное вооружение. Но 
после вылета понадете в 1 галак- 
тику, где нет планеты БАУБ. Так 
что Фактически это не 1 галакти- 
ка, а 41. Где-то в 44 и 45 (4и 
5) точно не поиню, есть планета 
ГАУЕ! Только уровень У нее 10 - 
денократический. Так что многие 
планеты могут повторяться. Цены 
на товар здесь стабильны. Чем 
выше уровень, тен меньше пены. 
чен ниже уровень, тен выше цены. 
Разнида изменений цен, к примеру, 
на низких уровнях, незначительна. 
Если Вы случайно убъете нирного 
торговца, у Вас измевится ‘только 
статус. Вас пустят на станцию да- 
же если Вы убийца. Единственное 
условие, не стрелять по тем, кто 
пр Вам не стреляет, когда загора- 
ется знак станции $5. На статус 


это 


`адвентюрных играх, 


можно не обрашать внимания. Но 
тен, кто не хочет портить. статус 
и быстро передвигается к планете, 
дан совет. 
врезайтесь в корабль, 
останется прежним, 
тро восстановите. 

Предлагаю небольшой хучок для 
тех. кому ТРУДНО ВЫПОЛНИТЬ ВТОРУЮ 
миссию. Когда корабль попадет в 
зону видимости (ножно узнать по 
локатору), надо быстро нереклю- 
читься на задний а потом на не- 
редний экран, и секунд на 10 он 
будет виден. 

И еше для тех, кто пользуется 
спасательной капсулой. Когда кап- 
сула отлетит от корабля, стреляй- 
те в нее, дайте газу, подбирите 
контейнер, и окажетесь на стан- 
ции. Только делать нужно быстро. 

В обоих версиях ножно быстро 
погибнуть, если не предпринимать 
мер, особенно новичкам. Так что 
версии достаточно сложны, 

Еше`я делал эксперимент. В от- 
ГрУЗоЧчНОм блоке поставил в байтах 
61-66 нули, и ни одной планеты не 
было. Потом поставил во всех 
байтах 255. Все галактики были 
похожи как две капли воды. Сан я 
считаю, что галактик может быть 
до миллиона, хотя планеты ногут! 
повторяться. Я, как и все, ишу 
планету ВАХХГА, но пока не нател. 
Хотя у неня есть версия, что ее 
нет! Доказательство: Д.Н. Шилии 
открыл текстовый блок. Вот коды 
148 - БА, 149 -ТА, а кода где 
были бы ХХ нет! Если же его 
найдут, ‘то тогда действительно 
можно найти планету с таким наз- 
ваниен. 

ИФК: Спасибо. Николай Адексее- 
вич за исследование. Оно сушест- 
венно пополняет нашу картину зна- 
НИЙ 0б этой уникальной програмне. 
Что же касается поисков планеты 
КАХХЬА, то с Вашей логикой нельзя 
не согласиться. Все верно, кода 
ХХ в програнме нет. Жаль расста- 
ваться. с прекрасной мечтой, но 
ведь можно предполохить, что для 
такой избранной планеты ‘авторы 
могли заложить иной способ коди- 
ровки названия. 
ининимиииниининиииникиинииикихичии 


статус 
а энергию быс- 


Нан пишет ТроФинчук Владимир 
ВИКТОРОВИЧ ИЗ Владивостока: 


Здравствуйте? 
Пишу Вам впервые, 
поблагодарить 


Поэтому хочу 
за саное интерес- 
ное, полезное и уникальное ‘изда- 
ние - "2Х-РЕВЮ”. Я хоть и не под- 
писчик, но имею все номера ”РЕВЮ” 
и мне все в них нравится. Особое 
предпочтение я отдаю статьян об 
но жаль, что в 
этом году Вы отошли от этой тены. 

ИФК: Вы правы, Владимир Викто- 
рович, нан и саним очень халь, 
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На полной скоростий 


что мы отошли от темы адвентюрных 
Лигр, ведь это наш любимый ханр. 
Дело в том, что сейчас уже не 
остается времени на то, чтобы от 
души погонять игровые програмны, 
мы очень загружены работой над 
"РЕВЮ", / вовымя книгами, обучаю- 
щими программами, деловыми сис- 
темами и пр. К сожалению, ны 
никак ве ножен выйти из ритма 
работы по, 12-14 часов в день без 
выходных в течение уже трех лет. 
Тем не менее, МЫ с радостью 
вернемся к этому жанру, если 6у- 
дут интересные письма от читате- 
дей. К тому же Вы уже знаете из 
этого номера, что сейчас ведется 
работа над сериалом БРЕШИВОУНЬ - 


хе Вы имеете какой-то 
доступ к 1ВМ-овской технике, то 
можем порекомендовать Вам нашу 
работу "Адвентюрные игры:  эволю- 
ция жанра”. которую мы опублико- 
вали в журнале "МОНИТОР" (НН 8.9 
за 1992 год). у 
Впрочем, и этим наши усилия не 
кончаются. Вот уже более полугода 
мы коордипируен и финансируем ра- 
бо1у крупного авторского коллек- 
тива над огромной книгой,  посвя- 
венной игровым программам. Это 
будет красочный том в подарочном 
исполнении весом килогранма в 
полтора. раздел, посвяженный 
адвентюрам занимает там ве пос- 
‹леднее несто. Проект пока секре- 
тен и название книги мы не с006- 
шаем, но в конце 1993 - начале 
1994 г. мы очень широко оповестим 
©5 этом всю страну. Так что мы 
еше нё совсем потеряны для люби- 
телей алвентюр (и не только ад- 


вентюр}. 

КОРР. немного © себе: 23 
года, инею “Ленинградец” окозо 
года, занимаюсь в основном. с  ад- 
вентюрани. | 

почену решил написать. Как-то 


в #6 (1991) в Вашем издании был 
помещен список адвентюр на двух 
кассетах и. просьба, если кто-то 
пройдет эти’ игры от начала ло 
конца, - черкнуть Вам. 
Недавно у неня появились 
сборники, но все по-порядку. 
Приобретя Вам трехтомник по 
программированию в нашинных ко- 
дах, я стал немного разбираться в 
машинном коде фирменных программ, 
попробовал для начала русиФици- 
ровнать НАСТЕЕРИЕ 09; конечно, я 
это делал ые так, как оцисано в 
дном из номеров 1992 года, а с 
помошью МОН54, что гораздо удоб- 
нее. У меня получилось и я пошен 
дальте - перекинулся на адвентюр- 
ные игры. Так. мной были русифи- 
цированы КЕКТИЛА; НЕЗЗАСЕ РКОН 
| АМОРОНЕЛА; РЫАМЕТ ОР  ОБАТН; 
НОЧСНВАСК 1,2, 3. 
ИФК: Уважаемый Владимир Викто- 
Рович! Ваши успехи - лучшая рек- 


эти 


лама нашему трехтомнику: Кстати, 
теперь это уже не ‘трехтомник, а 
однотомник, ведь мы выпустили 
новое дополненное издание в одном 
тоне. Оно недавно вышло из печати 
и доступно всем хелающин, 

КОРР: ...ЭТИ игры я прошел 
полностью, но про КЕЯТИЛА ногу 
сказать, что ее “Фирменный” вари- 
ант содержит грубые ошибки (про- 
Грамна на Ваз1с), из-за чего 
возможно пройти только 50% игры. 
В своем варианте я эти ошибки 
исправил, 

"НОНСНВАСК” искадечен Фирмой 
"№! тоаа1пя”, из-за чего стаа 
доступен любой этап, но с тени 
предметами, которые вставила Фир- 
на, а не намел играющий. Это я 
тоже исправил, да к тому же сде- 
лад удобный ввод для пользовате- 
пя. 

Так вот, ближе к делу. Я пере- 
вел такую программу, как СВЕМЛНУ 

.› НО не ногу пройти ее до ков- 
ца, чтобы проверить правильность 
перевода текста. Эту игру очень 
ТРУДНО ПРОЙТИ, КкОоТЯ команды,  ко- 
торые она понинает, я отыскал, а 
вот в какие моменты их нужно да- 
вать и с какими предметами - не 
знаю. Программа на все отвечает: 
“Вы еше не можете сделать это”. 
Помогите, пожалуйста, может Вам 
написал кто-нибудь, кто прошел 
СЕЕН!.1Я5 ‘или другие игры ( не 
АНОРОМЕРА, КЕКТИЛ.А, АБУЕЯТУЕЕ А, 
НУИСНВАСК) от начала до конца. 

ИФК: Нет, пока никто не с006- 
вал о победе над программами этих 
сборников. 

КОРР: А мой опыт можете ис- 
пользовать для помоши другим. Ной 
адрес: 


690087 Владивостек, 

уд. котельникова д.Т кв. 188 
Трофинчуку Владимиру 
ВикторОовичУ, 


ИФК: Спосибо за дружескую рРуУ- 
ку. Раз Вы не возражаете в том, 
чтобы оказать помошь нашим  чита- 
телям, мы даем Раш адрес, Если 
будет трудно ответить всем по 
почте, воспользуйтесь натими воз- 
ножностями. Наиболее часто встре- 
чающиеся проблены в адвентюрак 
ножете освещать в "7Х-РЕВЮ", Мы 
буден рады опубпиковать какую- 
либо статью под Вашим именем, 
ииининиииыик ихних кииикиинииких 

Нам пишет Чертков Вадим 

Юрьевич из Кургана: 


Здравствуй, Инфорком! 

У нас в Кургане "Спектрумы" 
изготавливает кооператив “Дис- 
плей” в течении нескольких лет. В 
основе их положена доработанвая 
схёма Балтики. Так что они почти 
попностьр совместимы с оригиналом 


== РОВОМ эЕЕЕЕе 


за исключением порта #7Р. он все- 
гда выдает 255. Поэтому не ид 


программы: 5НОЕТ Ствслт 1,2; 
ВЕНЕСАЬЕ. С остальными никакиЕ 
проблем нет. Идут и ЗАНАНТНА РОХ 
и ТОРО СОМР и АЮСАВОР и т.д. 
т.е. все, что не рабстало у Ваших 
читателей у неня работает. 

ИФК: Спасибо, Вадим Юрьевич за 
инфорнацию, которая может приго- 
длиться нащим читателям. Мы хотели 
бы попросить Вас показать послед- 
нюю  странину этого выпуска кому- 
БИбУДЬ ИЗ СОТРУДНИКОВ “Дисплея”, 
им это может быть полезным. 

КОРР:...На моен  "Спектруме” 
стоит прошивка УТЫСЬАТЕ 1990. Вы 
© ней взкользь упоминали. У нас в 
Кургане очень у многих есть эта 
прошивка. Одиако на этой прошивке 
наблюдается некоторая несовмести- 
мость программ. У меня инеетея 
около 1 тыс. игр, из них не так 
как надо работают несколько штук: 

ЕХОТОН - нет звука 
СУВЕВНОТР - нет звука ` 
КАСЕЕ - нет, звука 
5ТОЕМ 108 - нет звука 

Но это все ерунда по сравнению 
с тем, что можно сделать с этой 
прошивкой.  Ножно пожертвовать 
несколькими играми ради этого. 

Одна из прелестей: при нажатии 
кнопки на линии НИ! компьютер пе- 
реходит в "монитор". Единственное 
ограничение для этого: надо, что- 
бы ЗТАСЕ не был в экранной облас- 
ти. Иначе комиьютер зависнет. 

ИФК: Бне раз спасибо за объек- 
тивную информацию. 

КОРР: В 1991 году была объяв- 
лена атака на игру ТВАНТОВ, Вот 
что я могу сказать по этому 
поводу: 

ИГРУ пройти очень сложно, 
тому я привожу РОКЕ: 

РОКЕ 49505,0 - ГТУЕЗ (ЕНЕЮСУ)} 
РОКЕ 49620,06 - Т1МЕ ОРР 

Необкодимо пройти по всем эта- 
хам, на каждом этаже по 1 компью- 
теру. Если подойти к компьютеру, 
он выцает букву и т.д. Надо посе- 
тить все 8 конпьютеров. На пути 
ногут встретиться таке два боль- 
ших компьютера, но о них чуть 
позже. Так вот, собрав все во- 
сень букв, из них составляем сло- 
во близкое по смыслу к вычисли- 
тельной технике: 

ЗРЕСТВОМ, САЗЗЕТТЕ, 
НЕСАСАМЕ, ЗОРТУАВЕ, 
КЕУВОАЕО, КЕНРЗТОН, 
СКАРНГС5, НАКПМАВЕ. ТЕВНТНАЕ, 
РЕТИТЕВ5, МАВСАМЕЗ, МАРКТОК$. 

Затем идете к Н1К-БЕСУЮ1ТУ- 
ТЕВНТНАЕ. И вводите составленное 
Вами слово. Если Вы собрали не 
все буквы, то компьютер выдаст 
сообщение: РАЗЗМОКО НОТ СОМРЬЕ- 
ТЕО. для вкода же в компьютер с 
собой надо иметь нагнитную кар- 
точку ‘и отвертку. 

Если Вы собрали все буквы, 


поз- 


БТЫСЬАТЬ, 
ЗОУ5ТТСК, 
СОНРОТЕВ, 


то 


> 


он напечатает РАЗЗУЮРО  АНАГУЗ1Т5. 
Если слово составлено верно и на 
тернинале все замигает и т.д., он 
выдаст`код для компьютера, управ- 
ляюшего транспортером, состоящий 
из трех букв. Теперь надо бежать 
К ТЕАНБРОВТЕК ТЕРМТНА:, РАУЕ 29565 
и ввести в него этот код (из трех 
букв). Если Вы ввели код правиль- 
но, то по окончании ввода услыши- 
те короткий звук. Если же код не- 
верен, то звука не будет. 

Затен встаете на транспортер и 
нажимаете букву “В”. Если Вы что- 
то сделаете не так. то при нажа- 
тии на ”В" космонавт погибнет. 

У меня игра’ ТВАНТОЕ версии 
ВИА. СИ.ВЕЕТ. Привоху пример за- 
грузчика с бессмертиенм, 


10 ВОБОЕЕ 0: РАРЕВ 0: ТНК 0: 
СЬЕАЮ 24999 

20 РОВ У = 18432 ТО 18499 

30 ВЕАЛ А: РОКЕ У, Л: НМЕХТ У 

40 БАБРОМТУЕ 05В 18432 

50 ПАТА 243, г21, 33, 168, 97, 17, 
248, 117, 62, 255, 55, 205, а, 8, ге1, 
33, 160, 215, 17, 63, 14, 62, 255, 55, 
г05, г, 8, 49, 255, 817, 33, 0, 91, гг9, 
229, 221, 33, 0, 54, 17, 168, 6, 62, 255, 
55, 205, 2, 8, 205, 168, 9Т, 175, 50, 9Т, 
193, 50, г12, 93, 33. 0, 64, 209, 1, 168, 
6, 195, 195, 51 


Это загрузчик всех блоков, 
кроме заставки (т.е. при загрузке 
надо пропустить загрузку застав- 
ки). Ставим магнитофон в том 
месте, где только что закончилась 
заставка и делаем вон. 

В заключение привожу еще нес- 
колько РОКЕ, найденных самостоя- 
тельно. 


НОНТУ.ОН ТНЕ РОН - 34714,00 


2ОМВТЕ$ - 29553, 0 
29565, 0 
АТЕМОНЕ 2 - 534353, 201 
или 53418, 0 
ВЕОООУ ЕУЕЗ - 43393, 0 
ТА МАСА - 40064, 0 
СНЕОНО5 - 56909, 0 
4155$ РАСНАН - 52887,0 
ВОЗСОНТАН - 33356,0 
ЕСЕНО ОР САбЕ —- 37054,0 
37055, 0 
р. РАТКОГ, 2 - 80562, 0 
ВОНВ ЛАСК - 48984,00 
АСОАЕ ГО - 31054, 0 
|САНЕОУЕЕ - 39337,0 
энергия - 39213, 201 
Ззавг, 124 
бомбы 33483, 0 
ООН - 24741, 0 
гв14г, 0 
УСУАСЕ - 54492, 0 
РАНАНА 30Е - 38629, 0 
38630, 0 
СООСКТЕ 28697, 0 
УТСТОКУ ВОАВ - 39385,255 
39402, 255 
ЕЪУ ЗНАРК - 42464, 255 


ВОСККАН - 56357,27 
56358, 220 
УРОВНИ: 
Е’ - ОНУХ 
*Н^ - 5АбЕ 
1’ - 6089 
9’ - см 
ЗАВОТАСЕ - за9т9, 62 
32980, 5 
32981,50 
зг9ва, 132. 
32983, 169 
ЗТРУКЕЮ - 63196, 0 
57263, 201 
59645, 201 
ВОНА - 31498.0 
31501, 0 
СОН2ТАТЕТЖе - 35749, 0 
ЕГУЕВ РАТЬ - 28170, 0 (+4е1) 
УТХЕЕ 11 - 51811, 195 
51812, 90 
51613, 202 
ТЕКАРТ - 41178, 255 
ТОЗАО - 272412, 183 
ФЕАТН ЗТАВ - 38351,0 
36682, 0 
ВАбРАР - 59857, 0 
АРАВТАН НТСНТ — - 57832,0 
ВАВВАВТАН 3 - 7132,0 
РУЛАНАРАНА - 48569, 0 
РАК ТРЕ - 35166, 0 
35167, 0 
35168, 0 
ВЕАОЕ АНГЕУ - 35129,0 
35130, 0 
ГРОТ ВУТЕ - 28236, 0 (&1те) 
30991.0 119ез 
СУВЕРНОТР  - ЕЕ. КЕУЗ: КС88 


или РОКЕ 31402, 0 
СУВЕВНОТО 2 - ПЕР. КЕУ5: ОБСУ 
или РОКЕ 34169,0 


Отт & 1155А - 35814.0 
энергия 36062,0 
УНЕЕЕ - 30034, 201 
или зоозт, о: 
30126, 4 
ВАНО 05Е 27934 
КЕАТУ КОНС - 24601,0 
ЗАНАНТНА РОХ - 24130, 6 
АСЕУТРЕРЗЕНЕН НМОНТУ 41128, 0 
41129, 0 
РНАКТОНМА$ - 44819, 0 
` 46149,201 
ТРАНТОВ = 49505, 0 
496г0, 0 
ХЕУТО0$ - 54501.0 
54050, 0 
НОНТУНОГЕ - 38003, 0 
Р555Т - 24983, 0 
253тг, 0 
ОАЕХ - 42488, 0 
ТОТ АСТО САМЕ: 
РАБЕ 1 - 5о29т, 0 


РАЗЕ 2 СОРЕ 517 49808, 0 
РАЗЕ 3 СОРЕ 124 53438, 0 
РАЗЕ 4 СОБЕ 500 49485, 0 


РАЗТ ЕООО - 41844, 0 
САЕТООН - 42дда, 0 
ВОПНТУ ВОВ - 43852, 0 
ЕСОТНОХ - 41914, 0 
ТНОНФЕВСАТЯ - 31402, 0 
ЧЕТТ — 47894, 0 


СВО55МТ2Е - 32955, 255 
САВАТ, - 30764, 0 И 
НОНТУ ЕВЕЕ - 38301,0 (11%е) 
34116, 0 (Ее) |, 
ЗАУАСЕ - 37457, 0 ь 
51573, 0 
52546, 0 
ЗАУАСЕ 2 - 32625, 62 
32626, 0 
забгт, о 
КОРЕ & ВЕАОУ - 33567,0 
НОБГУМЮОр РОКЕР - 38565, 175 
36621, 0 
САНЕОУЕЕ 2 -'38691,0 (11че) 
(Бош) 33455, 195 
(ромег) — 32532, 195 
ТУРЕ-ЮОРЕ - 28955.0 
28956, 0 
КВАКООТ - 36060, 0 
ХЕСУТОЕ - 54011.0 
РУНАТРОН - 41629, 0 
45189, 0 
Е-16 - 31564, 0 
ЕЛВЕ МХ - 45453, 183 
УТХЕК - 51789, 0 
5ОГОНОН'5 КЕУ РЕРТМЕ КЕУЗ: 
ЕВОЕР 
или 4944, 0 
ЗАМАСЕ 3 - 34398, 255 
АГТЕВ 8 - 51736,0 
ЕНООЕО РАСЕЕ - 43650, 0 
43651, 0 
ЕВЕРРУ НАЕО 3 -.58978,0 
ТРЕАЗОВЕ ТЗЕАНЮ - 61281,0 
59672, 0 
60126, 0 
61142, 0 
ИФК: Вадим Юрьевич. Вы проде- 
лали ОГРОМНУЮ работу, "расколов" 


такое нножество программ. Огром- 
ное спасибо от имени тех читате- 
лей, которые любят вносить изне- 
нения в программы для удобства 
ЛИЧНОГО пользования. от себя 
только напомним всем читателям, 
что НЕЛЬЗЯ НИ В КОЕМ СЛУЧАЕ РАС- 
ПРОСТРАНЯТЬ ПРОГРАММЫ С ЖЕСТКО 
ВНЕСЕННЫМИ В НИХ ИЗНМЕНЕНИЯНИ. 
Это бестактно по отношению к 
пругим пользователям, Никто не 
скажет за это спасибо. Кому же 
хочется докуривать чужие окурки, 
пни икикикиикиникихиккииикикиикиии 


Нам пишет Сайфутдинов Евгений 
Владимирович из поселка ПРИПОЛЯР- 
ный республики Кони: 


Эй! кого интересовал код 71 
ЕРАМЕ в Игре "1ИРАСТ"? Он очень 
прост: "). р.“ В догонку еше 31 
пароль к игре “ЕАЮКТН  ЗНАКЕК", 


1990 НТСНАЕГ. ВАТТУ. Игра схожа с]. 


сериалом ВООТРЕВ РАЗН, но сложнее 
интереснее - 32 уровня: 

- не требуется пароль. 

- ТНЕ ВОВВЬЕ ВАТН. 

- ТНЕ СВАУГТУ СНАНВЕЮ 

- НЕАР ТН ТНЕ С1.0905 

- НОЗН ТОЕР ТСЕГАНО 

- ОТАНОНО ОР ИТНЕ 

- ТНЕ ТУО ОЕ НЕАРТ$ 

- СЕНТВАГ ТЫСТНЕВАТОЕ 


чо 


113 


19 - 1ЫТЕВНАЕ ВЕАСТОК ТС 
10 - МОСЬЕАЕ ОРЕ САУЕКК5 
|1} - СВАУТТЕОН 5НЕ,5 

{2 - ТНЕ ОП. МЕ. 

|13 - МЕГ НЕМ. $01. 

14 - ТНЕ СЕАУТОСК СЕ, 
|15,- НОНЕУСОМВ$ 

116 - НАГВ ВВАТНЕР ЗОВСЕВУ 
|{7 - ВОЖУ ОВАТНАСЕ НТВЕЕ5 
118 - ЗРАСЕВЗЕ МАЗТЕВРТРЕЗ 
` 119 - ТНЕ ЗНАВЕ 

20 - ЕИЗЕ НО рОуВТ 

21 - ОТЕВ ВОПНО$ 

|22 - ЗРЕТЫС 1ОРЕР 

|23 - АБАВН СЬОСК МОВЕЗ 

23 - РОб ВЕЗЕ ЧАТЕКРАН, 
25 - СВЕАТ МА.5 ОР ЕТЕЕ 
26 - САНА САНА. 

27 - ТНЕ СОМБЕНАТТОН 10СК 
28 - УОЦЕ ЗАРЕ МТТН МЕ 
29 - УЕ ЕТ МАЮН НОЗЕ 
130 - ТНЕ КЕЕР 

31 - РОВ С0О00НЕЗ$ 5АКЕ 
32 - НО БЕУИ, ЬЕУЕР ОМ 


| - АВОВТ БЕУЕЬ 

АН - 001Т $СВЕЕН 

Е - МАР 

Коды добыты с помошью програн- 
\ны РОСТОК ч.4. 3 (Родионов} 


| инииикыи кии мин ким июинкиикикинники 


Нам пижет Левашов Назар Нихай- 
йлович из г. Киева: 


Добрый день! 

Недавно я исследовал програнну 
|"ЗРООКЕР" и обратил внимание на 
|мастерски сделанный — загрузчик. 
Первое, что бросается в гааза - 
| загрузка “задом наперед” - отлич- 
ный метод. зашиты. Второе (мало 
кто пользовался встроенным копви- 
Ровшиком этой программы. поэтому 
это почти никому неизвестно), ес- 
ли после загрузки програниы на- 
жать одну из цифр от 1 до 5, то 
программа скопируется на ленту. 1 
- выгрузка’ в обычны режине, 5 -0 
турбо-режиме, причем 
бейсик-загрузчик вы- 
гружаются на стандартной скорос- 
ти. Но самое интересное состоит в 
следующем: если нажать ` клавишу 
2,3 или 4, то программа `выгружа- 
ется на скорости на 4/4, 1/2, 3/4 
больше стандартной соответственно 
| (кроме пилсттонов и бейсик-за- 
Грузчика). Такой потрясающий ме- 
тод зашиты я нигде не видел. Нет 
такого копировшика, который  ско- 
пировал бы что-нибудь на такой 
скорости, 

Я не разбираюсь в ассемблере, 
и знаю только три команды: ВЕТ, 
САМ, и №0, дисассемблера у меня 
нет, но я точно установил, что 
программа в ассемблере начинается 
с адреса 23291, а запускается с 
23319. По-ноему. програмна пере- 
носит себя в конец памяти, т. к. 
я, просматривая маминный код, ус- 
тановил, что все САМ, адресованы 


`да еше и команду НОР, 


либо в ПЗУ, либо в конец памяти. 

Дунаю, что все читатели были 
бы рады разбору того, как эта 
програмна работает, а если об 
этон напечатать в "7Х-РЕВЮ", то 
это было бы прекрасным дополнени- 
ем к книге Михайленко "Зашита 
программ". 

Р.5. Такой че загрузчик я 
видел в програные "155", 06е эти 
игры составила Фирма ТНЕ Е ТЕАМ". 


ИФК: Уважаемый Назар Нихайло- 
вич! Ны уверены, что многих заин- 
тересует Ваша информация, но ны 
верим и в Ваши силы. Ведь группа 
команд САЫ., 10 и ВЕТ включает в 
себя чуть ли не 50% того, что пи- 
ШУТ на АССЕНБЛЕРе, а если доба- 
вить сюда еше конанды ВТ, кото- 
рые ничем от, САЬ не отличаются, 
то почти 
весь АССЕНБЛЕР Бам известен. на- 
верное Ван осталось только разо- 
браться с Флагами регистра Е, да 
узнать о наиболее часто вызывае- 
мых программах ПЗУ, а об этом мы 
очень часто пишем в "2Х-РЕВЮ”. 

С глубоким уважением. 

*ИНФОРКОМ". 


Нан пишет семейный экипаж 
Троеглазовых п, и Г. 
из с. Гайтер Хабаровского края. 
(См. также раздел "ФОРУМ" в 
РЕВЮ-92 на с. 24). 


Здравствуйте! 

Приветствуем атаку на програн- 
МУ “АСАБЕНУ”. У нас есть чем 
поделиться, но так как мы еше ма- 
ло с ней работали, мы хотели бы 
увидеть пути ‘поисков более опыт- 
НЫЕ ПИЛОТОВ. 

Й все-таки, мы вновь и вновь 
возврашаенся к “ЕГТТЕ”. Эта про- 
грамма неисчерпаема. Ны уже и неё 
считаем, в скольких галактиках 
побывали, вы правы - ин нет сче- 
та! Гера до сих пор не верит, 
что это так: "Па, это невозмож- 
но, - шесть в шестой степени, да 
еше каждая цифра может меняться 
от нуля до 255(!) - должен же 
быть какой-то предел!” 

Вряд ли... Как бы мы ни меняли 
ЦИФРЫ в байтах 61-66, мы каздый 
раз попадали в новую восьмерку 
галактик. И, конечно же, в этом 
сонме галактик найдется планета 
КАХХГА. А может быть и ие одна. 
да... Получается, что всей жизни 
не хватит, чтобы просмотреть все 
галактики. Невероятно! 

Браво, ЕТТЕ!!! 

В пальнейшен, говоря о галак- 
тиках. вряд ди нужно присваивать 
им какие-то номера, - где тут 
первая, где тысячная, кто скахет? 
Те галактики, что мы видим после 
загрузки, вероятно, стоило бы 


назвать просто "первоначальный 
вариант”. 
Проше, говоря о каких-либо 


особенностях в любой из галактик, 
достаточно лать ее галактические 
байты (с 61 по 66). То, что соб- 
ственные номера птисваивать бес- 
полезно, легко доказать. Берем 
ГРУППУ ПИФР 1,2,3,4,5,6 и засы- 
лаем их в 51-66 байты. Можно ли в 
этой восьмерке галактик опреде- 


лить, где первая, а где восьмая? 
Ведь сушествует цикл. В данном 
случае это: 

1 й 4 8 16 з2 64 128 
|: и 8 16 352 64 128 1 
3 6 12 24 48 96 192 129 
4 8 16 32 64 128 1 [3 
5 10 20 40 80 160 65 130 
6 12 24 48 96 192 129 3 


Значит, мы ножем набрать любую 
группу цифр и начать отсчет га- 
лактик (1-8) от первой появившийся 
на экране монитора. Л возьмем 
первоначальный вариант, - 74, 90, 
72,2, 83, 183, - почему это иненно 
ПЕРВАЯ галактика? Ни логики, ни 
смысла. 

Счет можно дать  восьнмеркам 
галактик. Берем, скажем, 1,0,0,0, 
0.0, делаем пикл и исключаен их 
из общего числа галактик и так до 
конца. Сколько же получится таких 
восьнерок, кто решит эту задачу? 
Задача не из легких, здесь нужно 
просчитывать каждый пикл,  исклю- 
чать его из общего числа вариан- 
тов, поння о невознолности превы- 
шения (при удвоении) цифры 255. 
Если кто-либо из програмнистов 
сможет решить ее, тр ПУСТЬ ПРИ- 
шлет вариант програмны. интересно 
посмотреть распечатку этих вось- 
нерок и узнать точно, сколько их 
в программе. 

Открыв ПУТЬ К самому интерес- 
ному, мы вдруг начинаем искать 
“достойную замену", С этим нельзя 
согласиться. "”АСАБЕМУ" - сака по 
себе, “ЫЫТЕ” - сана по себе, Эта 
программа будет еше не один год 
удивлять и восхищать всея нас! 

Ны с Герой исследовали ухже 
сотни галактик и сейчас расскажен 
© некоторых из них. 

В галактике с "галактическими 
цифрами” - 7, ТТ, 8, 88, 9,99 мы на- 
толкнулись на неизвестный нам 
корабль, назовем его РБЕЦО-РУ- 
ТНОЫ. Шел оны Нирио и мы имели! 
возножность спокойно осмотреть 
его со всех сторон, срисовать 
при помоши кнопки ПАУЗА и рассте- 
релять его, тен самым проверив 


его боевые качества, - вел он 
себя в бою, как РУТНОН, зашита та 
хе. 


Нотаясь по галактикам, мы име- 
ли возножность побывать на двой- 
ных, тройных, четверных и цаже 
патерных, семерных звездах. Да- 
лее я буду давать в строчку через 
запятую значения байтов р 61 по 
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66 тех галактик. в котбрых есть 
что-либо необычное, красивое, за- 
гадочное, интересное. В восьмер- 
ке галактик 1,2, 3,4,5,6 - 128,1, 
129,2, 130, 3 ны увидели множество 
двойных, тройных и  четверныя 
звезд и даже целые их группы: 

В цикле из восьми галактик 


Т, ТТ, 8, 88, 9,99 там, где мы по- 
встречали РЗЕУПО-РУТНОН, в одной 
Из галактик (193, 83,2, 22, 66, 216) 


можно увидеть семерную звезду: 
Очень красивые галактики В 
цикле 128, 48, 16, за, 64,254 - 64, 
24, 8, 16, з2, 121. Общее расположе- 
ние звезд в галактике 128, 48, 16, 
32,64; 254 такое - диагональное, 
интересны располохения звезд и в 
других галактиках этого же  цик- 
ла. 
Тройные, 


четверные и другие 
звездные — системы встречаются 
сплошь и рядон и, дуНаю, о ник 


уже достаточно сказано. 

Но вот новая неожиданность: 
ФЕОДАЛЬНАЯ ГАЛАКТИКА { ! ) ый 
(тг, тг, тг, та, 72.12). Уровень 
развития не превышает в ней 
десяти, космос забит пиратани. 

Запускаен “галактические” бай- 
Ты - 5,10, 15, 20, 25, 30 и обнару- 
живаем, что в первой из восьми 
Галактик этого цикла только четы- 
Ре типа правительств - Корпора- 
ция, Диктатура, Конфедерация и 
Феодалы. Во второй (10, 20, 30, 40, 
50, 60) власть ‘делят демократы и 
Диктатура и вся галактика доволь- 
но высокоразвита (средний уробень 
развития 9-40}. В третьей (20, 40, 
60, 80, 100,120} уже властвуют  то- 
лько Корпоративные и Конфедера- 
тивные интересы, эта галактика 
тоже очень высокоразвитая. В чет- 
вертой снова всего лишь 2 типа 
власти - Корпорация и Диктатура, 
да и сана эта галактика, очень 
красива, звезды собраны в скойле- 
ния, похожие на звездные дороги 
(40, ВО, 120, 160, 200, 240). В местой 
галактике (160, 65, 225, 130, 35, 195) 
нет ни демократии, ни Анархии, ни 
мультиправительств. В Т-й (65, 
130, 195, 5, 70,135) есть всё виды 
правительств, на всю галактику 
лишь 2-3 планеты Анархистов и 
общий уровень развития довольно 
низок - очень релко попадается 
10-й, еше реже 12-й. 

НО ВОТ новая тайна “ЕТТТЕ”! 
Запускаен в “галактические байты 
дИФРЫ - 1,8, 1,8, 1,8 и путешеству- 
ён по этой восьмерке: 1-я, 2-я... 
казалось 6ы ничего слишком нео- 
бычного, но ‘чудеса начинаются с 
третьей галактики. В этой. галак- 
тике (3, 32,4, 32,4, 32) правят лишь 
`Анархисты и Коммунисты и здесь мы 
Вдруг натыкаенся на планету без 
имени. ‹ Все есть, все причиндалы, 
а вот названия нет. Общий уровень 
Развития низкий (4-5). 

Летин дальше. Свова сплошь Фе- 
одальная галактика и, чтобы пере- 
лететь в следующую, нухно долго 
мотаться по галактике, отыскивая 


Феодалов с 10-м уровнем развития. 
Приобретаем У них галактический 
привод и летим дальше. В пятой 
галактике - только Нульти-прави- 


тельства и та же беда с приобре- 
тевием галактического привода. 
Следующая галактика - рай для 


ГКЧИ! - (32,1, 32,1. 32,1). 
Берем галактический привод и 
рвем когти из этого "рая" - попа- 


даен... к Анархистан ($4,2, 64,г, 
64,2). В следующую галактику путь 
закрыт, т.к. уровень развития 
здесь не превышает 8. Что же это 


за таинственная галактика, в ко- 
торую такин вот путен (невозмох- 
ность приобрести галактический 
привод) закрыли дорогу? 
ПРИХОДИТСЯ отгрузиться, 
вскрыть  102-байтный блок и 
выбрать одну из трех дорог - по- 
лучить ниссию "Сверхновая" (46-й 
байт - 1), приобрести галакти- 
ческий привод (58-й байт -= 255) 
или удвоить шесть “галактических” 
байтов (128,4, 128,4, 128,4). В 
любон случае мы попадаем в... 
"ЧЕРНУЮ ГАЛАКТИКУ”. На общей кар- 
те ны не видим ни олной звезды, 
но нажав клавишу "О" видим стран- 
ную картину - в. галактике полно 
невидинык звезд и на крупной кар- 
те они обозначены только названи- 
яни, эвезд не видно! Тип прави- 
тельства - Только Анархия,  уро- 
вень развития - только е иб. Да 


и названия довольно странные - 
они двойные: 

ТАТЗВЕ РАМАТЕ ТНМА 

ТАТЗЕЕ, ВАНАТЕ, 1ЫНА и в очень 


редких случаях мы видин название 
планеты, состояшее из одного сло- 
ва - 2А15АЮ. Много одинаковых на- 
званий, например, мы обнаружили 


две планеты 2АТ5Е, 
7ТАТЗВЕ 

ТЫМА и т.д. 

ТИНА 

В описаниях к планетам. гово- 
РиТся везде, что пивилизации на 
этих планетах безобидные (НАЕН- 
ЪЕ55), и находятся в санон начале 
своего развития. 

Мы могли бы рассказывать и 
рассказывать о новых и новых от- 
крытиях и тайнах “ЕТЕ", но до- 
вольно. После публикации в номере 
5-6 411992), вероятно, не один 
десяток пилотов бросились в атаку 
на галактики и вы получили, на- 
верное, не одно письмо на эту те- 
му. С интересой ждем публикации 
этих писем. 

Несколько слов о байтах в от- 
грухаемон блоке - Фраза "Браво, 
Командор!" появляется при уУвели- 
чении байта 15 на единицу. 

41-й байт (грузоподъемность) 
по коду ИГРЫ изменяется сана вот 
такин образом - 20, 35, 69,138 и 
снова 20... ит.д. Засылая сюда 
другие цифры, мы обнаруживаем, 
что во время игры снова возвра- 
щаемся к этим хе цифрам (к бли- 


три планеты 


хайшей из них), а поставив цифру 
69 и подкрепив 6ё 69 т груза, ны 
с удивлением обизруживаем, что 
можем загрузить во время игры 138 
Т ГрУза. Поставив хе.в этот байт 
ЦИФРУ 138, мы модем здорово "про- 
лететь”: после одного-двух перё- 
летов мы не сможем взять больше 
20-ти тонн груза и все попытки 
купить дополнительный грузовой 
отсек будут пресекаться сообще- 
нием “АБ РЕЕЗЕНТЗ...” 

В последней распечатке байт 73 
стоит у вас под вопросом, но мы 
уже писали, что он означает 
технический уровень и вновь под- 
тверждаем зто. Здесь как ив 
байте 18 нужно прибавлять едини- 
цу, Т.е. 0-1,4:5, 11:12 ит. д: 

Байт 74 - тип правительства: 

0 - Анархия 

1 - феодалы 
2 - Мультиправительства 
3 - Диктатура 
4 - Комнунисты 
5 - Конфецерация 
6 - демократия 
Т - Корпорация 
в зависимости от этих цифр, 
видимо, и количество противников 
у очередной планеты. Ны пробовали 
заслать корпоративной планете с 
уровнем 15 цифру 1 и еле-еле от- 
бились от пиратов. 

И еше небольшая справка-экспе- 
ринент, чтобы “отработать” ‘рей- 
тинг БАНСЕКОО5 от и до и получить 
РЕАГЬУ, нужно включить ФУНКЦИЮ 
“р” и провести 100 боев с Тарго- 
идами. 

И еще несколько слов о "Черных 
галактиках" (их много в програн- 
ме). Имена планет могут быть и 
тройныни 2АКСТ 

(РАВСТ) 

ПАВСТ 
но ‘это не значит, что планета 
тройная или двойная. Есть еше од- 
на странность. На крупной карте 
(“0”) мы читаен название планеты, 
затем нажимаем “К", набираен имя 
этой планеты и Курсор прыгает в 
другой конец галактики(?). На 
планеты с двойным названием кур- 
сор указывает тодько через “ПО”, 
ЕСТЬ И другие чудачества. .. 


ИФК: Большое спасибо вам Павел 
и Герасим за ОГРОМНЫЙ ТРУД. Вы 
правы, по Вашин стопан пошли 
многие исследователи. Если Вы 
позволите, то Ваш труд можно было 
6ы назвать “Исследование цикли- 
ческия свойств генератора случай- 
ных данных в програнне ЕТЕ”. 
начатое Вами исследование подхва- 
чено и привело к новым открытиям, 
правда они уже относятся не сов- 
сем к игре, а к натенатике ик 
програннированию. На эту тему мы 
недавно получили весьма серьезную 
работу от нашего корреспондента 
из г. Новосибирска Эбигнева В.А. 
ЕФ Вы увидите в следующен вы- 
пуске “7Х-РЕВЮ” под рубрикой 
“Профессиональный подход”. 
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(С) ЕФремов Александр 
Александрович. 
г. Челябинск, 1993г. 


ОПЫТ РАБОТЫ С ВЕТА-ВАЗТС 1.8 


Предлагаю вниманию читателей 
небольшие выводы из своего опыта 
работы на ВЕТА ВАЗ1С 1.8 и более 
ранних версиях. Полагаю, что пуб- 
ликация этого материала  мохет 
значительно облегчить  програнни- 

Рование на ВЕТА ВАЗТС как начина- 

юшим, так и ухе имеющим опыт ра- 

боты с ним. 

известные трУДНОСТИ ПРИ ПРО- 

граммировании на ВЕТА ВАЗ1С 1.0 и 

1.8 вызывает пролесс передачи па- 

Раметров при обращении к процеду- 

рам. В отличие от ВЕТА ВАЗТС 3.0, 

где применяется Форнат обращения 

к процедуре типа; 

РВОС Наше (а1, аг,... аи) , 
где а1,а2,...,аы - 
параметры, Г 

более ранние версии этого языка 

принуждают использовать громозд- 
кие конструкции с большим коли- 
чеством операторов ГЕТ, что ухуд- 


ВОЗВРАЩАЯСЬ К НАПЕЧАТАННОМУ 


шает читаемость программы и трг- 
бует значительных затрат опера- 
тивной памяти. 

Предлагаемый нной нетод за- 
ключается в использовании для 
передачи Фактических значений 
Форнальных параметров процедуры 
пары операторов ВЕАБ и РАТА. В 
программе это выглядит таким о6- 
разон: 

10 РЕР РКОС Наше 


20 ВЕАР а!, аг,.... ан 
50 ЕНР РКОС 
100 БРАТА х1,х2,...,ЖН: КЕЗТОЮЕ 


100: РЕОС Наше , 
где х1,хг,...,хЫ - значения 
переменных а!, аг,..., ан. 

Кроне экономии памяти и на- 
гаядности, метод позволяет ис- 
пользовать одну строку ОАТА для 
нескольких вызовов процедуры с 
одинаковыми параметрани, переводя 
перед каждым таким обрашением 
указатель оператора ЕЕАР на стро- 
ку с необходимыми значениями. Од- 
новременно‘с этим появляется воз- 


{С) Пыльцов Вадим, 
Г. Надым, 1993г. 


СОРТИРОВКА РУСИФИЦИРОВАННЫХ 
СИМВОЛЬНЫХ СТРОК 


В статье "Полная русификация 
Мастерфаял-09” автор предлагает 
читателям обсудить проблему сор- 
ТИРОВКИ русских СЛОВ По алфавиту. 
{Сн. 2Х-РЕВЮ-92, с. 29, 171). 

В своих программах я эту “про- 
блену” решаю очень просто. Напри- 
мер, с адреса 650000 я разметаю 
‘таблицу длиной 33 байта (ровно 
столько букв в русскон алфавите) 
и в ней последовательно распола- 
гаю коды букв РУССКОГО ааФавита 
т А до Я. Предполохим, что буква 
А У нас в нашем дополнительном 
ваборе не изменязась, т.е. ей 
соответствует код 65, как ив 
стандартном наборе “Спектрума", а 
буква "Б” у нас заколирована по 
адресам буквы Ъ (латияская строч- 
ная) т.е. ей соответствует код 


ОПЕЧАТКА В ПРОГРАНМЕ 
"КРИББЕДЖ" 
(2Х-РЕВЮ-92, с. 


157) 


В дианов Р.Ю. из г. Братска Ир- 
кУтСской обл. Просит — УТОЧНИТЬ 
строку 4515 из _Брограммы 


ножность гибко задавать число 
паранетров; 

10 РЕЕ РВОС Таые 

20 ВЕАР Н 

30 М А(Н) 

40 РОК 1-1 ТО Н: ВЕАО АСТ): 
А(Т}: МЕХТ т 

50 ЕМО РВОС 


РЕТНТ 


100 ПАТА 4,1. 1,2. 6Т, 3. 15, 4. 16 


элементы передаваеного 
массива 

количество эленентов 
массива, передаваено- 

го в процедуру. 

110 ВЕЗТОВЕ 100: РЕОС Таые 
Применение такого подхода в 
НОмЕ ПрОоГраннах позволило сокра- 


тить использованные под текст 
программы ресурсы памяти на 
15-20% ‘и значительно повысить 


наглядность и читаемость. Наде- 
юсь, и другие пользователи ВЕТА 
ВА5ТС найдут применение методу, 
списанному выше и по достоинству 
опенят его преимушества. 


98. Тогда по адресу 60000 мы за- 
пишен число 65, по адресу 60001 
число 98 и так далее до ячейки 
60032. В ней будет храниться код 
символа, вместо которого "зашита“ 
букза я. 

Больше тан ничего не нужно. В 
программая сортировка у неня про- 
исходит на ассемблере, что нного- 
кратно понышает скорость работы, 
но это можно сделать и из Бейси- 
ка, правда при этом скорость ра- 


‘боты немного снизится, 


А делается это так. ДоПУСТИН, 
у нас есть символьная переменная 
&% = "БАБА ЯГА“ (это какая-то 
Фамилия иди имя}. Программа опре- 
целяет код первой буквы - у нас 
это 98. Далее делается цикл: 


100 РОК М = 60000 ТО 60032: 1Е 
РЕЕК М = СОРЕ А%(Т) ТНЕН ВЕТ Н = 
Н - 59999: СО ТО АНОТНЕВ 

110 НЕХТ И 


т.е. если код первой буквы 


бепж", опубликованной в Н 1,8 
*7Х_РЕВЮ-92". Тани пропушена пере- 
менная: 

4515 ТЕТ ? =. 5: ШЕТ мел = 2 


Нам очень стыдно и неудобно. 
но почему-то с листингами такое 


равен содержиному одной из ячеек 
нашей таблицы, то переменная Н 
становится указателем, какая эта 
буква по порядку в русском алФа- 
вите. 

У нас М становится равным 
ДВУН. Дальше уже идет сам процесс 
перестановки иди СОРТИРОВКИ) 
инен. Если же сортировка произво- 
длится по нескольким начальным 
букван, то мы просто организуем 
еше один цикл, например, с именем 
Ж и буден сравнивать РЕЕК Н с 


- СОБЕ 4$ (Н). 


Я не пишу все это более под- 
робно, потому что идея эта сана 
по себе тривиальна и годится для 


` самостоятельного разбора. 


Так что, как видите, тут ника- 
кой проблемы и‘ нет, все очень 
просто. Но еше лучше, как я уже 


сказал выше. сделать всю эту 
СоРТирОВКУ на языке Ассеибдера. 
особенно если сортируется большой 
нассив данных. 


бывает. Посде подготовки ориги- 
нал-какета в печать сколько не 
выверяй программу и не лови 
“блох", все равно какая-нибудь 
гадость просочится. 

Правильно доджно быть так: 


4515 ГЕТ с:5: БЕТ еп = & 
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ПРОСНОТР ЗАЩИЩЕННЫХ ПРОГРАММ 


Письмо на тему взлома замимен- 


вых Бейсик-програнн прислал пан 1р А, з0а ; Открыть канал 
наш юный читатель из г. Чехова СА, #1601 ; экрана, 
Бессонов Александр. Ему всего 14 СА, ЗЕРОЗ ;вВывод сообщения об авторе. 


но несмотря ва это, он пред- 
ложил вполне. профессиональную 
и достаточно квалифилированную 


12 НЕЁ, (#560535) 
102 рБ, (#5С4В) 


Ау {НРЕРО), РЕ ; Сохранение его в ячейке. 


Листивг г. 


: Значение сист. оёрем. РЕОб. 
; Значевие сист. перем. УАБ$. 


программу. Вот, что он пишет. 5ТЕОК 1 4.800 ВА - код “ЕНТЕЮ”. А 
“Еше полгода назад я написал СА, ЗРЕРР ечать этого символа. 
программу “1.00 ВА51С РИОСКАМ5” 12 ^А.300 А - код “ЕНТЕБ". а 
(далее ГВР). Я использую ее ухе САМ, УРЕРР Печать этого символа. | 
долгое время и она позволяет РУБН 1. ; Печать | 
взламывать все программы (я рабо- СА, чнл28 ; номера 
таю с дисководом и не уважаю кла- РОР НЫ } СТРОКИ. 
вишу “НАСТС", предпочитаю пере- РОЗИ НЬ :Сохр. апреса на стеке; й 
писывать игры с ленты на диск по РИЗН НЕ ; Перезапись | 
файлан). Также я использую прог- РОР ВС :и3 Н. в ВС 
рамму "РАКЕТ",  состояшУр из ЬБР, см, згрев ‚Передача ВС на стек калькул. 
НОК54, ГОАБ/НЕЮСЕ (посаеднюю нож- 12 А, %тВ ВА - код *1*. 
вю взять, напринер, в БАИТЕКе Н 1 САМ. ЯРЕРЕ ; Печать этого символа. 
за 1992 г.) | 5ЕТ 2, (1У+687) ;Включение инверсии. 
Я писал эту программу, основы- сАм. $20Ез ; Печать значения числа, пред- 
ваясь на том, что главиыми спосо- : ставленного в 5-байт. Виде. 
бами зашиты являются управляющие ВЕБ 2, (1У+87) .;Выключение инверсии. 
синволы и 5-байтное представление 10 АТО ВА - код *1". 
чисел. Введя програнну из листин- САМ. ЯРЕРЕ ‚Печать этого символа. 
га 1, Вы получите [БР с адреса РОР НЬ ;В Н. - адрес начала строки. 
65000. Теперь можете выпоанить нс нь ;Теперь в М, - адрес пары й 
НЕМ и загрулать зашишенную прог- тен, ‚ячеек с длиной строки. 
рамму {через НЕКСЕ или р С, (а 
*РОАР/НЕВСЕ” }. Вызов ВР Г с н 
КАНООНТТЕ 958 65000. ьо в, (В) 
Формат, в котором [БР ВЫВОДИТ тс нь 
Бейсик-програнму: 12 А’ ;ВА - код *(*. 
10 1237751 (20) ВЕН ‹‹<‹<<<<<< СА, #РЕРР ‚Печать этого синвола. 
ТРЕ ВАУ 1992 ТР РОЗН Н, ; Печать 
Здесь 10 - нонер строки: сАм, #грёв ; звачения 
{237551 - адрес начала строки САМ. #20ЕЗ } АЛИНЫ 
{в инверсном виде); РОР НЕ. ; СТРОКИ. 
(20) - о длина строки (ножет 10 ^.3г9 ВА - код *)". 
быть ложной). СА. ЗРЕРР ;Шечать этого симвова. 
Далее идет обозначение управ- ТНЕ 12 А, (НЫ :ВА - код из памяти. 
ляющих символов (все в инверснон СР 320 ‚Проверка, что за код? 


виде) : 3 НС. ЭРЕБР  сЕсаи печатный синвол, 
Т - ТАК (Снз 15, №) :то переход на РЕШИТ. 
г Р - РАРЕВ (СНАЗ 11. Ш) 5ЕТ 2, (1У*+87Т) Если УПР. код. ТО ВК. 
Е - РРАЗН «СНЮЗ 18. М) ; инверсии и проверка, 
В - ВРтСНТ (СНБ$ 19, Н) ; что за код. 
У - 1НУЕЮБЕ (СНЮ$ 20, Н) РЕВТ РЕ!О СР #10 ; Проверка тк. 
А - АТ (СНЕз гг, Хх, У) РЕЗ9 ССУ4РЕ САЦ, 2, #РЕЯ8 :Еспи да, то выпоан. ТНК. . 
`Т - ТАВ (СН8з 23, м, 0) РЕЗС РЕ!1 СР #11 : Проверка РАРЕК. у 
< - ВАСК (СНЕ 8). РЕЗЕ СС9СРЕ САМ. 2, ЗРЕЭС Если да, то выполи. РАРЕЮ. 
После каждого числа ЬБР выво- ЕЕЗ1 РЕ 2 СР. #12 Проверка РТАЗН: И 
дит в квадратных скобках и в ив- РЕ5З ССАОРЕ ` САШ, 2, ЖРЕЛО ;Если да, то выпойн. РЪАБН. 
версном виде настоящее число, ЕЕБб РЕ!3 СР 313 ;Проверка ВАТЕНТ. 
представленное в лятибайтной Фор- РЕ58 ССАЧЕЕ САМ. 2., ЗРЕАЯ ;Если да, то выполн. БЕТСНТ. 
ме. Например: с РЕЗВ ЕЕ!4 СР #14 ;Проверка ТНУЕВ$Е. 
10 1[23755} (20) ВЕН ‹<<<<<<<‹ РЕЗЮ ССАВРЕ - САМ. 2, ЗРЕАВ Еспи да, то выполн. ТНУ. 
ТР ВАУ 1992 1Р 2РЕбО РЕ!5 СР 315 :Проверка ОУЕК. 
20 {23779} (30) ТНК 6Е4 101: Р. |РЕб2 ССАСРЕ САЫ, 2. ЧРЕАС :Если да, то выполн. ОУЕБ. 
АРЕЕ 12.5 (3): БОАР ""СОБЕ 12345 РЕб5 РЕ! СР $15 ; Проверка АТ. 
130000} ЕЕбТ ССВОРЕ САМ. 2, ЯРЕВО :Еспи да, то выпойн. Ё 
30 1238031} (10) ВАНООНТЕЕ 058. РЕбА РЕ1Т СР т Проверка ТАВ. 
О 130000. 121 РЕбС ССВЗЕЕ СА, 2, РЕВЗ ;Если да, то выподн. Т. 
В строке 30 напечатано чисао ЕЕбР РЕО8 СР #08 ‚Проверка ВАСК. У 
0, а по-настояшену здесь число ЕЕТ1 ССВАРЕ САМ, 7, #ЕЕВА ‚Если ца, то выполн. ВАСХ. 
30000. 12. Это сделано для того, ЕЕТ4 РОСВ5Т9б ЕЕ а, (11+87Т) ;откаючение инверсии, 
Чтобы “вручную” разгадать это РЕТВ РЕОЕ СР %0Е ‚Проверка "ЧИСЛО". 
число было ТРУДНО, а ФУНКЛИЯ 058 РЕТА СССбРЕ САЫ, 2. НРЕСб ;Есаи да, то выполн. 
просто откинет дробную часть, РЕТО РЕСБ СР 00 Проверка ”КОНЕЦ СТРОКИ". 
Примечания: РЕТЕ 2010 Ле КЕ, РЕ 91 Если это код от 18 до 31, 
1. Если после того. как Вы на- то перекод на РЮОВ. 
печатали КАР. 158 65000 вам вы- РЕЗ! 23 тнс нь :Переход к следующему адресу. 
дался не весь листинг, то выпол- ГЕВО Е5 РОЗН НЫ ;Сокранениг его на стеке. 
ните: С1.5: ВАМПОН!2Е 058 65000, ЕЕВЗ  ЕО5ВЕОРЕ 102 ОЕ, (ЧЕЕРО) ;В ПЕ - значение УАЮ$. 


2. ЬВР ве проверяет наличие 


Если ее нет, то 
просто экран заполнится разныки 
синволани и в ответ на запрос 
да в Бейсик. " 
Иными ники ини ниинимих ныниникии 
конментарай ИНФОРКОНА: это ка- 
сается второго пункта примечаний. 
Наличие програмны ке проверяется 
что это недостаток 
програмны ЬВР, а потому, что за- 
‚ранее невознохно предвидеть, ка- 
кыми способами защиты воспользо- 
вался автор зэзмишенной програимы. 
Вам предоставляется “листивг“ в 
том виде, как он ножет быть ин- 
терпретирован Беясиком. а Вы уже 
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КАКИЕ КОМПЬЮТЕРЫ МЫ ВЫБИРАЕМ 


Уважаемая редакпия!' В своем 
письме я затронул одну из важнык 
проблем компьютеризации - выбор 
начинающим радиолюбителем нодели 
персонального компьютера (ШК) для 
саностоятельной сборки. По самым 
скромным подсчетам за 1991 год у 
нас в стране было собрано более 
90 тыс. Зрес&гию-совместимых ПК, 
что существенно превысило общее 
количество всех других, в том 
числе и пронышленно выпушенных, 
и ввезенных 6из других стран 
компьютеров раздичных — моделей. 
Учитывая достаточно широкий вы- 
наибоаее распространенных вер- 
сий. Но отзывам всех знакомых мые 
ралисаюбитеней, подобные публика- 


что важно в Усвовиях 
конкуренции различных изданий для 
радиолюбителей. 
“ ® ” 
начиная с-1987 года у магазина 
“Пионер”, затем на Соколе, в Пок- 
Ровско-Стрешнево и еше бог знает 
где в Москве, а впоследствии у 
станции метро "Тушинская" появи- 
лось около 10 основных моделей 
"Ббресагию"-совместиных ПК Эти 
модели и их различные версии ста- 
ли теперь основным парком вытовых 


ик в бывшем СССР баагодаря их 


простоте, дешевизне И огромному 
количеству отличных программ. 

Радиолюбителю, ‘а порой и про- 
Ффессионалу сдожно разобраться в 
преимуществах одних моделей перед 
другими, так как практически от- 
сутствует информация о тонкостях 
и сложностях в настройке и экс- 
плуатации. а такяе совместимости 
С программным обеспечением, Проб- 
лема также состоит в тон, что в 
настоящее время сбыт некоторых 
моделей ШК оказался в кругу инте- 
ресов их разработчиков. Как пра- 
вило, вся информация о.таких пк - 
это`реклама, и теневые стороны не 
освешаются. 

Первой массовой моделью стай 
ШК “Москва“. При сложности в из- 
готовдении и настройке, а также 
при большой количестве дорабо- 
ток, которые необходимо вносить, 
этот ПК до сих пор остается наи- 
более полноценным повторением мо- 
дели “7х-ЗРЕСТВОНМ" с точки зрения 
мащиниых циклов и организации па- 
мяти. Следует также отметить, что 
в телевизионном кадре у ”Носквы" 
312 строк, что соответствует 
ста ‚ а не 320, как у боль- 
ван с пруГгик моделей. Только в 
этоЯ модели предусмотрено тормо- 
хейме процессора при видеовыводе 
и обрашении в адреса с 4000Н по 
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“Москва“ 
“Балтика“ 
*Носква 128" 
® Ленинград-1 
=пентагон“ 
"Красногорск 
“ Ленинград-2 
"2Х-РКОЕТ“ 
*пентагон12в 
*АТН-ХаГЬО” 
"Апяз4гев" 


ПРИНЕЧАНИЯ: 
1. Размер платы указан в ни. 


г. Кодичество корпусов никросхен может отличаться в разаичных 


версиях модели пк. 


3. Указывается наличие на плате ПК контроллера дисководов. для 
Тк-005, интерфейса принтера 2Х-ЬРЕТНТ, интерфейса КЕНРЗТОН- 


УОУБТЕСЕ. 


4. Указывается наличие на плате неста под разъен системной щи- 
ны. Системные мины разных моделей ПК не ставдартны. 


5. ПК "7Х-РКОРГ" состоит из двух плат. 


шей платы. 


в000Н (16384-32767 РЕС). Однако, 
сложности в настройке делают ПК 
“Носква“ малопривлекательным для 
начинающих радиолюбителей. 

Спедующим этапом ПК был “Бал- 
тик” (название произошло от того, 
что плату и схему разработали в 
Вильнюсе). Основным достониством 
этой модели явБляется простота и 
высокая надежность в работе. На 
плате мало исправлений и компью- 
тер прост в валадке. Но наличие 
микросхем к556РТ$ и К!55РЕЗ. не- 
обжодиных для организации намин- 
НЫЕ ЦИКЛОВ И Работы видеопроцес- 
сора, которые необходимо прелва- 
рительно програмнировать, накда- 
дывает некоторые ограничения на 
доступность комплектующих. Бест- 
кая организация машинных циклов и 
существенные отличия в организа- 
ции работы памяти, а также повы- 
тенная вследствие этого до 4 Нгц 
тактовая частота процессора. де- 
лает эту модель менее совместимой 
программно. Но этин причинан в 
настоящее время версия “Балтик” 
нало распространена. 

Сушественным шагом явилось по- 
явление модели "Носква 128" (раз- 
работанной скорее всего неё в Мос- 
кве). Это первая модель, где ис- 
пользуется “прозрачное” озу, т.е. 
режим, в котором процессор при 
обращении к памяти не тормозится. 
Прототипом этой модели послухил 
ЛК "5ТНСЬАТЕ* 128“. Но использова- 
ние работы памяти в критичных ре- 
жиная, а также отсутствие музы- 
кального сопроцессора сделало эту 
модель весьма убогин повторением. 

В “Носкве 1268“ бъя впервые 
предусмотрен ‹ интерфейс принтера 
ЬХ-РЕТЕТГ и оригинальный програн- 


413. 


Указан разнер наиболь- 


мируемый дхойстик, также: предус- 
нотрено подключение двух КЕНР5- 
ТОН-джойстиков и полноценный 
ТУ-ВСВ выход. К несчастью, эта 
модель не получила распростране- 
ния из-за малого количества про- 
грамн, рассчитанных только под 
"51НСЬАТе 128" и сложностей в на- 
стройке, проявляющихся как "сбой- 
ность” в 03У. : 
Самой массовой моделью “брес- 
&гилр"-совместиных намин без кон- 
тРОоллера дисковода стал *Ленин- 
град 1". Его основные достоинст- 
ва: простота, дешевизна. неболь- 
ное количество исправлений на 
плате, повторяеность. Из-за от- 
сутствия достойных конкурентов 
эта модель приобрела большую по- 
ПУлЯрНОСТЬ. К сожалению, за про- 
стоту привлось заплатить плокой 
совнестиностью. Неправильная ад- 
ресация портов, а как следствие - 
побочные эффекты и сложность под- 
каючения внешних устройств. на 
плате не предусмотрено системного 
разъена и подключить любую пери- 
Ферию очень сложно. Хотя торможе- 
ние процессора в цикле №1 (при. 
выборке кода инструкции из 03у) и 
облегчает режим работы памяти, но 
сильно вредит совнестимости С 
программным обеспечением. В нас- 
тоящее время эта нодель постепен- 
но сходит с рынка, котя и ее по- 
следователи не лишены нногих до- 
пущенных в ней отибок. 
Олновременно с "Ленинградом 1” 
на рыйке появился компьютер “Пен- 
тагон“‘или "Пентагон 48",  проз- 
ванный так за пятиугольную раз- 
водку земляной шины по контуру 
печатной платы. Это была первая 
модель ЗРЕСТКОМ-совнестиного НК. | 


В КОТОРОМ на одной плате распо- 
ожен компьютер и контроалер дис- 
ковода. ”Пентагон” много нозаим- 
ствовал от “Москвы 128", в част- 


ности, “прозрачное” озу, ’адреса- 
цию портов и недостатки,  свойст- 
венные “Москве 128”. динаничес- 


кая панять в этой модели работает 
на предельных частотах, да и пла- 
та разведена не лучшим образом. 


весной. Как положительную сторону 
этой модели можно отметить ус- 
'гройство ввода с магнитофона (ва 
КНОН К56б: ЛНг), а как отрицатель- 
ную - отсутствие систениого разъ- 
ема. “пентагон 48“ попудярея еще 
хотя постепенно вытес- 


“Пентагона” на 
*Ерасногорск”. 
Это оригинальная нодель, в кото- 


вых сигналов используется 
К5Т3РФ2(5), с зашитой в ней таб- 
пищей. В “Красногорске” исполь- 
зован хоть и прозрачный, но 05- 
легченный за счет жестких на- 


шинных циклов режим озу, на плате 
Разведен  Формирователь  ТУ-ЮСВ 
сигналов. Эта версия ПК стала 
попыткой исправить недостатки 
“Балтики” и "Ленинграда 1”. но 


из-за трудности приобретения ПЗУ 
< таблицей, сложности расвирения, 
-за отсутствия системного разъ- 
ема и неправильной адресации пор- 
эта модель не стала такой хе 
как “Ленинград 1”. В 
время “Красногорск” 
очень мало распространен на рын- 
ке. 
После появления в начале 1990 
года “Красногорска”. в силу ряда 
причин на рынке’ бытовых ПК больше 
года не появлялось новых моделей 
*5ресагша"-совместимых комльюте- 
ров. Появление ПК “Орион 128" на 
базе процессора КР580 ик80, ни с 
чен не совместимого программно, 
не оказало сушественного влияния 
на развитие бытовых пк. Однако, 
весной и летом 1991 года на рынке 
появилось сразу несколько новых 
"Ленинград 2" представ- 


а = 
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“Ленинграда 1", по сравнению с 
ним в новой модеди исправлена 
адресация порта КЕМРЗТОН-джойсти- 
ка, котя остались ошибки с адре- 
сацией “бордюрного" порта РЕ 
{254}.  видеопроцессор Форнирует 
312 строк в кадре, выведена вне- 
шняя шина. “Ленинград 2” сушест- 
венно лучше своего предшествен- 
ника, но по всей видимости ‘таким 
хе популярным сн не стал. Одной 
из ПРИЧИН этого является слоя- 
ность расширения, как иу всех 
предыдущих ИК, отсутствие кон- 
ТРОЗлерОВ, разработанных под кон- 
кретную модель. ‘ 

компьютер "2х-РВОЕРТ" первый из 
разработанных у нас ПК, в котором 
помимо рехима 48 и 128 предуснот- 
рено и использование операционной 
системы СРИ.  Комньютер состоит 
из двух плат и достаточно сложен 
в настройке, но имеет наибодее 
полный набор периферии в одном 
блоке. АВТОРЫ и распространители 
Проводят правильную рыночную по- 
литику, направленную на широкое 
распространение этой модели. Но 
их ошибкой является то, что слох- 
ный и дорогой подупрофесснональ- 
ный ПК не нужен основной массе 
потенциальных потребителей. Дос- 
тоинством этой модели яяляется 
режин “ТУЕВО”, а недостатком - 
неполная совместимость, как с 
"ТХ-ЗРЕСТВИЫН”, так и с СРИ Пк 
*КОВОТЕОН 1715”. 

По сравнению с 
"Пентагон 128” оказался 
простым и массовым ПК, 
СУТИ это лишь скрешивание 
128” и "Пентагон 48" без 
венного улучшения. Машина сложна 
В настройке, критична к ОЗУ, на 
плате нет места под музыкальный 
сопроцессор АУ-891е, но в настоя- 
шее вреня этот компьютер, к сожа- 
лению, единственный в своем роде. 

"АТН-КОГЬО" - чисто коммерчес- 
кий ПК. Политика его авторов или 
изготовителей, очевидио направ- 
ленная на  зашиту “авторских 
прав", скорее направлена на полу- 
чение наксинальной прибыли в ко- 
РОТКИие СРОКИ. ЭТО несомненно ори- 
гивальный Пк, но он является и 
самым дорогин и сложный в настоя- 
шее время. В нем предусмотрено 
несколько режимов графики (только 


*2Х-РВОЕ!" 

более. 
хотя по 
“москва 
сущест- 


‚ скорее рассматривать как СРН-сов- 


в СРМ), но. к сожалению, те “на- 
вороты” - наличие АЦИ. ЦАП и эле- 


нентов для нодема и АОНа, на од- 
ной плате, в настоящее вреня ни- 
как не поддержаны програмнно. В 
компьютере пет достаточной гиб- 
кости и даже системного разъема. 
похоже, проблемы совместимости с 
“2Х-Бресагит" разработчиков ин- 
тересовали мало, и “АТИ" можно 


нестимый пк. 

На время написания данной ста- 
тьи последней моделью является 
“АНССОТЕЕН". в нем впервые приме- 
нена микросхема 1515 ХИ 1. это 
набор счетчиков нультипаексоров и 
нелкой логики. Простота в изго- 
товлении и дешевизна, несомненно 
сделают в ближайшее время эту но- 
дель популярной, Но  сушественным 
шагом в ней явилось лишь техноло- 
гическое упрошение с использова- 
нием 1515 ХН 1 вместо набора от- 
дельных микросхем. Среди досто- 
инств этого ИК - простота в на- 
стройке, а среди недостатков -|, 
малая гибкость, в частности, не- 
возмолность расширения 03У и 
дефицитность 1515 ХМ 1. 


А что же дальше? Недавно полу- 
чена информация о скором появле- 
НИИ НОВОГО ПК с днУНЯ процессора- 
ни 7-80. Со слов авторов в чем 
решены как почти все проблемы 
совместимости, так и возможность 
расширения. Палата в этой . модели 
похожа по ‘структуре на Но%вег- 
Ъоага 1ВИ РС, т.е. с несколькими 
систенными разъенами. хотелось 
бы верить, что это тоже не рекла- 
ма. А разработчикам новых вк 
хелательно учесть: ДОСТУПНОСТЬ, 
небольшой набор элементов, 
НОСТЬ, ОТКРЫТОСТЬ 
(легкость расширения}, 
зрения совместимости, 
адресацию портов, наличие на пла- 
те так называемого "порта РР“, 
правильное положение и длитель- 
ности сигнала 1ЫТ(запроса преры- 
вания). Ну, а тен, кто не хочет 
члать {да и дождется ли) появяе- 
ния “идеального” ИК ножно выбрать 
нодель по вкусу и карнану. 


Женаен Вам удачи! 


наш корреспондент из г. Крас- 
ноярска Татаренко А.А.  предлага- 
ет вниманию читателей некоторые 
разысканные им РОКЕЗ: 
1. 5РЫШ, ВОУНО - 21871, 0: 

36133,60 - энергия 


ИЛИ 
35:01, 195: 55102, 53: 
35103, 206 
г. 0122у 2 - 
29289,201 - неуязвимость 
3. риа 3 - 


42181.Х - кол-во жизней 
63001,0 - беск, жизни 


№. 0122$. № - 
29623, 0; 29624, 195 - 
беск. жизни 

5. 01229 5 - 


51291,0 - беск. жизни 

6. БТАВ ВО\Л.$ - 
41806,Х - кол-во жизней 
45218,0 - беск. жизни 


49098.Х - кол-во жизней 


43855.0: 48658,0 - 
беск. жизни 
9. ТОНСАТ - 
31174, 0 - беск. жизни 
31171,201 - нетязвьмость 


19. ТЕАСЕК - 
50213.0 - время 
50613,0 - энергия 
50649,0 - беск. жизни 
11. ТУТЗТЕЮ - 
42412,0: 42490, 9 
- энергия 
12.’ РАРК РОЗТОН - 
50407, 0: 50808, 0 
-. беск. хизни 
13. ХЕНОН - 
25148, 201 - беск. жизни 
14. СОНОЧЕЗТ (ЕВВЕ 5ОРТ) - 
62370,0 - останаваивает 
противников 
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{С} Стинов Николай Михайлович. 
г. Хабаровск. 1993г. 


РАСПАХНУТЫЕ ДВЕРИ ИЛИ 
ОТЕРЫТЫЙ ЗАНАВЕС? 


Глубокоуважаеная редакция! 


Вот уже третий год я являюсь 
постоянным читателем Вашего жур- 
нала "7Хх-РЕВЮ", неизменно следя 
за всеми публикацияни, касаюи- 
пнися как “секретов” 7х-5ресагии, 
так и приенов програмнирования на 
Гязыке Ассенблера 7-80. Сан я за- 
нимаюсь созданием никропроцессор- 
ных систен с начала 1988 года и 
не могу не оценить той услуги, 
которую Вы нне оказываете. Надо 
полагать, что эту услугу Вы ока- 
зываете всем читателям  Вамего 
| журнала! 
| За время работы со своим ком- 
пъютером (я три года экспиуатиро- 
вал “Новосибирский вариант”, а 
сейчас уже год как построил “Нос- 
[кву-128" с Вефа 01зк имег+асе) 
|мной создана довольно обширная 
библиотека процедур в машинных 
кодах, которую я шИРОКО использую 
при написании собственных про- 
гранн. 

руководствуясь тен, что долги 
надо возврашать (а я, получая от 
Вас информацию, считаю себя Вашим 
должником), а также желая поде- 
питься с другини читателями соб- 
ственными разработкани (негоже 

изобретать заново 
я отдаю на Ваш суд 
|одну из своих разработок. Если 
‘сочтете необходимым, поступите с 
|ней по Вашему усмотрению. 

| К написанию этой процедуры не- 
|ня натолкнул эффект раздвигающих- 
йся дверей в игровой программе 
|"РОВТЯ ОР ТНЕ МООБ" Фирмы "ОПТ". 
Отсюда и название ее “000в5". не 
|эная, как этот эффект достигается 
|в Фирменной програнме (я ее не 
\вскрывал, как-то еше не доходили 
руки), но встретив в "2х-РЕВЮ-92" 
статью "40 лучших процедур”, сра- 
зу все понял и спустя чуть больше 
|щвух часов подпрограмма была го- 
| това. 
| Предлагаемая процедура осущес- 
|твляет очистку области пикселов и 
Пустановку рабочих атрибутов эк- 
рана, но в отличие от стандартной 
процедуры ПЗУ (15 (#0068) этот 
процесс сопровождается  сравни- 
(тельно плавным перенешениен  пик- 
селов влево и вправо от центра 
| экрана (каждый раз на одно знако- 
место слева и справа от центра) и 
заполнением свободных от пикселов 
столбиков новыми атрибутами, то 
есть довольно точно инитируется 
эффект  раздвигающихся дверей. 
Процедура занинает 101 байт и еше 
один байт необходим для хранения 
данных - текуших атрибутов экра- 
на (или вновь  устанавливаеных 
атрибутов). Столь небольшой ее 
объен получен за счет использова- 
ния всех регистровых пар как ос- 
новного, так и альтернативного 


| ЧИТАТЕЛЬ Читателю |- 


блоков, причен основной блок 
Участвует в перемешении пикселов, 
а альтернативный - в установке 


атрибутов. для обеспечения кор- 
ректного выхода из процедуры 
требуется сохранение исходного 


апреса в зегистровой паре Н’1.”, 
что также осуществляется в ней, 
давая возможность ее использова- 
ния и как машинно-кодовой вставки 
в ВАЗТС-програнны. 

для полной очистки всех строк 


пикселов экрана` (4С0 - устанав- 
ливается в регистре С) требуется 
%0Р пар перемешений знакомест 


(устававливается в регистре В), 
тогда как число пар атрибутов, 
устанавливаеных в процессе рабо- 
ты, должно быть равно числу зна- 
комест в полустроке, то есть #10. 
С этой целью в регистр А копиру- 
ется константа #0Е из регистра В, 
процесс перенещения пикселов за- 
вертается при обнулении регистра 
В, а процесс установки атрибутов 
- до появления отрицательного 
числа в аккумуляторе (контроли- 
руется Флаг знака). 

В регистровой паре Н. устанав- 
ливается начальный адрес #4000 
области пикселов, В Регистровой 
паре Н’Р’ - начальный адрес #5800 
области атрибутов экрана. В ре- 


ГИСТРОВЫХ Парах РЕ и О’Е’ - ко- 
личество знакомест в строке 
(#0020), а в регистре С - конс- 
танта #18(24) - число знакорядов 
з экранной области. 

В приведенном ниже листинге 
предлагаемой процедуры: 

1) В адресах 6000 - 6009 - 


установка новых атрибутов экра- 
на. Если предполагается сохранять 
атрибуты неизменными, то эти ко- 
манды можно исключить вместе с 
константой в адресе Сс055 (АТТЬ) и 
устанавливать их непосредственно 
в командах по меткам А1 и Аг. В 
этом случае размер процедуры 
сокращается на 10 байт; 

2) В адресах С015 - СО1Е пере- 
мешение пикселов на одну пару 
знакомест во всех 192 (#С0) стро- 
ках экранной области. При этом в 
адресах С016 - С020- перемешение 
в левой половине экрана, начиная 
< левого края, а в адресах С0г3- 
Со? - перенежевие в правой поло- 
вине экрана, пачиная с правого 
края: 

$} В адресах СОЗР.- С045 - пе- 
гонещение атрибутов на одну пару 
знаконест во всех 24 (#18) знако- 
рядах экрана. При этом освободив- 
шиеся знаконеста заполняются но- 
выми атрибутами. В адресах С040- 
СОАВ - операции в левой половине 
Экрана, начиная с. левого края, а 
в адресах С04Е-С054 - операции в 
правой половине экрана, начиная с 
правого края. 
инииккикикииниикикиииинииикинииии 

(С) РУО РКЕОСВАМ “00085” 
Угицеп БУ И. Н. 5 1Ю\ 
ЕНАВАКОУЗК-1993 
Янин и ники иикиининикккиникиииниии 
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ЗТВАТЕСТС САНЕЗ 


Сегодня ны предлагаем Вашему 
вниманию обзор ДВУХ  проГграмн 
стратегического ханра. Они не 
случайно объединены здесь в одной 
подборке, поскольку являют собой 
полные противополохности и могут 
служить поучительными  принерами 
для тех, кто сани подунывают о 
написании подобных програнмн. 
Первая программа очень тша- 
тельно проработана с содержатель- 


ной и исторической точки зрения, 
она заслуживает высших оценок, 
но... с точки зрения играбельнос- 
ти с ней не все в порядке. Лишь 
очень преданные стратегии пользо- 
ватели, расподагающие к тому же 
солидными запасами свободного 
времени смогут преодолеть эту 
прямо  скажен незахватывающую 
игру. Ее никак нельзя рекомендо- 
вать начинающин стратегам, ибо 


после нее они надолго потеряют 
вкус к этому жанру. 

Вторая программа демонстрирует 
редкий казус. Она плохо прорабо- 
тана с военно-исторической точки 
зрения, содержит немало "ляпов", 
задумана как скучное противостоя- 
ние двух арний, но... именно бла- 
годаря этии  “ляпан“ неожиданно 
оказывается играбельной и даже 
интересной. 


АННАГ5 ОР КОНЕ 
"Р55* 
Обозреватель: "ИНФОРКОН" 


В античные времена люди пола- 
гали, что у каждого города есть 
свои боги, которые свысока наблю- 
дают за его судьбой. А римдяне, 
кроме того, были уверены, что са- 
мые сильные боги приглядывают 
за Римом. 

В этой игре Ван предстоит по- 
пробовать свои силы в качестве 
такого бога. Вы начинаете игру в 
гтз г. до н.э., когда Рим имел 
неустойчивый контроль над терри- 
горией соврененной Италии и долж- 
ны развиться в ногушественную им- 
перию и довести её до падения 
Константинополя в .1453 г., т.е. 
прожить неналый исторический не- 
риод длиной в 1126 лет. 
география игры охватывает мир, 
известный в те времена, с дентром 
В Средиземноморье, Он разделен на 
28 отдельных регионов, в кахдом 
из которых есть свое население и 
своя система управления. 

Игра строится но тактовому 
принципу. Через неравные ‘времен- 
ные интервалы Вам предлагается 


выдать управляющее воздействие. 
длина каллого такого интервала 
зависит ст того, как много исто- 
рических событий произошло в этот 
период, но в среднем на одно сто- 
летие приходится примерно 8 хо- 
дов. Вы управляете политической 
карьерой сенаторов, производите 
назначения на должности, распре- 
деляете обязанности по защите им- 
перии и неуклонно расширяете -об- 
ласть, подвластную Вашему  управ- 
лению. 

Боевые сражения в этой игре не 
главное. Это скорее игра, рассчи- 
таниая не на военную, а на поли- 
тическую стратегию. Крупные вое- 
начальники продвигаются все выше 
и выше после одержанных побед, 
потон стареют и сходят со сцены, 
а иногда погибают в боях. Нередко 
их амбиции приводят к мятежан и 
переворотам. Неспокойно и на гра- 
ницах империи, 

По нотивам этой игры можно 
писать книги и романы. Самое ин- 
тересное, что любые индивидуаль- 
ные ‘усилия героев игры’ такого 
масштаба выглядят мелкими и не- 
значительными. Единственным под- 
линнын героен игры оказывается 
ГОРОД. И этот’ город - Рин, а Вы 


САМЛРОЬТ 
"Сс5” 
Обозреватель: "ИНФОРКОН”" 


Сражение на полуострове Гели- 
болу относится к тен военным кан- 
паниям, которые блестяще прораба- 
тываются в теории, но совсем по- 
другому проиСкодяТт на практике. 
Это же можно отнести и к этой иг- 
ре, которой в значительной степе- 
ни не хватает реализма, хотя иг- 
рабельность ее оказалась высокой. 
К началу 1915 г. на западном 
фронте сложилась напряженная си- 
туация сдерхиваемого‘ равновесия и 
английское командование предпри- 


своих войск на полуострове, с 
Которого открывался бы доступ к 
столице Турции, находившейся в 
союзе с Гернанией, 


юткрылась бы возможность значи- 
гельного расширения комнуникаций 
между западными союзными дерхава- 
ми и Россией. На выполнение этой 
задачи был брошен десант в соста- 
ве английских, новозеландских и 
австралийских частей общей чис- 


как бы его Верховное божество. 

Это отличная игра и ее нохно 
расснатривать даже как обучающую 
по основан политической теории, 
но у нее есть огромный недостаток 
- она очень медленна. Порядка 
двух часов уходит на то, чтобы 
сделать три-четыре хода, пока 
конпьютер перебирает раз за разом 
все подвластные Ван провинции и 
принимает от Вас управляющие воз- 
дезствия. Впрочем, в какой-то 
степени зто выглядит реалистичным 
в том смысле, что и реальные по- 
литические лидеры проводят еже- 
дневно нногие часы, изучая поли- 
тические карты и`разнышляя. Хотя 
В игре. это может быстро наску- 
чить. 

Игра не имеет логического Фи- 
нала. Пользователь \сан решает, 
гие ену остановиться, когда его 
инперия начиназт разваливаться и 
он не имеет уже реальных шансов 
на будущее. Кроме того, будущему 
пользователю, начинающему игру, 
предстоит потратить ненало врене- 
ни для того, чтобы разобраться, 
что делает какая клавива и что 
обозначают те или иные значки на 
экране. 


ленностью более 60 тыс. человек. 

К несчастью, турки оказались 
намного более серьезными соперни- 
ками, чем кто-либо на западе до 
этого мог предположить, а условия 
местности на полуострове не шли 
ни в какое сравнение с усовияни 
на европейском ТВД. Так что 22 
тысячи турецких войск стойко 
держали оборону против превосхо- 
дяших сил противника. Их главной 
целью стадо продержаться до 
подхода подкреплений, после чего 
чисто логически английскому 
десанту остается только утопиться 
в море. 

Бывают стратегические игры, в 
которых основу составляет умелое 
маневрирование войсками, бывают 
игры, в которых основой является 
управление снабжением, здесь же в 
основу игры создатели залохили 


инженерную ‘подготовку операций. 
Если говорить просто, основной 
Упор ‘здесь сделан на... рытье 


окопов в каменистой местности, 
Что может быть противнее?!! 

Вы можете создавать целые ли- 
ним окопов, соединять их кодами 
сообщения, подводить минные ходы 
под укрепления противника, ста- 
вить мины и контрмины. В общем, 
если все было бы так, как заду- 
нали игру ее создатели, это была 


‚аась 


бы одна из скучнейших игр. 

К счастью, с военно-историчес- 
кой точки зрения в игре был допу- 
щен серьезный промах. Полагая, 
что в сражении нало использова- 
артиллерия, — программисты 
создали для сорзников слишком 
простые условмя для победы. На 
самон деле артиллерия использо- 
валась широко, а открытая скалис- 
тая местность очень этому благо- 
приятствовала. 

Упущение этого важного Фактора 
из виду привело к тому, что 
искушенный игрок не будет в воте 
липа копать килонетры окоцов, а 
сделает все тривиально просто. 
Собрав все силы в один кулак и, 
невзирая ни на какие чудовимные 
потери (войска-то вець не живые), 
он прорвет Фланг турок а затен, 
выйдя на равнины, прокатится тя- 
хелым катком по их тылан. Захват 
хе баз снабжения в тылу’ турецких 
войск оказывается достаточным ус- 
ловием победы. 

`Фирма СС$ редко делает подоб- 
ные ошибки и эта игра, к счастью, 
является исключением. Тем не ме- 
нее, если забыть об исторических 
реалиях. то при такои антиисто- 
РИЧНОМ развитии игры, ова оказы- 
вается очень играбельной. 
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До конца игры оставалось две 
МИНУТЫ. Сборная России проигрыва- 
ла со счетом 1:2 в Финальном мат- 
че Кубка Лиги. Английские болель- 
шики, предвкушая победу своей ко- 
манды, дружно и весело распевали 
национальные песни и бросали с 
трибун длинные бумажные денты. 
Полотнима английских Флагов ГОРДО 
развевались над ликующими авгли- 
чанами. 
Не желая мириться с поражени- 
ем, сборная России отчаянно ата- 
ковала. пытаясь спасти ИГРУ. 
Судья посматривал на секундомер 
и, казалось, вот-вот прозвучит 
Финальный свисток. 
Иванов получил пас из глубины 
доля и на игновение притормозил: 
Второй номер англичан Снит тара- 
вом шел на него, рискуя зарабо- 
тать штрафной удар. Из-под ноги 
Смита Иванов мягко переправил мяч 
Сидорову и тот, четко его обрабо- 
‘тав, ношно пробил в правый верх- 
ний от вратаря угол. Мяч, словно 
снаряд, влетел в ворота. Огромный 
стаднон замер, в то время как не- 
многочисленная группа российских 
бодельшиков взорвалась крикани и 
аплодиснентани. 2:2! Судья указал 
ва цент? поля и, спустя несколько 
секунд, дал Финальный свисток. 
Теперь зависело от того, как 
команды сыграют в дополнительное й 
время. 
После игры Президент ФИФА дол- 
жен был торжественно вручить зо0- 
мотой Кубок Лиги команде победи- 
телей. Один мяч - вся жизнь. Про- 
игрывать никто не хотел... 

„ " " 
В этой игре Вам предоставая- 
ется возможность участвовать в 


личие от многих игр подобного ти- 
па "Международный Футбол" привле- 
кает к себе внинание неплохой 
нультипликационной графикой и 
прекрасной динамикой. зрелишность 
- тоже одно из качеств этой игры. 
Ситуации. возникающие на игровом 
поле, напоминают сцены реальных 
футбольных матчей. Игроки пере- 
двигаются осмысленно и точно. 
Это особенно заметно на услохжнен- 
вых УРОВНЯХ игры. Как оппонент, 
компьютер играет достаточно силь- 
но, и Вам не раз придется начи- 
нать с центра поля. 

В ИГРУ заложены практически 
все правила Футбола: штрафные 
Удары. выбросы из-за боковой, 
угдовые, удары от ворот и. Что 
особенно интересио, пенальти. Вы 
можете во время матча произвести 
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замены, а также переставить игро- 
ков, усиливая тем самым атаку или 
зашиту. 

В "Международном Футболе" есть 
возможность отдать управление иг- 
роками конпьютеру, а самому за- 
няться исключительно менеджнен- 
том, составляя команду из игро- 
ков, наиболее подготовленных к 
матчу, Кто и на каком месте бу- 
дет играть, Вы решаете сами. В 
этои случае игра превратается в 
деловую, а Вы ощущаете себя в 
ролик тренера, который ножет лишь 
переживать за свою команду и во- 
вреия производить занены и пере- 
становки. 

После загрузки програмны 
компьютер спросит Вас о выборе 
управления для первого игрока: 
“КЛАВИАТУРА ИЛИ ДЖОИСТИК (КУ) ?“" 

Если Вы выбираете джойстик, 
то: 

“ЕЕНПСТОН ИЛИ СИНКЛЕР (К/5)?*” 
Если Вы решили использовать 
джойстики для обоих игроков, то 
реконендуется назначить Синклер- 
дхойстик для первого игрока, а 
кемистон - для второго. поскольку 
замечено. что на некоторых ноде- 
лях “Сиектрун"-совместиных кон- 
пъьютеров при другом выборе сСинк- 
лер-плойстик не работает. После 
того, как первый игрок выбрал уп- 
Равление, компьютер попросит под- 
твердить выбор: 

“ВСЕ ПРАВИЛЬНО (У/Н)?” 

После нахатия "У” компьютер 
предлагает выбрать управление 
ВТОРОМУ ИГРОКУ. Если выбирается 
клавиатура, Вам нужно будет за- 
дать клавиши управления. Затем Вы 
вновь подтверждаете свой выбор и 
переходите к главному меню. С 
помошью курсора Вы можете выбрать 
один из четырех разделов: 
`_ ОРТО 

С01.0085 

САНЕ 

ОТЗРЕАУ$ 


ОРТГОН$ 

В этом раздеде Вы мохете за- 
дать основные параметры игры: 

РИВАТТОН - (продолжительность 
матча) - отё до 90 нинут. 

: 0® 2 Уз С - (один или два 
ИГРОКа против компьютера) 

ЕХТКА Т1НЕ - (дополнительное 
время) - во вреня кубковых матчей 
в случае ничьей по окончании ос- 
новного времени будет назначено 
дополнительное, 

УТЕМ С Уз С - (ШРоснотР, 
компьютер играет сам с собой). 

НОМЕ & АЧАУ - (домашние и вы- 
ездные игры) - при включении этой 
опиии конпьютер будет играть 
сильнее в домашних натчах. 


как 


РВАСТТСЕ - (тренировка) 

ЗИЛ. ТЕУЕ. - (Выбор уровня 
ИГРЫ} - 1...10 . 

ЕОСАГ 5КИЛ, - (равный уровень) 


- При такой установке все коман- 
управляемые конбьютерон, иг- 


рают на одном уровне. 

ВАСЕНЕЕ1.5 - (пас пяткой) . 

ЕТСК РИКЕСТТОН5 - (направленией. 
пофета мяча) - 1,3, 5. М 

АЦТО СОАГТЕ - (автоматическое! 
управление вратарем) - при вклю- 
чении этой опции Взш вратарь 
управляется компьютером. 

АЦТО ВЕЗЕБЕСТ - (автонатичес- 
кий выбор игроков) - в этом рехи- 
ме компьютер переключает управле- 
ние на того игрока, который нахо- 
дится ближе всех к мячу. Выключив 
это режим, Вы можете подключить к 
Управлению любого футболиста, на- 
ходяшегося в поле зрения экрана. 
Переключение осуществляется кла- 
вишей “РТЕЕ”. 


(«очки за побе-й. 
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ду} - 2 или 3, 

БОВЗТИТОТЕ$ - (замены) - а 
или 1. 

ЕХ1Т МЕНО - (выход) - после 


настройки игры Вы возврамаетесь в 
основное меню. 


Со.0и5 

Выбрав этот раздел, Вы получи- 
те возножность изменить цвет поля 
опцией РТТСН СОЬО0Е или изненить 
цвет Формы игроков: РЬАУЕВ 
СО1.008. Далее вновь ЕХТТ МЕНУ. 


САМЕ 

В этом разделе задаются коман- 
цы и игроки, а также сохраняется 
и загружается отложенная игра, 


РЬАУТ НАТСН - этой оппией от- 
крывается очередной матч. Снача- 
ла Вы знакомитесь с. составом иг- 
рающих конанд, а затен, после на- 
жатия "ЕТЮЕ", переходите непо- 
средственно к игре. В случае, ес- 
ли Ваша команда не участвует в 
очередном матче, Вы можете посмо- 
треть, как играют конанды, управ- 
ляемые компьютером. Если Вы не 
хелаете наблюдать за этим матчем, 
то в разделе "ОРТТОН$" нужно вы- 
ключить режим “УТЕМ С Уз С". Пе- 
ред игрой с участием вашей конан- 
ды Вы можете переключить управле- 
ние с Кемпстон-дхойстика на Синк- 
лер-дхойстик я наоборот клавишей 
"ЗРАСЕ”. 

АБВАНСЕ ЕКТЕНОГУ - (товаришес- 
кая встреча) - Вы можете назна- 
чить товаришескую встречу с любой 
командой из предлагаемого списка. 

РСК ТЕАМ - (перестановки в 
команде) - при выборе этой опции 
Вы можете производить тактические 
перестановки в команде, которая 
выбрана в опции "ТЕАМ" 

РОЗТРОНЕ НАТСН - 
встречу) - при желании Вы можете|. 
перенести очередную встреяу на 
более позднее время. 

ЗТАВТ СОР - (открытие кубковых 
встреч) - выбирая эту онпию Вы 
сножете участвовать только в куб- 
ковых матчах. 

ЗТАКТ ГЕАСОЕ - (открытие чем- 
пионата; - здесь Вы участвуете 
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только в играх на первенство Лиги 
(встречи турнирные, а не кубко- 
вые). * 

ЗТАВТ ЗЕАЗОН - (открытие сезо- 
на) - в этом случае Вы играете по 
расписанию чемпионата и Кубка Ли- 


нажатия “РТКЕ”, в левом верхнем 
УГЛУ Вы УВвИДИТе название конанды, 


а в правом - иня тренера. В на- 
чальнон состоянии все команды 
управляются конпьютерон, и поэ- 


тому в Правом верхнем углу будет 
написано "РЬАУЕКО Бу: СОВРОТЕВ". 
Ниже дается список игроков с кра- 


ткой характеристикой  кандого. 

например: 

ВОВТН5ОН - Фамилия игрока 

т - номер игрока 

$РО - скорость 

ЕЕ - уровень игры в защите 

АТТ - УРОВень игры в атаке 

ЕТ - степень готовности к 
мячу - высшая степень 
99 

МАТ - количество 


сыгранных игр 
- количество забитых 
нячей. 


Характеристики 5Р0, ПЕЕ, АТТ 


средний уровень; три синих кружка 
- высокий уровень. Например: 
ЗРЬ.- два синих кружка; 

ЕР - ТРИ СИНИХ КРУЖКа; 

АТТ - ОДИН СИНИЙ КРУХОК. 

Это означает, что данный игрок 
обладает средней скоростью, высо- 
ким уровнем игры в защите и низ- 
ким уровнен в вападении. Следова- 
тельно, это защитник, и его вРЯДд 
ми стоит ставить в нападение. 

В игре местоположение Футбо- 
листа на поле задается его номе- 
Ром: 

со 2 по 5 - зашитники, 

с 610 8 - средняя линия, 

с `9 шо 11 - атака, 

142 и 14 - запасные игроки, 

1 - вратарь (не редактируется и 
не переставляется) 

Управляя КуУрсорон, Вы можете 
отредактировать любую из восьми 
команд по Вашену хеланию. Редак- 
тируются назвачие команды,  Фами- 
Лии игроков и их характеристики. 
ВНИНАНИЕ! Компьютером управля- 
ются только те конанды, у которых 
в редакторе в строке “"РЬАУЕО ВУ: ” 
впечатаны восемь букв - СОНРОТЕЕ. 
В противном случае за команду иг- 
раете Вы. Названия конанд могут 
быть аюбыми. 

Подтвердив свою редакцию ко- 
манды. Вы возвраваетесь в подменю 
АИ, 

ТЕАН - (конанда) - Вы ножете 
выбрать дюбую из восьми конанд, 
предназначенных к редакции или к 
тактической перестановке игроков. 
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ЗАУЕ ТЕАН - сохранить на ленте 
результаты редактирования коман- 
ды. х 
ТОАР ТЕАМ - загрузка с ленты 
ранее сохраненной команды. 

ЗАУЕ АМ. - сохранить всю игру. 

ГОАВ АГ. - загрузить всю игру. 

ЕХТГТ НЕНЦЫ - выход в основное 
неню. 


ОТ5РЬАУ5 


В этом разделе находится вся 
справочная информация и статисти- 


ка игр. 
ЗНОМ ТЕАМ5 - (показать все ко- 
нанды) - компьютер дает список 


команд и Фанилии тренеров. 

ЗНОм РЬАУЕЮ5 - (показать игро- 
ков) - конпьютер выводит на экран 
Фамилии игроков команды. заданной 
в опции “ТЕАМ“. 

ТЕАН - (выбор команды). 

ЗНОм РТХТОВЕЗ ры (показать 
предстояшие натчи) 

ЗНОМ ВЕЗЛ.Т$ - 
зультаты натчей) 


(показать ре- 


НОМ ТАВЕЕ - (показать таблицу 
чемпионата) 
ВУ ТЕАН - (на конанду) - вкаю- 


чив эту опцию, Вы после запроса о 
предстоящих натчах увидите список 
ИГР одной команды на весь сезон. 

ВУ МЕЕК - (на неделю) - анало- 
гично предыдушей опции, но для 
проснотра всех игр на предстоящей 
неделе. 

МЕЕК - (номер недели} 

ЕХТТ НЕНО - (выход) 


Если У Вас еше нет опыта в 
этой игре, то Ван не обойтись без 
Тренировки. После загрузки игры и 
ее настройки, включите в разделе 
“ОРТТОН5” опцию "РЮАСТТСЕ".. Опцию 
"УТЕМ С \У3 С” выключите. Затем 
войдите в редактор и, выбрав лю- 
бую команду, впишите в строчку 
"РЬАУЕО ВУ:" свое имя. После это- 
го в опции "АБКАНСЕ РЕТЕНЫЛ" на- 
значьте товаришескую встречу. за- 
тем "РЬАУ НАТСН” - и Вы уже на 
тренировке. Компьютер не будет 
Вам сопротивляться, и Вы сможете 
отработать удары по воротам и 
технику ведения мяча. После тре- 
нировки Вы можете перейти к чем- 
пионату (“"5ТАКТ ЗЕАЗОН”). 

Во вреня игр на первенство Ли- 
ги Вы не сможете отредактировать 
свою команду или загрузить ее с 
ленты. Опции "ЕБТТ ТЕАНМ"” и “1О0АО 
ТЕАМ” в разделе “САМЕ“ Ван уже 
будут недоступвы. 


ЗАМЕНА ИГРОКА: 

Во Время игры Вы ножете заме- 
НИТЬ ОДНОГО ИЛИ ДВУХ ИГРОКОВ. За- 
нена производится следующим обра- 
зон: когда мяч уйдет за боковую 


линию (ООТ), нужно нажать “САР 
ЗНТЕТ“ - игра остановится (режим 
пауза). Затен клавиша “В” - и Вы 
переходите |:] основное меню. 


Здесь Вы выбираете раздел “САМЕ”. 


В опции “ТЕАМ” установите назва- 
ние своей команды. Перейдите к 
опции “РТСЕ ТЕАН”. С помошью кур- 
сора выберите игрока, которого 
следует заменить и переставьте 
его на место игрока из запаса. 
Затем курсор отводится на позицию 
“САНЕ”, подтверждается. произве- 
денная замена и Вы вновь возвра- 
шаетесь к опции “РЕАУ  НАТСН”. 
После появления картинки натча 
нажмите “САРЗ 5НТЕТ", 
продолжать игру. 

Прервать игру Вы нохете клави- 
шей "Т". 

ЕСТЬ В программе и такой 
чок”: в режиме паузы .(САР$ 5НТЕТ) 
нажать "У", а затем “ЗРАСЕ“ и 
вновь "САР5 5НГЕТ" для`выхода из 
паузы, и Вы сразу переходите ко 
второну тайну. Если же такое пе- 
реключение было произведено во 
втором тайне, то игра . заканчива- 
ется. Таким образом, Вы ножете 
обеспечить себе  беспроигрышный 
вариант игры на любых уровнях. 
Однако настояшим бойцам этот *ху- 
чок” не потребуется. 


*ху- 


УПРАВЛЕНИЕ ФУТБОЛИСТАНИ: 

Управление каждым игроком яв- 
ляется двухступенчатым. Во вреня 
ведения няча Вы управляете Футбо- 
листом как обычно, но нахав 
“РТВЕ”, Вы автоматически перехо- 
дите к выбору направления удара и 
траектории полета няча. Удар на- 
носится после того, 
пустите клавишу “ЕТВЕ”. 
ра зависит от продолжительности 
нажатия на клавишу “ЕТВЕ“. 


УДАР НИЗОН: 

Положение джойстика вперед по 
ходу футболиста, затем нажать и 
отпустить "ЕТЬЕ". 

УДАР ВЕРХОН: 

Положение джойстика вперед по 
ходу футболиста, затем “ЕТВЕ", не 
отпуская “ЕТВЕ” перевод джойстика 
в противоположное положение и 
только после этого Вы отпускаете 
“ЕТЕЕ". 

ПАС. ПЯТКОЙ: 

Положение джойстика вперед по 
ходу футболиста, затен "ЕВЕ". не 
отпуская “РЛВЕ" перевод джойстика 
В противоположное положение, за- 
тен вновь вперед по ходу и только 
после этого отпустить "Е1ВЕ”. 

При установке в опции "КТСЕ 
РКЕСТТОН5" раздела "ОРТТОН5" 
цифры “5" Вы добавите к прямым 
ударан диагональные передачи. 

Научившись виртуозно управлять 
своими Футболистами, Вы начнете 
получать истинное удовольствие от 
этой игры. занять первое несто в 
ченпионате и выиграть Кубок Лиги, 


В ПОЛНУЮ СИЛУ (10 уровень), 
очень ТРУДНО. Этого смогут до- 
биться лишь те, кто играет в 
красивый комбинационный ФУТбол и 
обладает качествами настоящего 
бойца. Удачи! 
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Вниманию читателей. — любящих 
осваивать свой компьютер в прак- 
тической работе по набору и от- 
падке игРОВЫХ програми, сегодня 
мы предлагаем программу англий- 
ского программиста Адама Бузпаа 
>ВЫОСК ВОЗТЕК“. Програнма нами 
перенедена на русский язык и 
оттестирована. 

Игра представляет собой опну 
из версий распространенных в свое 
время игр типа ”Т1НЕ ВОНВ". Ваше 
игровое поле состоит из  прямоу- 
гольных блоков и некоторых снеци- 
альных полей (премиальные поля 
выглядят как Флажки, а незадейст- 
вованные бомбы изображаются чере- 
пом со скрешенными костями). 
Время от времени одна из бомб 
включается и начинает мигать. 
Ваша зацача поставить своего 
сапера на это поле до того, как 
истечет вреня горения запала. 
‘Сапер перемещается с пономью 
КУРСОРНЫХ клавил. Блок. по кото- 
РОМУ ОН ПРОШел ОДИН раз исчезает. 
Второй раз наступить на эту хе 
клетку смертельно опасно. Не не- 
нее опасно наступить на замини- 
рованную незадействовавной бомбой 
клетку. 

Шо мере того как все меньше и 
меньше блоков бущет оставаться на 
экране, Вам все труднее будет 
подобраться к очередной бомбе. 
Здесь Вам на помощь ножет прийти 
одна дополнительная возножность. 


можете сдзинуть влево или вправо 
ряд блоков. в котором находится 
ваш герой, 

Начиная со 2-го уровия в игре 
начнут попадаться ряды цветных 
блоков, которые не сивигаются. да 
и количество бомб на каждом уров- 
не будет все больше и больше. 

Еще одна полезная вознохяость 
связана с циклической организа- 
цией игрового поля. Покинув экран 
вправо, Ваш герой появится слева, 
покинув экран сверху, он появится 
снизу и, соответственно, каобо- 
Рот. 

Теперь несколько слов о руси- 
Фикации. ОБа подробно описана 
нами в прРОЩаом выпуске 2Х-РЕВЮ 
“АРЕТСАН 
Здесь слепует применить 
гу же саную технику. Более того, 
в наших последующих работах иы 


как на стандартную. Это позволит 


Вам не тратить время ва русифи- 
кацир и всегиа использовать один 
й тот хе програниный блок. 

А тецерь. когда есть опреде- 
яевность с вопросом русификации, 
можно переходить непосредственно 
к. тексту програниы *В.ОСЕ 
ВОЗТЕР". БУКВЫ С “А” по "Р” в ка- 
вычках в строкая 60, 110, 160, 
200, 1010, 1040. 4030, 4040, 
4530, $055 - это символы Уу0б-гра- 
Фики. ` 

Основные переменные,  исполь- 
зованные в программе, имеют сле- 
дующее назвачение: 


НТ - лучший результат. 

5С - текущий счет игры. 

Ъ ^‘- текуший уровень. 

14 - строковая переменная, в жо- 
Торой хранится количество 
оставшихся попыток. 

А,В - Текувие координаты сапера. 


АА, ВВ - последние координаты 
сапера 
ри, ра - координаты прениального 
Флага. 
В\, 52 - координаты активизирован- 
ной бонбы. 
№3() - массив, в котором хравит- 
ся конфигурация игрового 
лоая. 
ВО - количество бомб на каклон 
уровне. - 
Т - время, оставшееся цо взрыва 
бомбы. 
р - номер ряда дая неперемещаеных 
блоков. 


$3 - перемениая, используемая в 
функлии 1ИКЕТ$ и т. п. 
Х. 1.2 - переменные ‘общего назна- 
чевия. 


С помошью клавиш “!” и "2" ВБ. 


всегда будем ссылаться на нее,. 


СЧЕТ: 27$ 


НЕ 


макс. на 
м вЫ 


1 60 то ю 

2 СЬБАЕ 64599: БАНРОМТТЕ 058 
15619: КЕМ : ОА *СВГ*СОБЕ 6460 
о 


3 60 50 8: 60 558 5000: бот 
со 
$ ЮАНРОМТ2Е 5 15619: БЕН: 
ЕРАЗЕ “БУЗТЕ” 
6 КАНТОКТЕЕ 058 15619: КЕМ: 
ЗАУЕ “ВИЗТЕК“ ЛЕ 2 
Т 5ЮР 
8 РОЖЕ 23606,86: РОКЕ г360Т,& 
$1: КЕТОЕН : ЕЕН КЗ 
9 РОКЕ 23605, 0: РОКЕ 23607,50 
: БЕТОН : ВЕН ВАТ 
10 БЕТ Н1:0: 60 508 8 
20 РАРЕЕ Т: НОКОБЯ 7; ТЕКО: В 
КУСНТ 0: С1.$ : РЫЯТ АТ Зо; “ 
НАЖМИТЕ КЛАВИШУ <1>, 
ЕСЛИ НУЖНА ИНСТРУХИНЯ” 
30 1Е ИЖЕУ$ <>" ТНЕН 60 ТО З 


парами За Дании 


о 
40 ТЕ 1МЕЕТз-°" ТНЕЯ 0 ТО 40 
50 ТР ТИКБУ$: "1" О ИКРУ: "1" 

ТНЕВ 60 508 6000 
$0 ВАНПОНТ2Е ; ЕТ 56:0: ЕТ Ь 

#1: БЕТ 1%: "РРР” 
ТО ТЕТ А-:19: ГЕТ В-15: БЕТ АА: 

А: БЕТ ВВ-В 
80 ГЕТ 0: -1+(1ЫТ (ЮНре1 0) наза 

АЮ) 1,72}: 60 58 4000 
90 БЕТ 21=У: БЕТ Е2ё:7: БЕГ Т=- 

}: ВЕХ ВО:1: ЕТ В!=Т: тет везТ 
100 БЕМ « МАТЯ САНЕ « | 
110 РЕТШТ АТ Е!, Рё; ТИК 6; "РЕ; 

АТ [1+1 , Ра; "РС":АТ А, В; ТИК ТЫ 

Н”": АТ А», В; "НО" 
120 ТЕ АА‹>А ОВ ВВ<>В ТНЕН БЕТ 

$С=5С+2: -РВЕШТ АТ АА, ВВ: " ”:;АТ 

АЁ+1, ВВ; * ": ГЕТ 8$ (АА, ВВ` ТО В 

В+1):* *;: ЦЕТ В®(АА+1, ВВ ТО ВВ+ 

1)": Ш ИВ (А. В) =” " АО Р1< 

2А ОК Р2<‹>В} ТНЕМ 60 ТО 1060 


УРОВЕНЬ Е 


ее 
150 1ЕТ. АА-А: СЕТ ВВ-В 


140 ТР А-Р1 АНО В-Её ТНЕН ВЕЕР 
. 02.20: ВЕЕР .02,25: ВЕЕР .02,3 
0: 60 508 8500: БЕТ 21:5: БЕТ ва 
#2: ЫЕТ $С:5С+20 

150 1Е.А-В1 АНО В:В2 ТНЕН 1ЕТ 

ВО=ВО+1: . 03, 30: ВЕЕР . 03,2 

5: ВЕЕР ‚03.20: БЕТ $5С=5С+[.*15: 

БЕТ. Т:-1: БЕТ. В1-Т: ЕТ В2-Т 

160 ТР Н$(А, В) -“Н” ОБ Т=0 ТНЕН 

60 то 1000 

170 ТР ВО>Ь*3+3 ТНЕН 60 ТО 300 
0 

180 РЕШИТ АТ 0,5; ШИК 7;5С 

190 ТЕ Т>0 ТНЕН ЦЕТ Т-Т-}: РЕТ 
НТ АТ В1, В2; РАЗН 1; ТЫХ 6; РАР 
БВ 2; "ии"; АТ В1+1, Ва; "ин"; АТ В1+ 

(НТ (Т/2)=Т/2), Ва; Т: ВЕЕР .01,Т 
+10: 60 ТО 500 

200 ГЕТ У=Н(ВО): ЕТ 7:19Т (КЮ 
#15) и2+1: ТР №$ (У, 2)-"Н" ТНЕН Г 
ЕТ Т-50-Ь%4: ФЕТ В1-У: БЕТ В2=7: 

ТЕТ М (У,2 ТО 2+1) -"МА”; БЕТ $ 
(+1, 7 ТО 241) ="ВС” 

500 ГЕТ Х$:1НКЕУЗ: 
$30 то 540 

510 1ЕТ А-А*+ (2 АКО Х3- "6" )-(2 А 
МО Х$-"7"); ТЕТ В-В+(2 АМР Х$-"8 
*)-{2 АНР Х%-*5") 

520 ТЕТ А=А+(20 АНО А‹1)-(20 АН 
р А>19): РЕТ В-В*(30 АМО В<1)-(3 
© АНО В>29) 

530 60 ТО 100 ы 

580 ТЕ Х%‹>"1" АБО Х$<>"2" ОВ р 
-А ТНЕН РОВ Х-1 ТО 15: НЕХТ Х: 
60 то 100 

500 ТЕ Х%:*2" ТНЕН 60 ТО 700 

610 РОК Х:0 ТО 1: 1ЕТ М (А+Х)-М 
$ (А+Х, 3 ТО )+М$(А+Х): НЕХТ Х 

520 1Е А-Р1 ТНЕН ГЕТ Ра:Ег-2 

630 1Р А-В1 ТНЕН ТЕТ Вг-Вг-2 

640 60 ТО 800 

100 РОБ Х-=0 ТО 1: ТЕТ № (А+Х)-К 
$(А+Х, 29 ТО }+М%(А+Х): НЕХТ Х 

710 1Р А-Р! ТНЕЯ ТЕТ Р2-Ег+2 

720 1Е А-Б!1 ТНЕН ТЕТ Ве: Вг+2 

800 РОВ Х-0 ТО 1: РЕШНТ АТ А+Х, 
1; №%(А+Х): НЕХТ Х 

810 БЕТ К2-Р2+(30 АНР РА:-1)-(3 
О АНП Р2-31) 

820 ТЕТ Вг=Вг+{30 АНР В2г--1!)-(3 
© АМО Ве-=31) 

900 со ТО 100. 

1000 ВЕМ * 105Е А 1ЛЕЕ =" 

1010 РОВ Х-Т ТО О 5ТЕР -.2: РА 
Т АТ А, В; ТИК Х; "БМ": АТ А+1, В; "Е 
0”: НЕТ Х 

1029 РОВ Х=50 ТО 10 $ТЕР -1; 


ТР Х$<*5* ТН 


ВЕЕ 


: вЕоопасный Блок 
{ фляг 
НЕЛКТИВИЗНРОВАНИЯЯ БОМБ 


: ВЫ САЛЕБ 


зайчн ван... 


НИИМиИТЕ ЛЮБУЮ клявымы 


Р .01,Х: ВЕЕР .01,Х+3: МЕХТ Х 
1050 БЕТ 13-13(2 ТО}: ЛЕ 13-** 
ТНЕН РЕТИТ АТ 0,20; " *"; 60 ТО 
600 ь 
1040 ТР М3 (А, В) -"Н”" ОВ ИЗ(А, В) -” 
“ ТНЕН 60 $508 4500: ЕТ А-У: Ь 
ЕТ В=7: :ЕТ АА:А: БЕТ ВВ:В: ЕН 
$(А, В) -" " ТНЕН 60 ТО 1040 
1050 ТР Т:0 ТНЕМ БЕТ ВО-ВО+1: № 
ЕТ Т=-1: ШЕТ В1-Т: БЕТ ве-Т 
1060 60 5ИВ 4060: 60 ТО 170 
2000 ВЕН * САМЕ ОУЕБ * 
2010 РЕТНТ АТ 9,0; РАРЕВ 1; ЕЪА$ 
ни та 
<<<<<<<<‹ ИГРА ОКОНЧЕНА ›>>>>>>> 
<<<<‹<<< ЕЩЕ РАЗ (У/Н)? >>>>>>>> 


2020 ТР $С>Н! ТНЕН ТЕТ Н!:5С: 6 
О 508 4070 
2030 РОВ Х-! ТО 50: ВЕЕР . 004, Хх 


2040 1Р ТНКЕ\З-"У" ОБ ТНЕЕУЗ- "у" 
ТНЕН 0 ТО 60 

2050 1Е 1НКЕУЗ-"п”" ОБ ТНКЕУЗ-"Н" 
ТНЕМ 5ТОР 

2060 НЕХТ Х: 60 ТО 2030 

3000 КЕМ " МЕХТ 1ЕУМ, * 

3010 ТЕТ 1=1.* (1.<9): 1ЕТ Х$: "СУПЕ 
Р ПРИЗ! =-= СУПЕР ПРИЗ! 
3020 РОВ Х=! ТО 50: РЕТНТ АТ 21, 
0; 15 6; РЫАЗН 1;Х%: ВЕЕР :01,Х 
: МЕТ Х3=5$(2 ТО ) +5$ 

3030 1ЕТ Х3-Х$‹ ТО 32): НЕХТ Х 
3040 ВЕТ 5С=56+551.: 60 ТО 70 


4000 ВЕН = 5ЕТ ПР 5СВЕЕН * 
4010 РАРЕБ 0: 1МК 5: ВОБОЕЕ 0: В 
ВТСНТ 1: 615 


4020 ПМ 13 (20, 30): ЛМ М (3+3) 
4030 РОВ Х-1 ТО 20 БТЕР 2: ти 


1х): ) 
ААА АТТА ААА АА ВАЯВАВАА 
ТЕТ №8 (+1) й 


ВСВСВСВСВСВСВСВСВСВСВСвсвсвсвС" : 
НЕХТ Х 

4040 РОВ Х-1 ТО 1*3+3: 60 $58 45 
00: ГЕТ 1$ (1,2 ТО 741) -"НР": ТЕТ 
№3 (+1, 2 ТО 2+1) -" К" р 
4050 БЕТ Н(Х)=У: НЕХТ Х 

4060 РОБ Х-1 ТО 20: РЕШИТ АТ Х,1 
$ 15 5-(2 АЮО (Х=В ОБ Х=0+1)); м 
$(Х): НЕХТ Х 

ОТО РЮТИТ АТ 0,0; ВЕТСНТ 0; ТЕ 
7; "СЧЕТ: ";5С; ТАВ 10; "МАКС. *; НТ; 
ТАВ 20:13; ТАВ 24; “УРОВЕНЬ”; 
4500 ВЕМ * ВАНПОМ РОЗТТТОН * 
4510 ТЕТ У:1Т (ВН 10) 2+1 

4520 РЕТ 2:1НТ (+15) ч2+1 

4530 1Е $ (1,2) -”Н” ОЕ У=19 АНБ 
2-15 ТНЕН 60 ТО 4510 

4530 ВЕТУВН 

5000 КЕМ " Ц.р.С. РАТА * 

5010 РОКЕ 23675,88: РОКЕ 23676, 2 
55: РОБ Х-0 ТО 127: ВЕАЬ У: РОКЕ 
(УВ "А*+Х, У: НЕХТ Х: ВЕТОКН 
5020 БРАТА 248, 284, 242, г4г, 242, 24 
2, а4е, 242, 255,255, 255,255. 64, 32 
5030 ВАТА 31,0, 242, г4дг, 2%2, 242, 1 
0,6, 258,0, 0, 0, 15, 63, 127, 127, 127 
5040 БРАТА 127, 60, 60. 24, 248, 215,2 
16, 216. 216, 121, 112, 64, 0,0, 0,0, 6 
5050 РАТА 216, 288, 24, 24, 24, 24, 24 
‚О, 96,231, 255, 63, 5Т, 51, 63, 30 


5060 РАТА 12, 206, 253, 248, 56, 55,2 
48, 240, 30,15, 28, 60, 281, г2Т, 95,0 
5070 ВАТА 240, 224, 112, 120, 222,14 
2, 12, 0, Т, 7,63, 15, 31, 61,.57Т, 63, 192 
5080 ПАТА 192, 248, 224, 240, 120, 56 
‚ 248, 123, 92, 19, 39, 12, 88, 112,0 
5090 ВАТА 188, 116, 228, 200, 96, 52, 
28, 0, 60,255, 90. 126, 165, 24, 36, 65 
6000 С1.5 : РЕШТ } ” 
ВОСК ВОЗТЕХ"’ и 
ИСПОЛЬЗУЙТЕ КУРСОРНЫЕ КЛАВИШИДЛ 
Я ПЕРЕМЕЩЕНИЯ  “”САПЕРА“" ПО 
ЭКРАНУ. ПРИ’ ПЕРЕХОДЕ ЧЕРЕЗ КРАЯ 
ЭКРАНА, ОН ПОЯВИТСЯ С ДРУГОЙ 
СТОРОНЫ. " 
6010 РРТНТ ы 
ВЫ ЛОЛЖНЫ УСПЕВАТЬ ОБЕЗВРЕЖИ- 
БАТЬ БОМБУ, ДО ТОГО, 
ВЗОРВЕТСЯ, 
ТОЛЬКО КОГДА ОНА АКТИВИЗИРУЕТСЯ. 


5020 РАТНТ я 
ВЫ НЕ МОЖЕТЕ ИДТИ НО ПУСТЫМ 
ПОЛЯМ И НАСТУПАТЬ НА НЕАКТИВИЗИ- 
РОВАННЫЕ БОНБЫ. ® 
5030 РЕТИТ те 
ГОРИЗОНТАЛЬНЫЙ РЯД БЛОКОВ НО- 
НО СДВИГАТЬ ВЛЕВО ИЛИ ВПРАВО 
КЛАВИШАМИ ‹!> ИЛИ <‹2>. ЭТО ПОМО- 
ЖЕТ ВАМ ПОДОЯТИ К БОББЕ и Т.Д." 
5040 РЕТЕТ ы 


ЕСЛИ ВЫ БЕРЕТЕ ФЛАГ, ТО ВАН 
ВЫДАЕТСЯ ПРЕМИЯ. * 

6050 60 ЗВ 9: РЕТЫТ *’°: 60 50В 
8 

5055 РЮТЕТ ы 
Шл : БЕЗОПАСНЫЙ БЛОК"^*° "ВС" ** 
Е: ФАлр=* вн 
НТ : НЕАКТИВИЗИРОВАННАЯ БОМБА" ^" 
а . 
ЦИ : ВАШ САПЕР”* *но*. 
УДАЧИ ВАМ. 9.21. . 


НАЖНИИТЕ ЛЮБУЮ КЛАВИШУ” 
6060 1Р ТНКЕ!ТЗ="” ТНЕН 60 ТО 60 
50 

6070 ВЕТОЕН 


Набирая программу, можете пе- 
риодически пользоваться КОМ 5 дая 
сохранения на ленте того, что уже 
вабрано. Х 

После автостарта программы со 
Строки 2, происходит загрузка 
Символьного набора "сьг"СОрЕ, да- 
лее происходит Форнирование сим- 
волов ЦШб-графики при поноши 
подпрограммы 5000, После этого 
выполняется переход на начало 
программы: ‘После остановки во 
время отладки, програмну можно 
опять запускать командой ЮО, 

В строке 20 следует запрос на 
вывод инструкции. Если есть подт- 
верждение для этого - нажата кла- 
виша "1" - то происходит вывод 
инструкции при пономи подпрограм- 
ны 6000. 

В строках 60-90 происходит за- 
дание исходных параметров игры. 
При ПОМОШИ ПОДПРОГРАМНЫ СО СТРОКИ 
3000 выполнзется прорисовка 
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основного игрового поля. Задание 
случайных позиций для расстановки 
"мин При Этом происходит В СТРО- 


100 начинаются 
йдействия, связанные `не- 
Ппосредственно с игрой; В строке 


1:20. проверяется одно из условий, 
ГОРИ КОТОРЫХ ПРОИСХОДИТ потеря 
|"хизни”. Это. попадание “сапера” 
на пустое поле, Если оно выполня- 
ется, то программа переходит на 
СТРОКУ 1000 для выполнения 
действий. связанных с этим: 

Другое условие потери жизни - 
это попадание “сапера” на поле, 
где установлена неактивизирован- 


1 КОНПЬЮТЕРНАЯ НОВЕЛЛА |- 


ная нина. Оно проверяется в стро- 
ке 160. 

Строка 170 выполняет проверку 
того, все ли мины обезврежены. 
Если да. ‘то програнма переходит 
на СТРОКУ 3000 - это переход на 
следующий уровень. 

Опрос клавишей управления про- 
исходит начиная со СТРОКИ 500. 
Здесь выполняется рассчет новых 
координат "сапера", если нажата 
одна из курсорных клавишей. Если 
хе нахата клавиша "1" или "2", то 
выполняются действия по сдвиганию 
горизонтального ряда блоков влево 


натвеев Ю. А. 


. ПОСЛЕДНЯЯ СХВАТКА” 
{по игре Колина Свинбурна 
"ДЯО БАЗИА-3”) 


Здание военно-промышленной 
иконпании было оцеплено. десятки 
|И полицейских автомнамин наглухо 


|скребу. На дальних подступах ожи- 
дали своего часа бронетранспорте- 
йры и танки, готовые по первому 
приказу выступить на штурм Глав- 
Иной резиденции Кракса Бладфинге- 


мощные прожекторы, оперативно 
установленные на соседних домах, 
освещали осажденый ‘небоскреб с 
первого по последний ‘этаж. У 
главного входа в здание, перед 
изапертыми изнутри бронированными 
дверями, стояло несколько человек 
ив штатском. они что-то оживленно 
обсуждали. ЧУТЬ в стороне ‘от них 
паотный человек небольшого ‘роста 
1с мегафоном на плече отдавал ка- 
|кие-то распоряжения полицеискин. 
На противоположном конце пло- 
|шади, прилегающеи к небоскребу, в 
окружении автоматчиков, стоял ли- 
|музин мэра города. За темными 
стеклами автомобиля шли ТРУДНЫЕ 
|переговоры по радиотелеФону с 
самим Краксом. 
|реднем сидении. Во влажных руках 
пон дерлал ‘телефонную трубку и 
|молчал. Говорил, в 
|Кракс. Он держался настолько уве- 
|ренно, что главе города казалось 
бесполезным перебивать его. } 
| —-,.. Ваши идеи не стоят и ло- 
|нанного гроша, -’  назидательно 
гремел В Трубку Бладфингер. - 
| Подумайте лучше о том, что будет, 
|когда за Вас возьмутся разъярен- 
|ные манаши этих детей. Материнс- 
кий инстинкт посильнее любой бом- 
|бы. - Кракс на секунду затих, как 
|6ы предлагая собеседнику оценить 
всю силу приведенный аргументов. 
Затем ов продолхий: - всем будет 
лучше, если нои условия будут вы- 


перекрывали все подъезды к. небо- 


Мэр сидел на пе-, 


основном, 


или вправо. При нажатии клавиши 
полнены. Раскинь мозгами и ты 
поймешь, что я предлагаю опти- 


нальный вариант: нне нужен всего 
лишь самолет. Зато какое я остав- 
яяю наследство - пелый небоскреб, 
набитый техникой. .. : 

-... И толпами головорезов, - 
с иронией в голосе добавил мэр. 

- Ну, это уже Ваши проблемы, - 
УХМЫЛЬНУЛСЯ Кракс. - Только дайте 
мне уйти без шума. Буду весьна 
благодарен, если Вы привлете на 
КРЫШУ вертолет, который доставит 
меня до аэропорта, ‘а ух тан Ваш 
санолет долго не задержится. 
Главное, чтобы хватило горючего 
для перелета через океан. даю 
слово, что больше ничего у Вас не 
ПОПРОШУ И МЫ распрошаенся, О’кей? 
И давайте без самодеятельности. 
Только при этих условиях счастли- 
вые мнанаши увидят своих ненагляд- 
ных чад. В противном случае, сам 
знаешь, эдание занинировано и 6у- 
дет уничтожено вместе с заложни- 
ками. Дерху пари. ноя техника не 
подведет. Вы согласны? 

Мэр представил язвительную 
улыбку на лице БладФингера и бре- 
эгливо поноршился: 

- Нет, Кракс, я все равно най- 


ДУ Способ ВЫКУРИТЬ Тебя из твоей . 


Крепости. Советую сдаться, так 
ты, по крайней мере, сохранить 
себе жизнь. 

- Неужели? - захокотал Кракс. 
- А я не думал, что вы настолько 
кровохадны, чтобы смотреть на жа- 
реное человеческое мясо. ` 

- Подонок. - прошептал мэр и 
ВЫКлЮЧиИлЛ СВЯЗЬ. 

В воздухе пахло грозой. Ситуа- 
ция осложнилась еше утром, когда 
мэр приказал арестовать Кракса 
БладФингера. Но тот что-то проню- 
$хал и успел захватить шестерых 
детей в качестве заложников. Они 
были похишены прямо из школы, 
когда тан только закончились за- 
нятия. Операция оказалась на гра- 
ни краха. Вечером того ‘же дня 
Кракс с доброй сотней своих голо- 
ворезов, забаррикадировался `В 
здании военно-промывшленной компа- 


“1” это выполняется в сТрокак с 
610, а при нахлатии "2® - в стро- 
ках с 700. 

В подпрограмме потери жизни со 
СТРОКИ 1000 происходит уменьшение 
на 1 количества оставшихся хиэ- 
ней. Если их больше не осталось, 
что проверяется в строке 1030, то 
происходит переход на подпрогран- 
му “конец игры“, которая нахо- 
дится в строках с 2000. здесь Вам 
будет предложено сыграть еше раз. 
ЕСЛИ да, То игра повторится сна- 
чала (при этом сохранится накси- 
мальный счет, ‘набранный в предлы- 
душей игре). если нет - то оста- 
новка и выход в Бейсик, 


нии и теперь диктовал свои усло- 
вия. Нэр всячески пытался оття- 
НУТЬ время, чтобы просчитать все 
возможные варианты. Военные, как 
всегда, предлагали штурм и обеща- 
ли за десять минут захватить зда- 
ние, но это быпо чревато челове- 
ческими хертвани. В такой ситуа- 
ции можно было не сомневаться, 
что Бракс выполнит свои угрозы. К 
тому зе мэр еше не вполне доверял 
военным, полагая, что в их рядах 
наверняка остались верные Краксу 
зюди, несмотря на проведенную в 
последнее время чистку. ь 

Президент военно-пронышленной 
компании Кракс Бладфингер стал 
терять вес в обществе сразу после 
того, как вскрылись Факты о при- 
менении ин гипнотизаторов для 
давления на членов городского ма- 
гистрата. С большим ‚трудом, на 
свой страх и риск, мэр собрал 
вокруг себя людей. готовых опро- 
КИНУТЬ ТРОН, На КОоТором восседал 
Кракс. Однако, в последний момент 
Бладфингер. перехитрил всех. Но 
мэр знал, что безвыходных поло- 
зений не бывает. Принимать усло- 
вия Кракса он и ве думал. Просто 
предстояло найти путь, ведуший к 
победе при новых правилах игры, 
ЕГО МЫСЛИ КРУТИЛИСЬ ВОКРУГ ОДНОЙ 
и той же идеи, воплотить в жизнь 
которую мог только один ‘челонек. 
Его ‘звали Джо ‘Блэйд. , 

Нэр вызвая по рации командира 
ГРУППЫ Охраны: 

- Вы знаете джо Блэйда? 

- Да, сэр, - ответил офицер. 

- Он, скорее всего, сейчас до- 
на. Езжайте туда, объясните ‘ему 
ситуацию и доставьте его ко мне. 

- Есть! - ответил охранник, и 
мэр выключил рацию. 

не прошло и получаса, как 
дверь бронированного ‘линузина 
распахнулась`и на заднее сидение 
бесшумно приземлился джо. он ос- 
тавался верен своену стилю: во- 
енные камуфляжные штаны, нмайка- 
безрукавка и излюбленная кепка. 
Если бы не личное знакомство, мэр 
ПРИНЯй бы его ‘за головореза из 
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банды Кракса. \ 

- Здравствуй, . - мэр развернул- 
ся лицом к Джо и протянул через 
сиденье. руку. 

- Здравствуйте, 
Ровался Вяэйд. 

Заметив недовольство собесед- 
ника, мэр сразу поинтересовался в 
чен дело. Е 

- ваша охрана забрала у меня 
распылитель, ответил Джо,  по- 
глядывая в окошко автомобиля ‘на 
офицера охраны, завладевшего его 
оружием. Ио 

- Это меры предосторожности, 
сказал нор, - но все поправимо. 
Секунду..: - Он распахнул иверь, 
вышел из ‘мамины и что-то сказал 
охраннику, ‘Тот передай ружье 
Блэйда мэру и куда-то удалился. 
Шэр вернулся в машину. но орушие 
сразу не отдал, ‘а положип его 
на свободное сидение водителя. 

- потерпи немного, - сказай 


- вяло поздо- 


Ибрюк за сигаретами. 


| -'Я надеюсь, что ты уже в КУР- 
се, - начал мэр. 
- Вже бы, - киввул Дхло, затя- 


гиваясь сигаретоси. 
стоит на ушах. й 
‚ - Цаан такой. По ноин данным, 
|в этот небоскреб, - мэр ткнул 
пальцем в лобовое стекло, - ведет 
подземный ход из вентиляционной 
|шахты, расположенной под зданием 
Городского нагистрата. 06 
подземном ходе знаю только я. не- 
сколько доверенных мне лиц и 
Кракс. Так как небоскреб полнос- 
тью блокирован, уйти отуда мохно 
[лишь через подземный ход. о Судя 
по всему, Кракс это и собирается 
сделать в случае невыполнения его 
условий. В то время, когда из-под 
обломков будут вытаскивать трУлы, 
Кракс уже успеет пересечь грани- 
цу. ` 

- А почему бы ему не 
это сейчас? - резонно 
Идо, 
1 - Понимаешь, - мэр наклонился 
Иблихе, - он рискует и попитается 
пухватиться за все возможные вари- 
Гаяты. он, наверняка, подозревает, 
что я знаю об этон подзенном ко- 
де, хотя строился он еше в начале 
века И был СТРОГО засекречен от 
посторонних. , 
него случайно, когда прорабатывал 
варианты захвата Кракса. Мы тогда 
планировали взять его в здании 
магистрата и оснатривали подвалы. 
Я думаю, что Кракс использует 
| этот вариант только в самом край- 
инем случае, когда отступать будет 
некуда. Он хе не может дать пол- 
|ной гарантии, что в конце хода 


- Весь Город 


сцелать 
занетил 


| - Логично, - джо покосился на 
запишавиий радиотелефон. 
Нэр СНЯЛ ТРУБКУ: 


Джо кивнул и полез в карнан 


этом ' 


Я сан наткнулся на. 


КОНПЬЮТЕРНАЯ НОВЕЛЛА 


- НУ, 
голосом спросил Кракс. 
г Ответ будет через час, 


что Вы решили? - ледяным 


НУ 
хо сказая мэр. - Мне нужно вреня, 
чтобы отвести людей и технику и 
обсудить кое-какие детали, ‘свя- 
занные с вертолетом. 

г А самолет уже готов? - де- 
панно удивился Кракс. 


- Все будет, как только очис- 
тим пломадь, - отрубил мэр. 

7 Хорошо, я жду еше час, -и 
Кракс отключился. 

т Нас перебили... Ну так вот, 
= МЭР города поснотрел на джо 
Блэийда, сохранявшего железное 
спокойствие, - я, как всегда, на- 
деюсь только на тебя. людей с 


твоим уровнен подготовки вет дахе 
среди ноей охраны и лучше тебя 
это никто не сделает. - Мэр улыб- 
нУлся. - В общем, я решил так; 
ты через подземный код пронйкаешь 
в резиденцию Кракса и освобожда- 
ешь детей, кстати, их как и тог- 
да, шесть человек. Объясни им, 
что они могут смело прыгать из 
окон вниз. Ны натянем брезентовое 
похарное полотнише. Опытные люди 
будут ЛОВИТЬ ИХ. 

Джо Блэйд прикинул высоту не- 
боскреба: 

= А если они все на двадпатых 
этажах? Не высоковато ли прыгать? 

- Жить захочешь - прыгнешь, - 
ответил мэр. - Если будет возмож- 
ность, пусть спустятся на лифте 
пониже. одним словом, смотри по 
обстановке. Мы с тобой можем рас- 
считывать только на внезапность. 
А потон меня интересует Кракс. Я, 
конечно, не настаиваю, но если 
будет возможность схватить его, 
не упусти свой шанс. Я даю тебе 
право действовать от моего имени, 
а если удастся уничтожить здание 
компании, то буду очень признате- 
лен. Мне не хотелось бы, чтобы от 
Кракса оставалось какое-либо на- 
следство, 

В стекло боковой двери автомо- 
биля постучал офицер охраны. Нэр 
ПРИОТКРЫЛ ДВЕРЦУ И ТОТ ПРОТЯНУЛ 
ему какой-то преднет в брезенто- 
вом чехле. Захлопнув дверь, глава 
города повернулся к Дхо и передал 
сверток ему, Джо сдернул чехол, 
Он дерхай в руках новенький блес- 
тяший автонат пульсирующего  дей- 
ствия с полным магазином. он 
удивленно поднял глаза. 

- Получше твоего ружья, - ска- 
зал нэр, довольный произведенным 
впечатлеяиен, - Действует как 
расиылитель, да к тону зе не ос- 
таваяет вредных продуктов распы- 
ления. Отменная вешь! 


- Откуда это? в 
- Мы тоже кое-что умеем, - и 
мэр, включив рацию, стал отдавать 
распоряжения. 
й х " 


` себе, Потон в конце длинного ко- 


-звавия зтажей приводятся по 


Спустя полчаса Джо Биэид, воо-| 
руженный автонатом, выслушав пос- 
ледние наставления мэра, нырнул в! 
люк подземного кода, Путь к небо- 
скребу оказался недлинным. Дхо| 
освещал себе дорогу карманным $Фо-1 
нариком. Он шел во тесному и сы-! 
РОМУ КИРПИЧНОМУ КОРИДОРУ ПИМЬ С 
одной мыслью: поскорее добраться! 
до цели. Повернув за угол, неожи- 
панно для себя он увидел выход. | 
Джо Блэйд осторожно ТОЛКНУЛ ШИРО- | 
кую дверь и та, со скрипом, пода-| 
лась. Проскользнув в шель, он ©с- 
нотрелся. Подвал небоскреба пока-! 
запся огромным. Высокие кирпичные | 
стены и бесконечный коридор. Впе- 
реди на бетонном полу артинными| 
буквами было написано: "НЕ ЗАГРО- 
МОЖДАИТЕ ПРОХОД". Виезанно  онй 
услытал чьи-то шаги и увидел дво-й 
их. Впереди шел охранник в воен-! 
Ной Форме с автоматом наперевес, | 
а чуть сзади кто-то в штатском. | 
БЛЭЙц только успел разглядеть его! 
бандитскую Физиононию, как палец/ 
непроизвольно нахал. на курок, 
распылитель сработал безотказно. 
В воздухе повисли два белых ©б-| 
лачка. Джо надавил плечом на! 


дверь, через которую только чтой 
вошел. она была заперта с той. 
стороны. И этого следовало ожи-1 


цать; путь к отступаению был уже 
предусмотрительно закрыт лодьми 
мэра. 

Джо прошел коридор, нашел ка-| 
кую-то невзрачную дверь и снова 
наткнулся на охрану. Бой был ко- 
роткин. расчистив себе путь. он! 
быстро осмотрел подсобное поме- 
шение. В одной из комнат он нашел 
ключ. Нигде не задерживаясь, Джо! 
обошел весь подвал. но ктоме кем- 
то подлохенной нины и ручной гра-| 
наты больше ничего не обнарулил. | 
Через мину Джо благополучно пере- 1 
прыгнул, а вот гранату оставил 


рилора он увидел лифт. дхо Блэйц| 
вошел в кабину и сердце его слег- 
ка екнуло: этот лифт мог поднять- 
ся только до третьего этаха. (На-| 
пра- 
вилан, принятым в английском язы-| 
ке. - прим. автора) Для того. что- 
бы попасть выше, требовался спе-й 
циальный пропуск. Но где его ис-| 
кать? Джо поднялся этажом выше, | 
Людей зщесь оказалось гораздо 
неньше, чем он ожидал. Праздно| 
шатажщиеся охранники встретились| 
ему пару раз, когда он осматривал! 
коннаты в войсках заломников. Дхо 
предпочитал беречь патроны: если! 
по КОРИДОРУ кто-то шел, он на 
вреня прятался за дверью. 

`Обойдя весь этаж. Джо пополнил 
карманы ключами. В одной из ком-|! 
ват он нашел Взрывное УСТРОЙСТВО. | 
вероятно, Кракс приготовил его] 
для, уничтожения знания. Внима-| 
тельно осмотрев устройство, Джо} 
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понял, что до полной комплектации 
не хватает магнитного детснатора, 
|приводяшего эту штуковину в деёй- 
ствие. "Потом разберемся", - по- 
дунал джо и на всякий случай за- 
Поомнил расположение комнаты ‘на 
этаже. 

на выходе он столкнулся с ка- 
|ким-то бандитом, который заглянул 
в дверь. Джо отскочил в сторону и 
выстрелил. Проход освободился. 
| По пути к лиФТУ Джо Блэйд снял 
|со стены еше один ключ. он пони- 
нал, что чем больше найдет клю- 
чей, тем больше сможет открыть 
дверей в этих лабиринтах. У лифта 
Дхо отправил на небеса ‘еще одного 
охранника и вошел в кабину. Здесь 
пнекоторое вреня можно было отдох- 
нУТЬ и обдумать дальнейшие дейст- 


Естественно, Кракс развел за- 
Пложников по разным этажам и, что- 
\6ы добраться до них, было необхо- 
|димо обзавестись пропусками на 
все этахи. Джо уже представил се- 
6е, сколько он потратит времени и 
сил, прежде чем сможет беспрепят- 
ственно перемешаться по небоскре- 

Наземный этаж Джо осмотрел бы- 
СТРО, благо здесь охраны было не- 
много. Лишь один раз он на долю 
секунды замешкался, проходя через 
дверь Из одного коридора В другой 
и за это поплатился: рябой мордо- 
| ворот, вышедший навстречу, нанес 
чувствительный удар всем корпу- 
сон, да такой. что’у Джо Блэйда 
| поплыли круги перед глазами. По- 
|йтеряв ориентацию, Джо уснел пару 
раз нажать на курок, ‘Но пронах- 
нулся. Охранник опять двинулся на 
него. Не успев прийти в себя, Джо 
посмотрел вперед по коридору и 
|увидел, как к нему движутся ще 
| четыре охранника, двое из которых 
[были вооружены. "Граната!"  - 
Имелькнуло у Джо, и он, подпрыг- 
нув, нетнул в толпу легкую рУЧНУЮ 
гранату, которую нашел в подвале. 
Когда рассеялся дым, он не увидел 
окровавленных и изуродованных тел 
- граната Кракса имела свойства 
распылителя. Охранники бесследно 
исчезли. Джо как вихрь промчался 
по КОРИДОРУ, поочередно  загляды- 
вая во все двери. В одной из кон- 
нат он заметил заложника. 

Ребенок сидел на полу, связан- 
ный по рукам и ногам, с кляпом во 
рту. Глаза, полные слез, испуган- 
но смотрели на Джо Блэйда. 

- Свои, - тихо сказал Джо 
Блэйд и принялся освобождать рё- 
бенка от веревок. 

они обменялись несколькими 
|фразани. оказалось, что в рядах 
охраны царит паника и многие ‘уже 
думают о побеге. Краем уха маль- 
чишка слышал, Что у большинства 
охранников автоматы не заряжены и 


| 
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носят они их только для показуки. 
Военная машина БладФингера где-то 
дала сбои и ему, видимо, не уда- 
лось ВоорУЖИТЬ ВСех своих людеи. 
Саные верные Краксу охранники на- 
ходятся на верхних этажах, а вни- 
3у всю основную работу делают 
патрульные роботы. 

Джо изложил вкратце план побе- 
га и нальчишка утвердительно кив- 
НУл, 

- Будь осторожен, Это наземный 
этаж - высота небольшая. Так что 
не бойся прыгать в окно. Я тебя 
ПРИКРОЮ. - ХлопнУВ Парня по пле- 
чу, Джо вышел в коридор. здесь 
НИКОГО Не было. Быстро пПРОоСКОЧчИВв 
несколько комнат, он заглянул в 
ПРИОТКРЫТУЮ дверь В самом конце 
коридора. На полу у дальней стены 
лежал какой-то преднет. "Детона- 
тор," - Подумал Джо сразу, как 
только взял вешицу в руки. Теперь 
он мог зарядить одно взрывное 
УСТРОЙСТВО, найденное на нижнем 
наземном этаже. Однако он пони- 
мал, что таких взрывных УСТРОЙСТВ 
гораздо больше и для полного уни- 
чтожения здания необходимо было 
зарядить их все. Следовательно, 


нужно постараться найти как ножно у 


больше детонаторов. с этой мыслью 
Джо Блэйд вышел из комнаты. Хлоп- 
нула дверь, и из соседней комнаты 
появился охранник. Увидев Джо 
Бпэйда, охранник собирался что-то 
спросить, но тот без промедления 


нажал на курок. Облако еше не 
растворилось в воздухе, а Джо уже 
был во ВТОоРОоИ половине этажа. 


Здесь он собрал какие-то компью 
терные дискеты и на всякий случай 
прихватил их с собой. 

Возвращаясь к лифФту, Джо за- 
глянул в последнюю комнату, ос- 
тавшуюся неосмотренной на этом 
этаже. Он чуть было не споткнулся 
© НИНУ, которая лежала прямо у 
входа, ибо в Этот момент его вни- 
нание привлекла табличка с над- 
писью "БЕЗОПАСНОСТЬ" над дверью в 
соседнее помешение. Дхо осторожно 
толкнул дверь, но вдруГ погас 
свет, раздался какой-то звук и 
перед глазами засветился шифро- 
занок с восьмью цифрани. ’Отсту- 
пать было некуда. Сейчас здесь 
будет вся охрана, и тогда ему '- 
конец. Секретный замок отводил 
РОВНО ОДНУ МИНУТУ на подбор кода. 
Счетчик лихо стал отстукивать 
секунды. Джо в панике беспорядоч- 
но нажимал кнопки на панели зам- 
ка, надеясь на случайное совнаде- 


ние цифр. С такой системой кода 
он встретился впервые, НуЖжной 
комбинации не получалось. Когда 


до срабатывания сигнализации ос- 
тавалось около двадцати секунд, 
джр понял систему работы кода. 
Взяв себя в руки, он начал мето- 


дично подбирать нижний ряд ‘цифр. | 
В течение следующих десяти секунд 
ему удалось выставить правильный 
шифр. Раздался булькающий звук, 
включился свет и дверь распахну-| 
лась. Комната была пустынна. на 
письменном столе у окна стояла 
бутылка нолока, а на тарелке ле- 
хал гамбургер. Видно, хозяин ка- 
бинета собирался перекусить, но! 
был срочно куда-то вызван. дхо не 
упустил возножности подкрепиться. || 
Усталость как рукой сняло. Веро-| 
ятно, ПРОДУКТЫ содержали сшеци-| 
альные вещества, 


влияющие на жиз-1 
недеятельность человеческого ор- 
ганизма и восстанавливали силы в| 
кратчайшие сроки. Кракс заботился 
© своем персонале. | 

Не’ прошло и. десяти минут, а! 


этажа. Здесь он отыскал еше два! 
ВЗРЫВНЫХ УСтрОЙСТва, несколько" 
ключей и магнитный 
Зная, 


чем на один метр, он перепрыгнул| 
через взрывное Устройство и на-| 
правился к лиФту, 

Он расстрелял охранника, 
жидавшего кабину и только ‘сеичас! 
заметил, что запас патронов на 
исходе. сумеет ли он наити их’для 
своего автомата в логове Кракса? | 

На второн этаже Джо долго не! 
задержался. В одной из многочис- 
ленных комнат он нашел еше одного! 
связанного заложника и, перегово-|^ 
Рив с НИМ, заставил его быстро! 
покинуть здание через окно. В со- 
седних комнатах Джо нашел  взрРЫВ- 
ные устроиства. Запомнин располо 
жение комнат, Дхо Блэйд перешел 
во ВТОРУЮ половину этажа. Нес- 
колЬко ключеи и граната были вв- 
сьма кстати, поскольку патронов 
для своего автомата он пока так и 
не нашел. 

нажимая в лифте кнопку с циф- 
РОЙ "ТРИ", Джо с горечью думал о 
пропуске на следующие этажи, ’ко- 
торого у него не было. Когда две- 
Ри лифта рРаспахнулись, в глаза 
ударил яркий голубой  неоновый 
свет. Джо Блэйд оказался в другом 
мире. После полумрака подвальных 
помешений обстановка казалась ему 
почти домашней. й 

не успел Джо выйти из лифта, 
как к нему бросился охранник, 
требуя предъявить какие-то доку- 
менты. Блэйд не стал вступать в 
спор, да и патронов оставалось 
совсем немного. Он рванулся ‘в 
противоположную от охранника сто- 


под | 


РОНУ И, пробежав несколько мет- 
РОВ, ТОЛКНУЛ Первую попавшуюся 
дверь. И только ТУТ Джо БЛЭЙД 


заметил прикрепленные к стенам 
видеокамеры, которые следили за 
каждым его шагом. Похоже, его 


засекли. Только бы успеть заря- 
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дить автомат. Он выбежал в кори- 
| дор. 

Отперев ключом  застекленную 
дверь, Джо оказался в небольшом 
кабинете. Патронов здесь не было, 
|однако какая-то коробка, с нари- 
сованной на ней театральной нас- 
кой, сразу привлекла его внима- 
ние. Джо обнаружил в коробке пол- 
ный. комплект `обмундирования для 
службы охраны. За несколько се- 
кунд Джо Блэйд преобразился до 
|неузнаваености и стай как две 
капли воды похож на человека из 
охраны БладФингера. Единственное, 
о чем жалел джо, так это о недол- 
говечности этой Формы, ибо в 
ткань материи были вшиты волокна 
|микродатчиков, которые были спо- 
собны улавливать опознавательные 
сигналы от передающих устройств, 
| вживленных в мочку уха каждого 
сотрудника компании. джо не знал 
Ивсех тонкостей работы этой систе- 
|мы, однако понинал, что чужака, 
одевшего Форму, легко  запеленго- 
вать. Поэтому носить униформу 60- 
|лее двух-трех нинут было опасно. 
|Неспеша джо Блэйд вышел в коридор 
|и осмотрелся. ВИНО прошли четыре 
сотрудника безопасности, не обра- 
тив на него никакого внимания, 

За то время, пока Джо чувство- 
вал себя достаточно спокойно в 
Форме охранника, ему удалось тша- 
‘тельно осмотреть весь этаж. Уже 
не веря в удачу, он обнаружил 
Ияшик с патронами нужной систены. 
Затем, где-то в глубине длинного 
кабинета, нашелся и пропуск на 
верхние этажи, а чуть позже, ос- 
|матривая конпьютерный зал. джо 
решил поэкспериментировать с дис- 
кетани. 
| Включив компьютер, он быстро 
отыскал нужный пароль и, войдя в 
меню, запросил машину об этажах, 
на которых находятся заложники. 
"8 этаж", - выдал компьютер и от- 
|ключился. Блэйд понял, что по од- 
|ной инфорнационной дискете он мо- 
жет получить только один ответ. 
Однако в его запасе было. несколь- 
йко дискет, поэтому уходить он не 
торопился. Компьютер выдавал ин- 
| формацию по любому вопросу. Джо 
удалось узнать все, что ему было 
нужно. Записав ответы компьютера, 
сн вернулся к лифту. Нино, тяжело 
дыша, пробежал здоровенный охран- 
|ник. Джо Блэйд на всякий случай 
отвернулся лицон к лифту, Вероят- 
но, охрана уже заподозрила что-то 
неладное, хотя он старался не ос- 
таваять свидетелей. 
| На четвертом этаже джо при- 
|шлось столкнуться сразу с двумя 
|патрульными роботами. Спаситель- 
вая Форма осталась в лифте: джо 
не ног более рисковать. Роботы 
чем-то походили на пылесосы - не- 
|высокая пластиковая платформа на 
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небольших  гусеницах  венчалась 
продолговатой металлической шеей 
с телекамерой, заменявшей голову. 
Несмотря на свою неуклюжесть, ро- 
боты передвигались довольно быс- 
ТРО и Блэйду пришлось разаожить 
их на атомы, как только те стре- 
нительно покатились на него. “ин- 
тересно, - подумал джо, - как там 
сейчас мэр? Удалось ли ену оття- 
НУТЬ время?" 


- Я уничтожу всех, - кричала 
трубка голосон Кракса, - Преду- 
преждаю: еше полчаса - и вы буде- 
те жалеть, что не выполнили нои 
требования. 

Нэр посмотрел на часы: Джо 
Блэйд должен успеть, Двух. залож- 
ников уже передали заплаканным 
матерям, но еше четыре семьи жда- 
ли своей очереди. 

= Я отдал. приказ об отводе 
техники, - сурово произнес нэр. - 
Вертолет готовится к вылету. Так 
что Вы ножете успокоиться. 

Кракс ничего не ответил и от- 
ключился. 

Плошадь перед зданием военно- 
промышленной компании заметно 
опустела. Под стенами небоскреба 
с ‘туго натянутыми  полотнишани 
стояли в напряженном ожидании по- 
жарные и несколько полицеиских. 
Жителей прилегающих домов спешно 
эвакуировали. Вокруг осажденного 
здания образовали  килонетровую 
запретную зону. Танки и броне- 
транспортеры отодвинулись вглубь 
города. 

Нэр, не покидая своего. лимузи- 
на, наблюдал зао этой картиной. 
"Только бы Джо успел найти всех 
заложников, " - думал он. Подзем- 
ный ход надежно перекрыт. 0 Блэй- 
де он тоже позаботился: вертолет, 
который якобы предназначался ‘для 
Кракса, на самом деле до послед- 
него будет ожидать джо на крыше 
небоскреба. Пилот уже, получил 
необходиные инструкции. Что еше? 

Нэр уже в котоРЫЙ Раз  просчи- 
тывал возможные варианты. Запи- 
ша радиотелефон: 

- Слушаю. 

- Еще в одном танке обнаружена 
бомба, - хрипло отозвался голос 
на другом. конце. 

-‹ Жертв нет? - нахмурился мэр. 

- Нет. 

- Номер танка? 

— Ноль восемь. 

- Держите в курсе, ‹- отрезал 
глава города и положил` трубку, 

Сохранять  конспирацию было 
необходимо, поскольку. Кракс мог 
прослушивать любые каналы связи. 
После. этого короткого разговора у 
мэра полегчало на душе - Дно ос- 


вободил третьего заложника, 


. жаные. диваны и кресла, 


кото-| 
рый находился на восьмом этаже. | 
"Молодец парень!" - иэр откинулся! 
на спинку сидения и облегченно! 
ВЗДОХНУЛ, 


ЕГО загнали ‘в угол. Сразу. три| 
охранника ‘приблихались к нему. | 
"Будь проклят этот этах!", - | по-| 
думал Джо, цоставая из кармана! 
гранату. Патроны закончились еше 
ва выходе из лифта, когда при-| 
шШлось распылить почти целый взвод 
охраны и пару свирепых роботов, | 

Вспышка на время ослепила, -но| 
медлить было нельзя. джо бросился 
по КОРИДОРУ обратно к пифту, спу-| 
стился двумя этажани ниже за  па-| 
тронами, которые он оставил про 
запас. Однако спокойствия не при- 
бавилось, ибо боеприпасов хватило 
лить на половину магазина. 

Чувствуя легкую слабость в но- 
гах, Джо поднялся на одиннадцатый! 
этах, Здесь, по сообщению компыр-| 
тера, можно было найти патроны | и| 
легко перекусить. | 

Помешения службы безопасности! 
Джо ног осматривать уже без лиш- 
ней нервотрепки, связанной с под- 
боркой кода. Ему помогали › спепи- 
альные пластиковые пропуска с 
магнитным покрытием, которые он 
нашел, осматривая какие-то слу- 
жебные помешения. Места заточения 
оставшихся троих детей джо уже! 
знал. Ближайший заложник находил-| 
ся на пятнадиатом этаже. Пропуск! 
У Блэйда был до девятнадцатого. | 
Полностью вооружившись и приведя! 
себя в порядок. джо Блэйд вошел в| 
лифт и решительно нажал кнопку! 
пятнадцатого этажа. ` | 

Через несколько секунд кабина 
лифта остановилась и распакнулись| 
автоматические двери. В холле: джо! 
юоснотрелся. Вдоль стен стояли ко- 
полы по- 
крывали мягкие ковровые дорожки, 
а на стенах висели дорогие карти- 
ны. Поснотрев налево, он увидел 
человека в военной Форме, который! 
быстро шел к нему. Джо: развернул-! 
ся и побежал в противоположную! 
СТОРОНУ. . | 

- Стой! Стрелять буду! - крик-| 
вул охранник, вскидывая автонат. | 

Джо Блэйд видел впереди себя 
спасительную дверь: оставалось 
сделать несколько шагов, но всаед| 
ПРОГРеНели выстрелы. Правое плечо 
обожгло. КРОВЬ ТОНКОЙй  СТРУЙКОЙ 
побежала по руке. Джо выстрелил в 
ствет и не. промахнулся: Но вслед! 
за охранником, хужла гусеницани, | 
двигался патрульный робот... Блэйд 
НЫРНУЛ в кабинет и, придерживая! 
ногой дверь, отдышался. | 

- Черт возьми, здесь ребята 
стрелять змеют, ’- продедил он; | 


150 


зажав рукой рану. 

Вдруг в УГЛУ комнаты кто-то 
ВСхлИПНУЛ. Джо обернулся и увидел 
ребенка, сидевшего на полу за 
креслом. 

"НУ, что ж, - успокаивал себя 
Джо, развязывая веревки, - это 
хорошая компенсация за царапину 
от ПУЛИ“. 

Парень оказался на редкость 
смышленым и Джо Блэйду не при- 
|йшлось долго объяснять, что к че- 
му, Прикрывая мальчишку, он про- 


где лучше выпрыгнуть из окна: Сам 
|хе пересек Коридор и открыл мас- 
сивную дверь, ведущую в проСтор- 
|вый кабинет. Здесь под кадкой с 
|Фикусом лежал брошенный кем-то 
бронежилет. "Во-время, " - подумал 
джо, застегивая замки пластиковой 
"зашиты. ° Чувствуя себя намного 
спокойнее, он прошел коридор до 
лифта и поднялся на девятнадцатый 
этаж. ТУТ он должен был найти 
|пропуск на верхние этажи небо- 
скреба и заложника. Компьютер не 
обманул. Пять минут понадобилось 
|на то, чтобы отыскать в одной из 
комнат плачушего ребенка, а по 
пути прихватить с собой сразу ‘два 
пропуска на ‘лифт. Но Джо Блэйду 
пришлось расстаться с бронежиле- 
который ‘долго носить было 
так же опасно, как и Форму. 
Спустившись на шесть этажей 
|ниже, Дхо основательно подкрепил- 
|ся предусмотрительно оставленным 
здесь гамбургером и зарядил мага- 
Гзин распылителя. ‘Машинально про- 
|верив карманы, он ‘еще раз убе- 
‘дился в ‘сохранности шести дето- 
Инаторов, которые он собрал. С их 
поношью Джо собирался уничтожить 
здание. Замысел был прост. оста- 
валось только наити последнего 


Он решительно направился к 
лиФтУ и спустился на третий этаж. 
ИВ компьютерном зале никого не бы- 
И ло. У Джо оставалась последняя 
'неиспользованная дискета. Блэйд 
1включил клмпьютер. Короткий сиг- 
нал. Минута на подбор кода. по 


- Что ж, увидимся! - вслух 
сказал Джо и направился к выходу. 
Но сначала Джо Блэйд поднялся 


|ником. Все прошло; как по.’ маслу. 
Ему повезло - ребенок сидел в ко- 
|ридоре недалеко от лифта. осво- 
бождая его от веревок, Джо’ думал 


м 
- Я не буду ждать ни минуты, - 
Кракс нервно теребил пуговицу на 
|манжете пиджака. 
- Вертолет уже подают на кры- 


КОНПЬЮТЕРНАЯ НОВЕЛЛА | 


ШУ, - ТИХО урчала трубка голосом 
мэра. 


- В таком случае я ногу идти 
туда? 

- Пожалуй. .. 

- Я не верю Ван! - сорвался в 
КРИК Кракс. - Вы лжете! 


Но он. уже кричал`в пустоту. 
Нэр выключил связь. Кракс Блад- 
Фингер ШВЫРНУЛ ТРУбкУ рРадиотеле- 
Фона на пол, поднялся с кресла и, 
быстро накинув плаш, ‘распахнул 
дверь в Коридор. Неожиданно тиши- 
ну офиса нарушил треск автонатных 
очередей и грохот взорвавшейся 
гранаты. На секунду все стихло. 
Кракс в панике отшатнулся к сте- 
не, когда увидел широкоплечего 
нускулистого человека в прокоп- 
ченной майке и камуфляжных шта- 


нах, который появился из облака 
дына. 

- Поговорим, ‘- спросил Джо 
Блэйд, приближаясь. Дуло распыли- 


теля смотрело прямо в лицо Крак- 
су. 

Бладфингер рванул по коридору. 
Надо занетить, что бегал он не- 
плохо, несмотря на свой возраст. 
Джо бросился за ним. 

Кракс знал все входы и выходы 
и прекрасно ориентировался в сво- 
их аппартанентах. Дхо еле успевал 
за ним. В одном из коридоров при- 
шлось воспользоваться ‘гранатой, 
чтобы убрать людей Кракса. ‘"“Уй- 
дет, гад,” - думал Джо Блэйд, 
глядя на то, как БладФингер рас- 
пахивает очередную дверь. И тут 
сдали нервы. Джо нажал на курок. 
Но что это? Фигура Кракса, чуть 
задержавшись, исчезла за дверью. 
“Промахнулся?” - с удивлениен по- 
думал Джо, врываясь следом. 

Это была ловушка. Кракс пря- 
тался за спинами сразу трех воо- 
руженных охранников. Джо метнул 
гранату, но его успели задеть, 
Скрипя зубами от боли, он надви- 
Гался на Кракса, который, как ни 
Странно. был цел и невредин, от- 
ступать Бладфингеру было некуда. 
Прихавшись спиной к стене, с мер- 
твенно бледным лицом, он с ужасом 
снотрел на супернена. 

- Знаем мы твои штучки, - тя- 
жело дыша сказал джо, хватая за 
ГРУДКИ Президента компании. Кракс 
не сопротивлялся. Вдруг что-то 
хрУСтнУЛО ПОД железными пальцами 
Блэйда и тихо запишал миниатюрный 
приборчик. спрятанный во внутрен- 
нем кармане БладФингера. Рванув 
плаш на груди Кракса, Джо выташил 
на свет маленькую черную коробоч- 
ку с цифровым индикатором. Ох ух 
этот любитель головоломок! Блэйлу 
некогда было рассуждать о тон, 
что произойдет, если он не успеет 
подобрать код. Посеревший Кракс 
медленно сполз по стенке, когда 
джо удалось выставить нужную ком- 
бинацию цифр. Защитное поле во- 
круг Бладфингера было разрушено. 


- НУ, вот и все, - ВЫДОХНУЛ 
Джо. Взвалив Кракса на спину, он 
донес его до ближайшего ‘окна. - 
Высоковато будет. Но тебя внизу 
ПРИМУТ В лучшем виде. 

Джо Блэйд распахнул окно. Вни- 
зу на плошади по-прехнему стояли 
люци с натянутын брезентом, кото- 
рый большим серын квадратом выде- 
лялся на Фоне темного асфальта. 

- Принимайте‘ - выкрикнул В 
ночь Джо и спихнул испуганного 
Кракса с подоконника. Несколько, 
секунд тишины.  Обмякшее тело 
потерявшего сознание БладФингера 
удачно приземаилось по  пентру 
полотниша и, пару раз спружинив, 
осталось лежать без движения. 

Расстреляв в коридоре охрану 


захваченного президента, Джо 
Блэйд пошел к лиФту. 
Зарядить взрывные устройства 


на нижних этажах было делом тех- 
ники. Охрана почти не сопротивля- 
лась. Самые унные наверняка уже 
сдались в руки правосудия ив 
здании остались пишь фанатики. 
Зарядив последнее шестое взрывное 
устройство, Джо вошел в кабину 
лифта и нажал кнопку двадцать 
восьмого этажа. "Мэр что-то  го- 
ворил о вертолете, - думал Джо, - 
если, конечно, меня дождутся“. 
Ену необкодимо было отыскать путь 


на КРЫШУ небоскреба. Время 
поджимало. Пришлось пробежать по 
КоРИДОору, Не обрашая внимания на 


крики людей Кракса и автоматные 
выстрелы. Он открывал двери одну 
за другой. Где же лестница на 
КРЫШУ? Вскоре, в кабинете службы 
безопасности он Увидел то, что 
искал. Через несколько секунд джо 
уже был на крыше. Какие-то отча- 
янные автоматчики встретились у 
него на пути, но на этот раз он 
не пожалел патронов. На другом 
конце крыши его ожидал вертолет. 
спотыкаясь и еле передвигая ноги, 
Джо Блэйд приближался к цели. 
Вслед трешали автонаты последних 


фанатиков, а впереди он видел 
блестящий бронированный борт 
вертолета, отрахавший тусклый 


свет неполной пуны. Еше один шаг 
и он спасен. 

Дхо пришел в себя, когда упал 
в мягкое кресло рядом с пилотом, 
и вертолет, резко поднявшись 


вверх, стал удаляться от небо-| 
скреба. Плошадь внизу была пу- 
стынна. Джо посмотрел на пилота, 


Тот хитро ПОоДНИГНУЛ И ПОДТОЛКНУЛ 
плечон уставшего супермена. Блэйд 
вяло улыбнулся. Пилот включил ра- 
цию: 

- Все по плану, 
- Иду на базу. 

Джо посмотрел на. часы; час 
ночи, Ему сильно хотелось спать. 

- Как же тебе удалось? - спро- 
сил пилот и посмотрел на Блэйда. 

- Сан не знаю, - вздохнул Джо 
и закрыл глаза, 

Вертолет шел на посадку. 


- доложил он. 


и ФИРМА “ИНФОРКОМ”“ 
учреждают 
АССОЦИАЦИЮ ПОЛЬЗОВАТЕЛЕМ ДОМАШНИХ КОМПЬЮТЕРОВ 
а также 


“ФОНД ЛИТЕРАТУРЫ, ОПИСАНИИМ ИМ ПРОГРАММ“ (“ФЛОП"“) 


задачи дд^ссоцилдции || Оказание содействия в приобретении 
м ФОНДА: компьютеров, периферии, программ и 
литературы всем желающим. 


основные ндаАпПРАВЛЕНИЯ ДЕЯТЕЛЬНОСТИ: 


Открыта ВЫСТАВКА - КОНСУЛЬТАЦИЯ - ПРОДАЖА учебно-игровых домашних компьютеров. 
Выставка работает ежедневно, кроме понедельника с ‘11 до 17 часов. 

Апрес: Москва, Новая плошадь, , д. 3/4, подъезд !. Государственный Политехнический музей. 
Проезд до станции метро "Лубянка", "Китай-город". 


есомиьютеров м пермФермы к УЧастию в 
ВЫСТАВКЕ — ПРОДАЖЕ 


АВТОРАМ ПРОГРАамм Открывается возможность для реализации собственных разработок, 

В качестве первого шага создается систена зашиты авторских прав. Авторы. желающие заявить 
© своих правах должны выслать два описания программы (краткое для публикации и подробное 
для архива) со своими данными в адрес "ИНФОРКОМа". 

Описания программ, заслуживающих внимание будут опубликованы в "2Х-РЕВЮ”, для чего 
открывается новый раздел "АВТОРСКАЯ ПРОГРАММА". Если в течение трех месяцев со дня 
публикации краткого описания в АССОЦИАЦИЮ не поступят претензии на авторское право со 
стороны иных лиц, авторство подтверждается сертификатом и АССОЦИАЦИЯ предложит автору 
заключить договор на реализацию его програмны. 


АССОЦИАЦИЯ также планирует выдавать заказы на разработку обучающих програны. 


Кроме авторов программ приглашаются к работе авторы технических разработок, доработок, 
усовершенствований и т. п. 


АССОЦИАЦИЯ берет на себя Функции по тестированию технических разработок. в области 
КОМПЬЮТёРОВ ‘И ДРУГИХ УСТРОЙСТВ, развивающих интеллект. 


АССОЦИАЦИЯ приглашает к сотрудничестг+ всех заинтересованных и инициативных лиц, способных 
заняться организацией региональных представительств АССОЦИАЦИИ и заняться коммерческой 
деятельностью по распространению компьютеров, периферии, литературы. 


Продажа литературы и подписка на "7Х-РЕВЮ" производится на корпункте “ИНФОРКОМа" по адресу: 
Москва, "Новый Арбат", д.г, 19-е отделение связи (1-ый этаж операционного. зала». 
Ежедневно, кроме воскресенья с 10 до 17 часов, перерыв с 14 до 15 часов. 


Для переписки с АССОЦИАЦИЕЙ просим пока нременно использовать адрес “ИНФОРКОНа". 
121019, Москва, ‘а/я 16. На конверте делать пометку "ФЛОП”. Эти письма будут 
переданы в АССОЦИАЦИЮ. 


иИНФОРЖКОМ СООСБЩАЕГГ 


Подготовлен к печати 2-ой том четыректомника по графике компьютера "2Х-5ресгот". 
Книга называется "Прикладная графика". Рассмотрена графика Растровая, векторная и 
блочная. Показаны приемы организации трехмерной графики в растровом и векторном 
исполнении. Особо рассмотрены актуальные вопросы борьбы с "клэшингом цветовых 
атрибутов" и работа с нестандартными шрифтами размером менее, чем 8*8 и более, 
чем 8*8. Книга является погическим продолжением тома 1 "Элементарная графика”, но 
может быть использована и самостоятельно. Ее основные положения и выводы войдут 
в т. 3 "динамическая графика" в качестве исходных. 


Начата продажа лицензии на издание "Прикладной графики" в регионах. Книга 
поставляется на дискете 1.2 Мб (формат М5 005). Принимаются заявки. 

Продолжается продажа, лицензий на т. 1 "Элементарная графика" и на учебник по 
программированию в машинных кодах (бывший трехтомник, расширенный и дополненный). 
Напишите нам или дайте телеграмму. Мы сообщим контактный телефон для переговоров. 


Выход книги из типографии для розничной продажи ожидается в октябре 1993 г. 


С 1-го сентября 1993 г. начинается прием подписки на "2х-РЕВЮ-94" и на четыректомник 
"Графики СПЕКТРУНА”. Желающие ПОЛУЧИТЬ ‚бланк-заказ подписных изданий могут прислать 
«заполненный конверт с наклеенными почтовыми марками на. сумму 6 Руб. для России 

(30 руб. ‘для стран СНГ) по нашему адресу: 121019, Москва, а/я 16 
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МКИ “ИНФОРКОМ" 121019, 


Москва, т 19, а/я 16 


Дорогие друзья! 


В ПРОШаОМ месяце ны “играючи“ 
научились отыскивать решение сло- 
Жных алгебраических уравнений 
численным методом простой итера- 
ции. 

Это., как’ Вы ‘понимаете, не 
единственный возможный численный 
метод и сегодня мы попробуем с 
Вани сыграть в другую  компьютер- 


НУЮ ИГРУ, КОоТОрая тоже позволяет 
находить КОРНИ алгебраических 
уравнений. назовем эту ИГРУ 
"Вилка". имеется в виду "“артил- 
лерийская вилка”, котя можно было 
бы назвать игру и "Перелет - Не- 
долет”. 

Если Вы не знаете, что такое 
артиллерийская вилка, то лучше бы 


вам этого и не знать, потому’ что 
ситуация, когда Вы в нее попадае- 
те, очень неприятна. Представьте 
себе теплое летнее утро в’ нолевон 
{блиндаже, Хорою  позавтракав, 
‘противник начинает лениво высе- 
вать дневную норму снарядов и мин 
по вашим позициям. “Бах!!! Снаряд 
разорвался где-то далеко внереди. 
"недолет", - ухмыляетесь вы и 
| продолжаете спокойно  уплетать 
| консервы. Бах!!! Одинокий снаряд 
| разрывается где-то в сотне метров 
"Так, теперь перелет”. 


"ВИЛКУ" если У 
есть хоть какие-то 
то следующим выс- 


и, 
| противника 
имозгь в голове, 


пбудьте покойны. Двумя выстрелани 
вон "пристрелял“ 


| чтобы в третий раз не 
| сромахнуться. Более того, при- 
|пстреляв одно орудие и использовав 


он может ударить теперь и всеи 
убатареей. Бросайте свою тушенку и 
двигаите в окоп, - хорошо, если 


копали запасную линию, где 
потсидитесь во время артналета. 


и 


вот так же ножно попасть "выс- 
грелом” и в корень алгебраическо- 
|го уравнения, если предварительно 
| сделать несколько “выстрелов”. 


орудие и теперь у-_ 


Причем Вам совегтенно все равно, 
если первые “выстрелы” будут 
очень неточными. Единственное, 


что полжно быть сделано - в одном 
выстреле должен быть “перелет”. а 
В другом = "недолет”, иначе 
"вилка" не получится. 

Ррасснотрим: простое уравнение: 

Эе + 58 аа ©. 

Сделаем первый выстрел - пусть 
х-0. Подставим х в уравнение, оно 
естественно не сойдется и возник- 
нет "невязка” в - -а2. 

Раз невязка инеет знак "минус", 
будем считать, что это "недолет”. 
Сделаем второй выстрел х:5: 
теперь 9:78 - это большой пере- 
лет, То, что мы котели, произош- 
ло. Образовалась артиллерийская 

вилка: х:0 - нало 
Х:5 - много. 
Если бы она не ‘образовалась, 
нам пришлось 6ы еше “пострелять”. 


А теперь все просто - ударим 
посередине х:е:5. Подсчитаем не- 
ВЯЗКУ 4 = 9.25 - это опять пере 


лет, но уже ‘ближе 
получили, новую вилку. 
х:0:- нало 
х:2. 5 - много: 
вновь ударин: посредине 5-1. 25. 


к цеди. мы 


Невязка. 4 равна примерно -:2 - 
это недолет. 

х:1. 25 - нахо 

$:2.5 - много. 

Следующий удар нанесен 
ПУНКТУ 1. 875: И так далее, 
Точное решение я-а. и с кажлым 
"выстрелом" мы все ближе к нему 
подбираемся. ` 

Вы, конечно поняли, что на 


каждом шаге мы берен “недолет“ и 

“перелет” и стреляен посередине, 

потон опередляем, что это сыло - 

"недолет” или “перелет” и от 

предыдушего шага берем противо- 

положное значение, чтобы всегда 
оставалась “вилка”. 

Теперь нам осталось только по- 
ии все эти дела компьютеру. 
ВЕН здесь Вы введете свое 

уравнение: 

ВЕ А и. ; 

БЕТ Ь-. 01 РЕМ допустимое 

значение "невязки" 

ВЕМ теперь вводим пару значе- 
ний х так, чтобы получить 
“вилку” 

ТНРОТ "Хп1п?”; 

ТНРОТ "Хшах? 

ВЕМ рассчитаем невязку 

ТЕГ 40 = РН А(т0) 

ГЕТ 91 = УМ Ая!) 

ТЕТ РГИЙ : 500 

60 508 РГгИи 

ТЕ 51СМ (90) = 

60-то 30: 


10 
20 


$Т6К (91} ТНЕН 
ВЕМ "вилка" не полу- 


по. 


вниманию читателей: 
Ны продолхаен публиковать ад-! 
Йреса пунктов, в которых ножно при- 


| Г. МОСКВА, 
19-е 


или| 
поездон до ил. Трикокажная (Рижское! 
Суббота, воскр, 9 - 1.1 
Г. НОСКВА, радиорынок в Царипы- 


но, проезд до ст. метро ‘Царицыно. 

|СУббота, воскр, 9 - 14. | 
г. БЕЛГОРОД, магазия “РАДИОТО-| 

ВАРЫ", уз. Ленина. за. 

й г. ВОРОНЕЖ, Студия компьютерных! 


игр ЗАН-БАН. Магазин-салон "ЭЛЕК-!| 
|ПТРОНИКА” , тел.. 19-00-73. 

г. ДНЕПРОВЕТРОВСК. уп. 
34. Фирна "ЭКоС”. 

| г. ЕКАТЕРИНБУРГ; магазин 
|ТРУМ", Главный проспект, 99. 

Г. КЕНЕРОВО, магазин “ТЕХНИЧЕС- 
ул. Весенняя, 24. 
магазин "ОРБИТА". 


Шевчен- 
Ико, | 
"СПЕК - 


`г. КИРОВ, “Дом науки и техн. ", | 
| Магазин-салон "МАРС”, ул. Производ- 
д, ет. 

г. КРАСНОЯРСК, радиорынок, 
[езд до ост. "Затон", субб. вскр. | 
НИХ. НОВГОРОД, ИМА "Ф- ПЛЮС”, 
|Магазия “ФОТОЛЮБИТЕЛЬ”", ул. Горь- 


про-| 


ОРЕНБУРГ, магазин “”ВОЕННАЯ| | 
уп. Советская. 


г. РЫБИНСК, ул. Гоголя, 1. 
ИТТЦ "ГНОМ". 

Г. ЧЕБОКСАРЫ, маг, -. "ЭКСПРЕСС", 
НИК Фирма “НОВА", Ул, Привокзадь -| 
Иная, д.5 


вниманию дистрибуторов! 
Адроса наших оптовых покупате 


чилась" 

БЕТ =, (0 + хиа: 
ка получилась” 

БЕТ 9 КМ А(Х) 

ТЕ АВ5{9)<Ь ТНЕН 60 ТО 200 
ТЕ.56Н (8) 56Н 
то 170 

БЕТ СЯ: 
СО б9В рглпа 
со то 100 
ГЕТ 0-х: ТЕТ 40-4 
СО. 5УВ РГ 
с0 то 100 
РЕТМТ "!!! 
5ТОР 


КЕМ "вил- 


ЪЕТ 91: 


4 


”; $0, "90- 
"1, "41 = 


РЕТЫТ "О: 
РРТЯТ +1 - 
ВЕТОЕН 

Этот метод определения корней! 
в сложных алгебраических уравне-!| 
ниях тоже известен не одну ‘сотню! 
лет и называется методом Ньютона, 


что ко времени появления первых! 
ЭВМ уже были известны десятки и 
сотни подобных численных методов, 
легко адаптируеных для конпьюте- 


ров. Впрочен, может быть  ЭВИ| 
именно потому и появились, что| 
потребовалось ‘УПРОСТИТЬ работу! 


сотен расчетчиков, сидевшия меся- | 
цани с арифнонетрон над баллисти- || 
ческими таблицами для расчета 
‘траекторий полета первых ракет. ^ 


з 133 


язык. 


ПРОГРАННИРОВАНИЯ 


ЭМ СЬАТЕ 


ГоСо 


(Продолжение) 
Начало см. на с. 69-14, 


90-95. 


ГЛАВА 5 
ПОВТОРЯЮЩИЕСЯ ОПЕРАЦИИ 


Условия. 
| Под "условием" в ЛОГО понима- 
пется операция, которая дает в ре- 
Изультате логическое значение ТВУЕ 
(“истина”) или ЕАБЗЕ (“ложь”), в 
|ответ на вопрос типа: "Это число 
равно другому?” 
| В ЛОГИКЕ, а также в языках 
программирования, имеющих дело с 
|обработкой списков (ЛИСП, ПРОЛОГ, 
ИЛОГО)у такие операции называют 
1ПРЕДИКАТани. Ножет быть поэтому 
|в ЛОГО все примитивы, относяшиеся 
|к этой категории, оканчиваются на 
мы 

Попробуйте набрать: 

РЕТЕТ ЕСОАБР 5 5 
|- получите в результате: 
$ ТвОЕ 
Здесь условие ЕООВЫР прверяет, 
|равны ли два параметра. Если да, 
|то выдается результат ТВОЕ, иначе 
Ивыдается результат РАГЗЕ. Напри- 
| мер: 


РЕТЫТ ЕООАЕР 5 Т 
ЕАГЗЕ 


Натенатические условия. 
а нева вынь 
как и в других’ матенатическия 
|операциях здесь используют симво- 
лы, которые размещают между двумя 
}аргументами (так называемая ин- 
дексная Форма записи). Это следу- 
виие символы’ 
| > - больше 
< - меньше 
= - равно. 
Примеры: 

РЕТНТ + >2 

РАГЗЕ 


РЕТ 5 < в 
ТКОЕ 


НАКЕ “РАСТ 5-5 
РЕШИТ :ЕАСТ 
ТВОЕ 


Знак "-” используется дая 
сравнения двух объектов любого 
типа. Это ногут быть числа, сло- 
|ва, списки. Эта операция ' дает 
|значение ТВОЕ тогда и только тог- 
да, когда оба объекта одинаковы. 
Эта операция тождественна опера- 
ции ЕОбОАГР, которую’мы рассмотре- 
|Йли ранее. ° Разница, как видите, 
|голько в Форме записи, поскольку 
|ЕСОА.Р записывается не "между", а 
"перед" двумя параметрами (пре- 
Фиксная Форма записи). 


МАКЕ "СТЕЕ “НАБУ 
РЕТИТ :СТЕЬ-НАЮУ 
ТРОЕ т 

НАКЕ “НАМЕ "НАБУ 
РЕТИТ :СТЕЬ = :НАНЕ 
ТРОЕ 


РЕТНТ (1-5) -2 
ТРОЕ ы 


РЕТИТ ЕСОАР (7-5) 2 

ТВОЕ 

Услвия: очень часто используют 
совместно, с ‘оператором ТЕ; ТЕ 
после себя требует два, а иногда 
И ТРИ операнда. Первый - это ус- 
ловие, а второй - список инструк- 
ций, который должен быть выпол- 
нен, если ‚условие спрведливо, 
Например: } 


НМАКЕ "ТОБАУ “ЕРТОАУ 
ТЕ :ТОБАУ =: "ЕЕТРАУ ГРЕТНТ "ТСТЕ) 
ТСТЕ 


Если оператор 1Е имеет три 


операнда, то в третьем операнде 
записывается список инструкций, 
которые должны выполняться, если 
условие "ложно". 
НАКЕ “ТОБАУ "МОМРАУ 
ТЕ :ТОРАУ : "РЕТРАУ ТРЕТЫТ "ТЕТЕ 
[РЕТНТ {МОТ ЕВТРАУ УЕТ) ] 

МОТ РЕГРАУ УЕТ 

Как и КОНСТРУКЦИИ КЕРЕАТ, 


команда 1Р ножет иметь достаточно 
длинную запись и ее приходится 
переносить со строки на строку. 

А теперь мы рассмотрим некото- 
рые примитивы, являющиеся услови- 
ями, и обсудин, в каких случаях 
они могут применяться. 


МЕНВЕКР 
Проверяет, является ли первый 
операнд (а он может быть числон, 
словом или списком) частью второ- 
го (который должен быть списком). 


ТО СНЕСК$НОР: ЗТУЕЕ 
НАКЕ` "ЗНОРРТНС (ВЕЕАР  ВУТТЕЮ 
НИК 5ТАНР5} 
ТЕ МЕМВЕКР; СТАЕЕ: ЗНОРРТИС 
ГРЕТНТ [СОТ ТТ} } ГРТНТ (ОН 
РЕАЕ ЕОКСОТТЕМ 1171 
ЕКО 


СНЕСК$НОР 
сот т 
СНЕСКЗНОР "ВАСОН 
ОН РЕАВ РОРСОТТЕН ТТ 


"них 


НОНВЕЕР 

Эта програнна выдает ‘значение 
ТКОЕ, если ее аргумент является 
числом, В ПРОТИВНОМ СслУЧае выда- 
ется РА.5Е. 

Вам нередко приходится 
РЯТЬ, является ли то, что ввел 
пользователь, числом, прежде, чем 
приступить к обработке этого. вво- 
да. Согласитесь. нелепо задать 


прове- 


НАКЕ “ЗНОРРТНС(ВКЕАО ВОТТЕВ вопрос © том, сколько Ван лет некоторое содержание. 
НИК ЗТАМРЗ] ("Ном 014 аге уоц?”) и пытаться 
РЕТНТ :5НОРРТНС: [ВВЕАР ВОТТЕЕ как-то  обсчитывать полученный НАКЕ "НОНТН “АРКИ, 
НТЕХ ЗТАМР5) результат, если в ответе было: РЕ1НТ НАМЕР “НМОКТН 
ТкУЕ МОТ УЕВУ НОСН (”не очень много") ТРОЕ 
= а === === ан ее. а: 


ТО СНЕСКНУНМ 
НАКЕ “АНЗМЕЕ ЕРТЕЗТ КЕАП.15Т 
ТЯ НОМВЕЕР: АНЗУЕЕ 
{РЕТЯТ ГИТНАНК УОП) 1 
ГРЕТМЫТ (ИТ МАКТЕР А НОНВЕВ1 11 
ЕНО к 


Обратите внимание на то, что 
ны используем РЕЗТ — ВБАШЕТЗТ. | 
Если бы мы использовали только 
КЕАПЕ. ТТ, 


как список, а не как число. 


| 
Эта операция дает в результате! 
ТВОЕ, если ее операндом является | 
слово. вспомните, что числа тоже! 
являются слвани, поэтому они тоже! 
дают в результате ТКОЕ. | 


РЕТЫТ МОКОР 3 
ТвОЕ { 

РЕТЫТ МОВОР "м15Е 
ТВОЕ 

РЕТНТ МОЕОР {НЕК] 
РАСЗЕ 


В последнем случае оепранд яв- 1 
ляется списком. в который входит! 
только одно слово, но все же это! 
список, а не слово и потому в ре-| 
зУЛЬтате выдано РАГ.5Е, 


ЬТ5ТР 
Дает в результате ТКОЕ, 
операнд является списком. 


РЕ1НТ ЬТ5ТР: ЗНОРРТНС 
ТРОЕ. 


В практической работе вам при- 
дется ‘много раз писать’ процедуры! 
для обработки списков. очень хо- 
рошей практикой будет: устраивать 
в начале каждой процедуры провер-| 
ку: "А является ли входной пара- 
метр списком?” 


ЕНРТУР. 

‚ Проверяет, не пустой ли опе- 
Ранд. Ишет пустое ‘слово "” или| 
пустой список [] и если то, либо| 
другое найдено, выдает ТВОЕ. Этот! 
оператор инеет очень широкое при-| 
менение, Длинные списки анализи- 
руются путем разбиения их на эле-| 
менты и последовательной обработ- 
ки элементов одного’ за другим, 
пока список вн станет пустым. 
Точно также слова анализируют, 
разбивая ‘их на символы. Мы в! 
дальнейшен буден очень часто. ис-! 
пользовать вырахение вида: 


ЧЕ ЕМРТУР : АБТ5ТЕЗТОР} 
для того, чтобы останавливать| 
процесс. 
НАНЕР 


т.е. Этому имени соответствует 


1354 


Г РЕТНЫТ КАМЕР, "ЕВЕР 
| КАБЗЕ 
Рекурсия. 
| Мы уже рассматривали такие 
|ронедияи как 
ТО ТВТ 

РОВМАЕВО 50 

ЕТСНТ 120 

ТВ! ь 
ЕН 

Запустите эту процедуру. Сама 
она не останвится. Придется для 
этого использовать ВВЕАК (САР 
ЗНТЕТ + ЗРАСЕ). Самое важное в 
этой процедуре - это то, что она 


входит в бесконечный цикл повто- 
РОВ без использования повтора 
КЕРЕАТ, а вызовом самой себя ТЕГ. 
Итак, ТЕГ исполняет первых две 
инструкции - РОБМАКЮ 50 и ВТСНТ 
120, после чего снова вызывается 
ТЕТ, которая исполняет первые две 
ИНСТРУКЦИИ И Т.Д. ИТ. п. 

Реккурентные процедуры могуть 
иметь входные паранетры, как и 
любые другие процедуры. В прос- 
тейшен виде эти входные параметры 
всегда одни и те хе при казлом 
вызове процедуры. Мы можем легко 
изненить процедуру ТК! и задать 
| любой МНОГОУГОЛЬНИК, 


О тина 


ТО РОБХ :510Е ; АНСЬЕ 
РОВМАКР : 5ТБЕ 
‚ ВТСНТ : АМСЬЕ 
РОГЛ, : $10Е : АНСЬЕ 
ЕКО 


Эта процедура отличается от 
ИТОЙй, КОТОРУЮ „мы Рассматривали в 
главе 2. (с инструкцией  ВЕРЕАТ). 
она может изображать некоторые 
‘такие веши, которые той не под 
|силУ. Попробуйте: 


й 
| 
| 
й 


РОЁУ 50 144 


Когда процедура вызывает ‘саму 
|себя, это называется Рекурсией. В 
| ЛОГО это основной способ органи- 
|зации повторяютихся процессов. 

В процедурах ТЕГ и РОУ мы 


рекурсинм, когда процедура не зна- 
Пет, где же следует остановиться. 
Ррекурсия используется не толь- 
ко для того, чтобы. организовать 
повторяющиеся действия. здесь мо- 
ГУТ быЫТЬ ДОСТИГНУТЫ и некоторые 
пдополнительные цели. 

Предположим, что Вы покупаете 
| тюбик Зубной пасты и, вскрыв его, 
| находите ВНУТРИ ваучер, дающий 
право на снижение цены на 20 
пентов при покупке очередного 
тюбика, по сравнению с этим. 
|Спрашивается: “Когда вам надо 
идти за следующим тюбикон?" 
|Ответ: "Ненедленно". Ведь и в нем 
будет такой же ваучер ит.д. и 
СКОРО Вы завалите квартиру почти 
бесплатной зубной пастой. 

| Аналогичный прием. ножет быть 
использован и в ЛОГО: 


| 


= ЯЗЫКИ ПРОГРАННИРОВАНИЯ 


ТО АББОН : МОМВЕВ 
РАТНТ : КОМВЕК 
АБРОН : НОМВЕК +! 

ЕНО 

АБРОН 1 

й 

2 

З 

итд. 

При первон вызове АБРОК печа- 
тается 1 и во второй вызов пере- 
дается параметр 2 и т.д. 
` расснотрим еше один пример. 
Предположим, что нам надо найти 
сумму чисел от 1 до Н, где число 
Н начинается с единицы и непре- 
РЫВНО Возрастает, Может быть, ны 
примем решение, что процесс надо 
остановить, когда сунна превысит 
одну тысячу. И тогда мы вводин 
команду 5ТОР, слузашую дая того, 
чтобы останавливать текушую про- 
цедуру. В принципе, 5ТОР дейст- 
вует так же, как и ЕМО, но может 
разнешаться в любом месте пропе- 
ДУРЫ. 

Обратите внимание на то, что 
ЗТОР останавливает только ту про- 
цедуру, ВНУТРИ которой находится. 
Если эта процедура  вызывалась 
другой; То та не останавливается 
И продолхает работать. 


ТО АПБОУР : НОМВЕВ 
ТЕ :ТОТАГ >1000 (5ТОР] 


МАКЕ “ТОТА :ТОТАЬ + : НОМВЕВ 
РВТЫТ :ТОТАЕ 
АББУР : КОМВЕВ+1 
ЕКО 
МАКЕ "ТОТАЕ 0 
АГУР 1 
1 
з 
6 
10 
15 
итд р 
Обратите внимание . на то, что 
нам приходится выставлять исход- 
ное значение ТОТАЁ, равное нулю, 


вне процедуры, поскольку нам не 
надо, ‘чтобы ТОТАЬ принимало бы 
нулевое значение всякий раз, как 
ПРОИСКОДИТ Исполнение процедуры. 

Рекурсия очень часто ‘оказыва- 
ется очень удобной при работе ‘со 
списками. Напринер, позлементная 
печать списка, которую мы рас- 
сматривали в гл.4, может быть 
сделана более элегантно с пбношью 
реурсии. Например, так: 


ТО ГВЬ :АРТЗТ 

РЕТНТ РТЕЗТ :АГТЬТ . 
ЗЫВГ ВУТЕТВТ : АТ 
ЕМО } 


все очень просто. ‹ Процедура 
распечатывает. содержимое начала 
списка, а затен точно так, хе 
поступает с его остаткон. Когда 
хе она закончит свою работу? 
когда список’ станет пустым. 
ТО ПВ АМТ 

ТР ЕМРТУР :АСТЗТ (5ТОР) 


РКТИТ ЕТЕЗТ :4115Т 
ЫВЬ ВОТЕЧЕТ ГАБТЗТ 
ЕН 


Проверьте эту процедуру на ка-| 
ком-нибудь списке, а затем попро- 
буйте ее видоизменить так. чтобы 
она печатала список в обратнон| 
порядке. ` | 

Конечно, в некоторых случаях! 
рекуррентные выражения могут быть| 
весьма сложными, но `простейшие| 
применения рекурсии поистине про-| 
сты. Кроме бесконечных рекурсий| 
(которые на самон деле тоже бес-| 
конечными не являются, ведь при| 
кажлом вызове процедуры лого Фик- 
сирует Факт этого вызова в опера-| 
тивной памяти и рано или поздно 
эта память исчерпывается)  сушес-| 
твуют еше две возможности. В при- 
веденных примерах процедура начи- | 
нается с проверки. В — языках, 
предназначенных. для СтТРУКТУРНОГО! 
программирования, таких как Пас-! 
каль или, скажем, в развитой вер- 
сии БЕИСИКа Бета-БЕЙСИК, эта кон-| 
струкция называется циклом МНИЕ. | 
В ЛОГО это выглядит так: | 


ТО НИЕ <паранетр> 
ТЕ ‹условие> (5ТОР) 
...<тело процедуры>. .. 
УНИЕ < паранетр> 

ЕМО 


В этой процедуре ‹тело> не ис-| 
полняется, если ‹условие> прини-| 
мает значение ТКУЕ. В частности, 
эта процедура вообще -не исполня- 
ется, если исходное значение па- 
ранетра ‘таково, что  ‹условие>| 
справедливо. 

ДРУГОЙ прием состоит в провер-|, 
ке условия в концё серии повто-| 
ряюШихся инструкций. ЭТО соответ- 
ствует команде. ИНТИ. Паскаля или 
БЕТА-БЕЙСИКа. 


ТО УНТИ. ‹параметр> 

‹тело процедуры>... | 
1Е ‹условие> ПУТИ. хпараметр>) | 
ЕН й 


так что по крайней мере один раз] 
процедура будет исполнена. | 

Очень часто, когда мы исполь-| 
зуем рекурсию для организации! 
ПОВТоРЯЮЩИХСЯ вычислений, нам 
необходино создать стартовую | 
процедуру, которая задаст началь- 
ные значения переменных, сделает. 
первый вызов рекуррентной проце-| 
ДУРЫ и сможет обработать получен-! 
ный из нее. результат. В нижепри- 
веденном примере, который должен! 
отыскать сумму последовательности| 
впечатанных с клавиатуры чисел, | 
процедура РОТОТА!, сначала уста- 
навливает ноль в качестве текущей 
сумны, а затен вызывает рекур- 
рентную продедуру ТОТАМЛ?. Когда| 
работа закончена, РОТОТАЬ печата- 
ет итоговый результат. 


2-6622 
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ТО РОТОТАг.. 
МАКЕ “ТОТАТ. 0 
ТОТАБИР 
РЕТИЫТ ЗЕКТЕМСЕ (ТНЕ ТОТАГ, 15} 
:ТОТАЬ 
ЕНО 


Процедура ТОТАРУР демонстриру- 
использование процедуры 
КОМВЕБР длятого, чтобы ировнерять 
те числа, которые пользователь 
вводит с клавиатуры. Она позво- 
ляет пользователю ввести числовую 
последовательность и закончить ее 
словом ЕМЮ или любым другим не- 
числовым вводом. Процедура орга- 
низована по схеме УНТИ., Расснот- 
‘ренной выше. Единственное отличие 
‘состоит в том, что вводится до- 
‘полнительная инструкция 


МАКЕ “ТОТА!, :ТОТАБ +: КОИ 


если условие справедливо (ТВОЕ), 
Эту инструкцию можно было бы по- 
местить и в начало процедуры, но 
только в тон случае, если бы пер- 
вое значение НОН задавалось бы 
вышелехашей процедурой БОТОТАЕ.. 


ТО ТОТАБОР 
РЕТНТ (ТУРЕ 18 А НИМВЕВ) 
НАКЕ "МОМ Е1ЕЗТ ВЕАРЕТЗТ 
ТЕР НУМВЕЕР :НОН(МАКЕ "ТОТАГ, 
{ТОТАГ +НОМ ТОТАШИР) 
ЕН 


Когда с клавиатуры будет вве- 


дено какое-то. слово, не яваяюще- 
еся числом, вызов ТОТАГМР будет 
прерван. В итоге, будет останов- 


лен и весь процесс и управление 
будет передано в вышележашую про- 
цедуру в точку после первого  вы- 
Зова ТОТАШР, 


Генератор случайной последо- 

вательности. 

Идеи, изложенные в этой главе, 
можно применить к генерации слу- 
чайных последовательностей. Рас- 
снатривайте это как первый шаг к 
програинан, с помошью которых 
компьютер будет писать стики. 

Давайте расснотрим сначала как 
лого может выдавать случайные 
числа. Вообще-то эти числа рас- 
считываются и потому не являются 
вполне случайными, но наловероят- 


но, что Вы занетите их неслучай- 
ность. 
Так, БАНГОМ 5, например, вы- 


даст одно число ив последователь- 

ности 0,1,2, 3,4. Точно Так че 

ВАНООМ 6 даст чиспо от 0 до 5. 
Попробуйте: 


ВЕРЕАТ 50 (РЕТНТ КАКООН 6} 


- и поснотрите, 
выйдет. 

Если Вам надо иметь случайное 
число не из диапазона [0:4], а из 
диапазона (1;51, то Вы тоже ноже- 
воспользоваться  операторон 
РАНРОМ 5, но к полученному ре- 


что из этого 


зультату надо прибывить единицу. 
Это делается так: . 


+ ЯЗЫКИ — ПРОГРАМНИРОВАНИЯ | 


1 + КАНРОИ 5. 


Обратите внинание 
запись ВАНРОН 5 + 1, будет непра- 
вильной, поскольку сначада будет 
исполнено сложение 5 + 1, а затем 
процедура КАНГОНМ с параметром 6. 

Давайте используем эту проце- 
дуру для того, чтобы извлечь из 
списка случайный элемент. Прежде 
всего введем переменную ГТЕМНО  - 
случайное целое число от 1 до 
значения СООТ, а затем исполь- 
зуем эту переменную для выбора 
элемента списка. 


на то, что 


ТО СНООБ5Е :АЁБТЗТ 
НАКЕ "ГТЕМНО 1 + БАКООМ СОУНТ 
`АЗТ 
: ТТЕИНО 
АУТ 


НАКЕ “СНОТСЕ ТТЕН 
ЕР 

Попробуйте эту процедуру с ка- 
ким-либо списком. Например, для 
списка РЕЕЗЕНТ: 


СНОО$Е :РКЕЗЕМТ 


Для того. ‘чтобы генерировать 
предложения, нан нужна сначала 
какаято канва, какая-то скелет- 
ная схема, например: 


ТНЕ 5НАМ. РОС ОФТСКЬУ ВГТЕЗ ТНЕ 
САВЕГЕ$$ НАК 


Ррасснотрии СТРУКТУРУ ° этого 
предложения, учитывая, что не все 
наши читатели могут быть знакомы 
с английской грамнатикой. 

* Артикль "Аве" может иметь в 
качестве альтернативы артикль 
"а". 

* Прилагательное 5МАШМ. 
(изленький, -ая) может быть 
заменено на ‘иное, ниример: 

[ВТС ВЕОМН ЗРОТТЕР САБЕГЕ$51 
х Существительное "Роб" “собака) 

является такин хе объектом, как 
и [НАМ ТРЕЕ ТАВЬЕ КЕНКЕ,] 

* Наречие ООТСКЬУЯ (быстро) опи- 
сывает, как происходит событие. 
Внесто него ножно употребить 
ГУТСТОЙ$ЬУ З.ОМЬУ САВРУУ 
НАРРТЬУ] 

« Глагол ВГТЕб {кусает} - указы- 
вает на проискодяшее действие 
точно ‘так хе, как’ и глаголы: 
ИЛЕЕ$ СНАЗЕЗ САЮВТЕЗ НТОЕЗ]. 

* ме‘ один артикль "ТНЕ". 

* Еще одно прилагательное 


“САКЕРЕ$5"“ (беспечный) репашьей графики”. Возьмем проце- 

„ Еше одно существительное “НАНМ" дуру ВЕЗРГ из гй. $ и нодиФицируем 
(человек, мужчина}. ее так, чтобы "черепашка" в одних 
Итак, если мы введен сокраше- случаях поворачивала бы направо, 
НИЯ: т а в других - налево. ‘Сделаем это, 
АВТ - артикль; обеспечив дополнительный входной 
АРУ - прилагательное; параметр, который будет списком 
АБУ - наречие; чисел, ‘значений СОИНТ; пля’ кото- 
УЕЕ - глагол; рых “черепашка” должна поворачи- 
НОГ - существительное. то вать влево. Когда СООТ яваяется 
получим следующую скезлетную числон, входящим во этт список, 
схему: выполняется поворот налево, иначе 
- наюраво. вставлять всю эту 'ло- 

ГАЕТ АБУ КОЧ АБУ УЕВ АКТ АБУ 500] гику в оператор КЕРЕАТ, ° по-види- 
ному, слишкон длинно, ноэтову 

Приравняем этот список пермен- проше. создать отдельную проце- 

—= ===. 


ыы 


ной "“РАТТЕЕН, а с иненани АКТ, 
АБ), НОП и пр. свяжем свои списки 
глаголов, наречий,  сушествитель- 
ных и т.п. Так, например, список 
с именм "АБУ будет содержать; 


[ЗВАШ, ВГС ВКОМН 5РОТТЕР 
САКР.Е551 


Теперь мы можен конструировать 
случайные предложения. 


ТО РАНРЗЕНТЕНСЕ 
НАКЕ "РАТТЕВН ГАЕТ АБ. НОЦ УЕЕ 
АКТ АРУ НОП] 
"АРТ (5НАШ. ВТС ВЕОМН 
ЗРОТТЕО САВЕ! 5$] 
"КОИ ТМАН ТКЕЕ ТАВЬЕ 
КЕННЕ 206] 
"АБУ ГООТСКЬУ УТСтОи5ТУ 
ЭТИХ САВЕТЛА.У НАРРИ.У} 
"УЕВ [В1ТЕЗ ЬЛКЕЗ СНАЗЕЗ 
САВЕТЕЗ НГЛЕЗ] 
ВЕРЕАТ 50 ТРОВАМРОН 
ЕНО 


НАКЕ 
НАКЕ 
НАКЕ 


НАКЕ 


ТО РОКАНГОН 
НАКЕ “ОЧТЬТНЕ Г} 
ЕОГ.0М :РАТТЕЕНМ 
РЕТНТ "ОПИЛНЕ 
РЕТНТ " 

ЕМО 


Процедура КОБ.Ом сначала про- 
веряет, не является ли ее пара- 
метр (а это список, в котором за- 
кодирована скелетная схема нашей 
Фразы) пустым. Если это так, про- 
исходит выход из процедуры, ‘Ина- 
че, берется первый злемент скеле- 
та, а ‘он является ‚именем списка 
слов и из этого списка делается 
спучайный выбор. Выбранное слово 
добавляется к собираемому предло- 
жению ООТЕТНЕ. 


ТО РОМ.0М :АРАТТЕЮН 
ТР ЕМРТУР :АРАТТЕВН (5ТОР] 
МАКЕ “ТНТЗМОВЬ РТЮСТ :АРАТТЕКН 
СНООЗЕ ТНТНб ; ТНт5чОРр 
НМАКЕ "ОУТЕТНЕ ЗЕНТЕНСЕ 

ОТТЕТНЕ СНОТСЕ 

РОГТОМ ВОТЕТЕЗТ :АРАТТЕВН 

ЕНО 


ГЛАВА 6. 


ЧЕРЕЛАЩЬЯ ГРАФИКА-2._ 


Идеи, рассмотренные в ДВУХ 
предыдущих ‘главах, ° ногут быть 
проиллюстрированы с помошью "че- 


155 


и о иж Ека ее попирает злата ныт ое 


: АТУТ 
НАКЕ ”СОУНТ1 
КЕРЕАТ :НАХ {50В5РГ] 
КЕЗРТё :517Е :АНСЬЕ :МАХ 
: АБТУТ 


РОВМАЕР :517Е к :СООНТ 

ТР НЕНВЕЕР :СОИУНТ: АБТЗТ ШЕЕРТ 
: АНСЬЕ] [ВТСНТ : АНСЬЕ] 

МАКЕ “СОПНТ :СООНТ+1 


Проверьте эту процедуру со. 
следующими параметрами: 


ИКЕЗРТ2 5 120 6 [1 31 
ВЕЗР!2 5 90 11 [384 5} 


На рис. 1 показан пример работы 
ПРОЦЕДУРЫ, 


РИС. 1  ВЕЗРТА 5 ОТ 1234) 

Мы рассмотрели выше способ 
постановки рекуррентных процедур, 
|теперь интересно было бы . рассмо- 
|треть, как можно остановить ре- 
|куррентную процедурРУ, изображаю- 


Ишую занкнутую диаграмму (такую, в 


|которой “черепашка” возврашается 
ИВ ТУ ТОЧКУ, с КОТОРОЙ. начинала 
работу. Прежде всего, нам .надо 
узнать, вернулась ли "черепашка" 


В точку старта, В ЛОГО есть пРо- 
цедура-принитив, которая вычис- 
ляет координаты "черепашки” в 
любой момент времени. Это проце- 
дура РОЗТТТОН. Она выдает список 
из двух чисел. Первое число - 
Роризонтальная координат, отне- 
ренная от центра экрана; второе 
число - вертикальная координата. 
Та тоже измеряется от центра 
| экрана и для верхней его половины 
является положительной, а для 
нижней - отрицательной. 

ЛОГО имеет три команды для пе- 
ремешения "черепашки" в указанное 
ыы 

ЗЕТХ 50 - переводит ее на.вер- 
река, имеющую координату х, 


ЕТУ. -50 т переводит ее на го- 
Ризонталь, имеющую координату У. 
р =50. 

ЗЕТРО5 [-20 30]}.- устанавлива-. 
| "черепашку” в точку, с указан- 
ными в списке координатами. 

Если перо “черепашки” опущено, 
То ПРИ исполнении каждой из этих 
трех операций будет прорисована 

ПАИННЯ от исходной точки к ой 


- ЯЗЫКИ ПРОГРАННИРОВАНИЯ | 


ной. 

В главе 3 мы говорили о том, 
что знак "нинус” перед. числом 
имеет двойственное значение, лого 
применяет простое правило к оце- 
нке знака "минус". если он нахо- 
дится в списке. Если перед знаком 
есть пробел или нет ничего и чис- 
ло следует непосредственно за 


знаком (без пробела), то знак 
"минус" расснатривается, как 
часть числа и это ‘означает, что 


число отрицательное. Во всех про- 
чих случаях этот знак интерпрети- 
руется, как самостоятельное сло- 
во. 

Итак, {- 10 10} - это три сло- 
ва, точно так же и {10 - 10} и 
[10-10] и ни одна из этих записей 
не может быть использована в 
качестве входного параметра для 
процедуры 5ЕТРО$З. 

С ДРУГОЙ СТОРОНЫ, [10 -!0}] и 
[-10 10} - состоят из двух слов и 
ногут быть использованы при вызо- 
ве 5ЕТРО5. 

Следует внимательно относиться 
и к другим процедурам, принимаю- 
шим список входных паранетров в 
виде чисел, среди которых могут 
быть и отрицательные. 

Кроме процедур, позволяющих 
выставить Х и У-координаты. "чере- 
пашки”", сушествуют две ‘Функции 
ХСОК и УСОВ, позволяющие  опреде- 
лить и выдать текушие координаты 
хи у. Эти Функции не могут вы- 
дать эти координаты на экран, но 
могут предоставлять их ДРУГИМ 
процедурам для обработки. 

Если ны хотим определить мо- 
мент, когда “черепашка” сделает 
замкнутый контур, то кроме коор- 
динат нас должно интересовать еше 
и направление, В КОТОРОМ она 
СМОТРИТ. Этот; результат. может 
быть получен с поношью Функции 
НЕАОТНС, - она выдает результат 
от 0 до 360 (можете расснатривать 


его, как. показание стрелки конпа- 
са). 

Север - о 

Восток - 90 

юг - 180 

Запад - 270 \ 

Таким образон, поворачивая 
“черепашку” направо; Вы увеличи- 
ваете значение .НЕАОТНС, а. пово- 
рачивая ее налево - уменьшаете 


его. Направление, в котором "сно- 
ТРИиТ" "черепашка" можно не только 
измерить, но. и задать с помошью 
команды ЗЕТНЕАОТНС, после которой 
должно идти число от 0 до 360. 

Вернемся к нашей проблеме 
определения нонента, когда "чере- 
пашка” закончит замкнутый ‘контур 
и пойдет по второну разу. 

Нам надо зафиксировать коорди- 
наты "черепашки" в исходной точке 
и направление ее движения. Для 
Удобства мы можем собрать эти три 
числа в один список: я 


МАКЕ “ЭТАТЕ ГРОТ НЕАОТНС РОЗТТТОК 


А после этого ны ножем регулярно 
проверять положение “черепашки”, 


дабы уловить момент, когда. она 
будет находиться в той же точке и 
снотреть нри этом в том же на- 
правлении, 


ТЕ ЕОЧАЫР :ЗТАТЕ ГРОТ НЕАОТЫС 
РОЗТТТОК [5ТОР} 


Конечно, не следует делать 
такую проверку до. того, как 
"черепашка" сделает первый шаг. 


НЕАРГИС 


Рис. 2 Координаты "черепашки" 


Можно использовать. процедуры, 
задающие координаты & иУи для 
того, чтобы рисовать на экране 
графики. Предположим, что у Вас 
есть список из двенадцати чисел 
(ежемесячные расходы) и его ‹ надо 
передать в качестве ВЕОДНОГО. 
параметра в процедуру, которая 
нарисует на экране график. Пока 
для простоты изложения ны пред- 
положим, что все числа не пре- 
восходят 160 и не являются очень 
налыми, по сравнению с этим чис- 
лом. 

Сначала надо нарисовать пару 
осей. Начиная из левого нижнего 
угла из координаты [-125 -80] 
нарисуем горизонтальную ` линию с 
двенадцатью вертикальными нетка- 
ми, соответствующими 12 месяцам, 


` ТО ХАХ!$ 


РЕМОР 
ЗЕТРО5 [-125 -80} 
РЕНЛОМН 
ЗЕТНЕАРТНС 90 
РОКЧАКО 5 
ВЕРЕАТ 12 [РОБУАКО 20 ЕТУ -82 
БЕТУ -80} 
ЕНО 


Вертикальные метки идут через 
каждые 20 шагов “черепашки”, т.е, 
20 шагов соответствуют ОДНОМУ 
календарному месяцу. 

Аналогично рисуется и вторая 
ось. Ее тоже следовало бы ‹ разне- 
тить делениями шкалы, но посколь- 
ку они зависят от тех количеств, 
которые ны измеряем и тех единиц, 
которые мы применяем, это лучше 
делать. для кахдлого конкретного 
слУЧая по-своему и наш читатель 
сможет сделать это . самостоятель- 
НО, ПО ВКУСУ. 


ТО_УАХТ5 
РЕНОР 
ЗЕТРО$ [-120 -851 
РЕНРОМН 
ЕТУ 80 
ЕНО 


= 


152 


ЯЗЫКИ — ПРОГРАММИРОВАНИЯ 


Рис. 3 График ежемесячных 
расходов. 
Оси пересекаются в 


т. [-120 
-80], поэтому это и будет исход- 
ная точка нашего граФика. Про- 
смотрим список, используя пере- 
менную СОУНТ и для каждого зна- 
чения нарисуем линию, соединяющую 
предыдущую точку с текушей. 
Поскольку исходная точка у нас 
находится не в нуле, а отстоит от 
него на 120 единиц влево и на 80 
единиц вниз, мы должны будем со- 
ответственно вычесть 120 из гори- 
зонтальной координаты и 80 из 
вертикальной координаты каждой 
‘текущей точки. 
ГО РОТ и 
НАКЕ "СООНТ :СООНТ +1 
НАКЕ "ХСОВ ; СООНТк 20-120 
МАКЕ ”УСОВ ТТЕМ!: СООНТ 

{ УАБОЕЬТ$Т-80. 
ЗЕТРО5 1.15Т :ХСОВ : УСОВ 
ЕМО 


СОУКТ необходимо в начале работы 
выставлять в нуль с тен, чтобы 
когда процедура выполнялась бы в 
первый раз, это значение было бы 
равно единице. Необходимо также 
подготовить список УАГОЕТ.ТЗТ зва- 
чений, для которых должен стро- 
иться график. 

В итоге ны получим главную 
Процедуру: 


ТО СРАРН : УАЛЛЕ15Т 

ХАХ15 

УАХ15 

ЗЕТРО$ [-120 -80} 

РЕНРОМН 

НАКЕ "СОПНТ 0 

ВЕРЕАТ 12 (РОТ) 

РЕНОР ‹ 
ЗЕТРО$ [-120 -80] 

ЕНО 

Если среди данных есть значе- 
ния, большие чем 160. или весьма 
малые значения. `то либо "чере- 
пашка" выйдет за пределы экрана, 
либо график будет плохо различимы. 
В этих случаях возникает необхо- 
диность масштабировать данные. 
я этого их умнохают на какое- 
либо число, в результате ‘чего 
получают график приенлемых раз- 
|меров. 

Итак, научились использовать 
рекурсою при построении графи- 
ческих Фигур. Приведем в качестве 
примеров еше несколько фигур, при 
построении которых тоже использу- 
ется рёкурсия. 


Во-первых, расснотрим беско- 
нечную кривую, которую называют 
"снехинкой”. 


Построим равносторонний треу- 
гольник. Разделин каждую сторону 
на три части и на среднем отрезке 
построим еще по равносторонненму 
треугольнику и т.д. (Рис. 4) 


Рис. 8 "Снежинка" 
Для рисования треугольника мы 
поступаем просто - три раза: 


РОВМАРО :ГЕНСТН 
ЕТСНТ 120 


Для того же, чтобы изобразить 
"снежинку", мы должны заменить 
процедуру РОЕМАЕО процедурой изо- 
бражения треугольника с размером 
1/3 предыдущего. 


ТО ЗНОМРЬАКЕ ; БЕНСТН 
ВЕРЕАТ З(5НОМЛНЕ :ГЕНСТН 


ЕТСНТ 120] 
ЕН 
для того, чтобы нарисовать 
сторону “снежинки", служит проце- 


дура 5НОМТ.1НЕ. “Черепашка” прохо- 
дит треть текушей стороны, пово- 
рачивается влево на 60 градусов, 


рисует линию длиной 1/3 от пре- 


дыдушей, поворачивается направо 
на 120 градусов и т. д. 


ТО 5НОЛЛНЕ :РЕНСТН 

РОЕМАЕКО :ТЕНСТН/З 

ЪЕЕТ 60 

РОЕМАЕКО :ГЕНСТНИЗ 

ЕТЕНТ 120 

РОЮУАЕР :ГЕНСТНИЗ 

БЕРТ 60 

РОВМАЕО :ГЕНСТНУЗ 
ЕО 

Зто создает тот эффект, кото- 
рый нан нужен, но СТОП!  Внесто 
каждой из сторон треугольника мы 
получили по четыре отрезка. Но 
ведь на каждом из них должен быть 
построен свой треугольник. Поэто- 
ну всякая команды РОРМАЕР в ПРО- 
цедуре 5НОМ.ТНЕ должна быть Фак- 
тически заменена вызовом саной 
этой процедуры 5НОМ!.ТНЕ. 

Очевидно, что с казлым шагон 
СТОРОНЫ ЭТИХ ТРЕУГОЛЬНИКОВ бУдУТ 
все меньше и неньше и их трУДНО 
будет рассмотреть. 

ны ножен заранее установить 
какой-то предел на этот размер и 
когда длина строны становится 
меньше этого предела, прекрашаен 
эту рекурсию и иден дальше. Если 
этот предел включить в качестве 
параметра в процедуру ЗНОМТНЕ, 
то можно начинать с довольно 
больших треугольников ‘и  постепен- 
но вычерчивать "снежинку" все де- 


тальнее и детальнее, 


ТО ЗНОМЕЦАКЕ :ШЕМСТН ИЛНТ 
ВЕРЕАТ 3 ЗНОМ.1НЕ :ГЕНСТН 
РТСНТ 120 
ЕКО 


ТО ЗНОМ.ТНЕ :ГЕНСТН 


ТЕ {РЕМСТН < ЗЛНЕЕ СЕОЕМАРР 
`БЕНСТН 5ТОР] 
ЗНОМТ.ТНЕ :ГЕНСТНИЗ 
ТЕЕТ 60 
ЗНОМЕТНЕ :ЬЕНСТН/З 
ВТСНТ 120 
ЗНОМЕТНЕ :БЕНСТНИЗ 
ТЕЕТ 60 
5НОМ.ТНЕ :ЬЕНСТНИЗ 
ЕНР. 


Хорошим демонстрационным приме- | 
РОМ будет: 


РЕНОР 
ЗЕТУ -30 
РЕНРОМН 
ЗНОМЕЪАКЕ 100 5 


И напоследок кривая, которую 
называют ”драконон". Она рисуется 
двуня процедурани, которые вызы- 
вают друг друга по-очереди. Между] 
вызовани одна процедура обеспечи- 
вает поворот направо, а другая - 
налево. Длина нага в рекуррентной| 
последовательности одна и та же, || 
поэтому здесь нам нужен иной ме-й 
тод для того, чтобы знать, когда\ 
остановиться. Можно, налринер, | 
сделать так, что когда процедура 
дойдет до определенного уровня 
Глубины рекурсии, то процесс дол-й 
хен прерываться. Для этого введен! 
счетчик, который назовем ЬЕМ. Он 
начнет свою работу, например со| 
значения 5 и при каждой рекурсии| 
будет убывать на единицу, пока не! 
обнулится. 


Вот эти процедуры: 


ТО ВЕРТОВАСОН :512Е :ШЕМ. 
ТЕ :БЕУЬ - 0 (РОКМАВР :512Е 
ЗТОР} 
ТЕЕТОВАСОН :512Е :ЬЕУ-1 
БЕЕТ 90 я 
ЕТСНТОКАСОН :$12Е ВЕМТЬ-1 
ЕНО 


ТО Е1СНТЬКАСОН :512Е :1ЕУТ. 


1Е :1ЕМ; = 0 [РОРМАЮО :512Е 
5ТОР} 

БЕРТОКАСОН :517Е :ВЕ\М.-1 

ЕТСНТ 90 


ЕТЕНТОКАСОН :512Е`: ВЕМЬ-1 
ЕН 


не имеет значения, с какой 
процедуры Вы начнете работу. Ре-| 
комендуется начинать с небольших 
значений 512Е и ТЕ\М.. Начинать 
работу ножно, например, так: 


СТЕЛЕЗСКЕЕН . 


ГЕЕТРВАСОН. г 20 


(Продолжение следует) 
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ПРИНЕНЕНИЕ  АССЕМБЛЕРА 
ДЛЯ СОЗДАНИЯ БЫСТРОРАБОТАЮЩИХ 
ПРОГРАНМ 


Перевод с английского 
патшорина В. И. 


Продолжение. 


Начало сн. с. 9-12. 48-61, 97-103 


7. ДВИЖЕНИЕ 


Теперь, когда мы познакони- 
лись со способами вывода инФор- 
нации на экран и способами счи- 
тывания состояния клавиатуры, ны 
можем рассмотреть способы задания 


безусловно, важная 
часть любой игровой программы. В 
этой главе мы рассмотрим все воз- 
ножные способы задания перемеше- 
ния. 

Дия организации движения 
изображения по экрану большинство 
программистов используют знако- 
места, что позволяет ускорить вы- 
полнение программы и оперировать 
с любым из возможных цветов. весь 
экран представляет собой  прямоу- 
гольную матрицу 24к32, т.е. всего 
768 знакомест и поэтому перемеше- 
ние символа из одного знакоместа 
в другое, соседнее с ним,  выгля- 
дит не совсем плавным. При этом, 
если необходимо показать переме- 
шение только одного пиксела, при- 
ходится переписывать весь символ 
из одного знакоместа в цругое. 
Однако при этом, в отличие от 


для начала необходимо опре- 
делить стартовую позицию таблона 
и затем, используя способы, рас- 
смотренные в: главе 5, устаяовить 
шаблон в это знакоместо, Обычно 


жение шаблона - это значит уста- 
новить его текушее и последующее 
положения на экране дисплея. 


нии шаблона необкодимо сразу’ же 
выводить его в новой позиции це- 
ликом. Такой способ используется 
для задания режима ОУЕР 1, при 
котором перемешение шаблона осу- 
ествляется. на Фоне заднего. плана 
без изменения последнего. 


Программа Т.1 демонстрирует 
этот способ. Здесь щаблон в виде 
космического корабля перемещается 
шо экрану вверх/вниз при нажатии 
1/0 и вправо иувлево при 
ажатии клавим 9/0. клавиша 
”5РАСЕ” используется для возврата 
в БЕЙСИК. | 

Космический корабль может пе- 
ремешаться одновременно в двух 


— РАБОТА В‘ МАШИННЫХ КОДАХ | 
Стюарт Николс. в 


АДРЕС МЕТКА НАШ. КОД 


23750 
23761 
23763 
езтт1 
г2зтт9 
2зтвт 
23791 
23794 
2зтэт 


23199 
23801 


23811 
23615 
23819 
2382} 
23824 
г2звгет 
23829 
2звзг 
23835 
23838 
23841 
23844 
г2зват 
23850 


23852 


23855 
23858 


АТА. 


БТАКТ 


РАТА_2 


ВЕСТК 


ы 


1 


гг 


13 


4 


15 


16 


Е 
18 


АССЕНБЛЕР 


08б 23160 
от 


18 УВ 5ТАЕТ 


0 О 15 24 49 г2б га5 ггз 


2% 


60 255 255 153 255 231 


0 О 240 24 140 11 13557 


ЕО 


5В ТВ 5С 1 ТЕ, (23675) 


роз 5С БО НЕ, ВАТА 1 
18 00 РВС, 24 
во Ув 
ОА УЕ ВЕСТН 
0168 
Й 
36 ОЕ 28 10 {17+14),40 
36 53 ОЕ 1 (1У+85).15 
02 ЕО А, 02 
01 16 САМ, 5635 
5в 0 САЫ. 3435 
02 10 А, 02а 
01 16 сАл, 5635 
Е9 5С 10 ОЕ, РАТА_2 
Од 00 го вс, 10 
3с го САШ, 8252 
00 5В 10 РЕ, 23296 
29 5С ОН, РАТА_& 
Од 00 Ьо ВС, 10 
во отв 
01 5В ьо нЕ, сазг9т) 
РЕ ЕР Бр ВС, 61438 
78 1НА, (С) 
т ВТ О.А 
© К 2,1 
ТАС Н 
ЗЕ В1Т 1, А 
о к на. 12 
ЕС Н 
РЕ ЕТ р ВС, 63486 
718 ТН А. (С) 
47 ВТ 0, А 
0! ЗЕ НЕ, 13 
РЕС 
ЕЕ РВ Ьо ВС, 64510 
718 ТН А, (С) 
4т ВТ 0,А 
1 Ле Н2.14 
тс 
БР А. Ё 
16 Ср.огё 
03 ЛЕ НЕ. 1.5 
БЕС 1 
05 3® 16 
ЕЕ СР 255 
01 ЛВ Н2., 1,6 
ТС 
10 А,Н 
СР 30 


Листинг 7. 1. 


КОММЕНТАРИИ 


‚Отключение прерываний. 
:Переход на начало работы. 
‚Шаблон символа СНЕ$ 144. 
‚Шаблон символа снв$ 145. 
‚Шаблон символа сне$ 145. 
‚Начало области И0б. 

Задание трех первых символов 
} графики 06. й 
‚Переход на начало работы. 


1Т 8 144 145 146; Эта последовательность ко- 


;дов является символьной стро- 
укой, которую можно трактовать 
‚как АТ 0,0; РАРЕЕ 8; ТМК 8; 
;СНЕ$® 144; СНЕ$ 145; СНЕ$ 146. 
;Выставляен цвет бордюра. 

; Выставляен ТНК и РАРЕХ. 


; 
{Открыли канал печати на экран 
; Очистка экрана. 


‚Начало символьной строки. 
длина символьной строки. 
‚Печать символьной строки. 
Начало буфера принтера. 
Начало символьной строки. 

; длина символьной СТРОКИ, 
;Переброска символьной строки 
БАТА_2 в начало буфера прин- 
; тера, 

{Координаты текушей позиции 

; печати. 

:Ввод данных с порта клавиату- 
;Ры. Согласно тону числу, ко- 
:торое установлено в Вс, здесь 
: прининается сигнал с правой 

: половины верхнего ряда клавиш 
; (клавити 6...0). 

Проверка клавиши “0”. 
Переход, если не нахата. 
;Бсли нажата. 

Проверка клавиши "9". 
;Перекод, если не нажата. 
‚Если нажата, 

‚Опрос полуряда (1...5). 
‚Проверка клавиши "1". 
‚Переход, если не нажата. 
‚Если нажата. 


‚Опрос полуряда (9...Т). 
‚Проверка клавиши "О", 
‚Переход. если не нажата. 
‚Если нажата. 

‚Координата по вертикали. 
{Проверка на выход за пре- 
:делы экрана снизу. 

Переход, если все в порядке. 
{Иначе уменьшаем 1. 

‚и переходим на метку 16. 
Проверка на выход за пре- 
:делы экрана сверху. 
‚Переход, если все в порядке. 
‚Иначе увеличиваем 1.. 


; Проверка на выход за пре- 
; делы экрана справа. 


а 
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 рлвоть В НАШИННЫХ КОДАХ |- 
направлениях без изменения изоб- | 


ражения заднего плана. Корабль г 
выводится в цветах РАРЕВ 8 и 

| ТЫК 8, чтобы оставаться контраст- 23906 20 03 78 17, 1,8 ; Переход, если все в порядке. 
ным на любом Фоне заднего плана 23908 25 РЕС Н й Иначе уменьшаен Н. 

| изображения. Скорость перемете- 23909 ь 18 05 ТЕ 19 ;и переходим на метку 1,9. 

ния корабля регулируется с по- 23911 1.8 ЕЕ ЕЕ СР 255 ; Проверка ‘на выход за пре- 
|мошью цикла задержки. Если же ко- ‚делы экрана слева. 

йрабль остается неподвижным, то 23913 20 01 ЛЕ #2, 19 ; Переход, если все в порядке. 
процедура стирающая старое изоб- 23915 24 сн ; Иначе увеличиваем Н. 

ражение и печатающая новое обхо- 23916 19 ЕР 5В 01 5В 1.0 ГЕ, (23297) ;Координаты старой позиции 
дится, чтобы избежать мерцания. ; печати. 

Процедура коть и выглядит не- 23920 АЕ. ХО А ; Обнуление Флага переноса. (это 
малой по своим разнеран, тен не ‚важный нонент при подготовке 
менее очень проста. Проснотрите ;к исполнению конанды $ВС). 
ее, в ней все должно быть понятно 23921 Е5 РОЗН НЕ :Запомнили координаты новой 

И ДОСТУПНО. ; позиции печати на стеке. 


Продолжение Листинга Т. 1. 


23922 ЕР 52 5ВС Н,, БЕ ; Проверяем изменилась ли по- 
Вы ножете усовершенствовать ;зиция печати. 
Эту Программу так, чтобы косни-` |23924 Е! РОР НЫ ;Восстановили новую позицию. 
ческий корабль при выходе его за 23925 г8 гс 5в ма ‚Если позиция печати не ме- 
|пределы экрана, появлялся с про- ‚нялась. делаем обход на 112. 
ТИВОПОлОЖНОЙ СТОРОНЫ. гз9гт 22 01 5В р’, (23297), НЕ ;Запомнили координаты новой 
Процедура в машинных кодах ‚ позиции печати в буфере 
выполняется довольно быстро и ес- ; принтера. 
|ли в цикле задержки записать. |23930 ЕР 36 57 03 10 (1У+87),3 ;Включение ОУЕК 1. 
|Ер НЬ,1, то за время перенешения 23934 11 29 5С ГР ОЕ, БАТА_ё ; 
корабля его изображение не успеет 23931 01 ОА 00 Ьр ВС, 10 ; 
|полностью восстановиться на новой 23940 ср 3С го САМ. 8252 ‚Печать в старых координатах, 
позиции. Поэтону для большинства ‚а поскольку включен режим 
программ необходимы циклы задерх- ;ОУЕВ 1, то это на самом деле 
ки, чтобы сохранить изображение ‚не печать, ‘а стирание. 
Дна время перемещения. 23943 11 00 5В Тр РЕ, 23296 
23946 01 ОА 00 р ВС, 10 
23949 СО 3С 20 СА, 8252 ; Печать в новой позиции. 
ПЕРЕМЕЩЕНИЕ ИЗОБРАЖЕНИЯ 23952 11 29 5С ТО РЕ, РАТА_2 ‘ 
ЗАДНЕГО ПЛАНА ЭКРАНА 23955 21 00 5В ГО НЕ, 23296 
23958 01 ОА 00 Бр вс, 10 
р для задания перемешения зад- 23961 Ьр во БотЕ Копирование новой позиции 
него плана необходимо организо- ;в старую. 
вать перемешение не одного знако- 23963 21 88 13 Г нь, 5000 
[места а всего экрана или его  |23966 111 2в БЕС Н 
части. Это перемешение обычно вы- 23967 7с Г, А, Н Цикл задерхки. 
}полняется в одном из 4 направле- 23968 В5 ов! 
ний: вверх, вниз, вправо, влево; 23969 20 ЕВ 3 87,111 
причем перемешаются одновренённо 23971 112 01 РЕ ТЕ Гр. ВС, 327156 Опрос нажатия 
и символы и их атрибуты. Если 23974 ЕШ 18 ТНА, (С) клавиши ' 
|смешение всего экрана происходит 23976 СВ 47 ВИТ 0, А "ПРОБЕЛ". 
на одну символьную позицию. то 23978 С2 21 50 3Р нЕт ‚Если не нажата, переход на 1.7 
необходимо решить, как поступить 23981 РО 36 57 00 10 (1У+87),0 ;Восстановление режима ОУЕР 0. 
с символани, вышедшини за пределы 23985 ЕВ Е Разрешение прерываний. 
экрана. Ны Можем либо потерять их 23986 с9 ВЕТ Возврат в БЕИСИК, 


и выводить на ПРОТИВОПОЛОЖНОЙ 
стороне экрана пустые знакоместа, 
либо запоннить их внесте с ‘атри- 
бутами и затем выводить на экран 
в соответствующен месте на проти- 


{ Листинг Т.2 
ЗСРОГ, вверх для атрибутов. 


воположной стороне. Такой эФ$Фект АДРЕС МЕТКА НАШ. КОД АССЕНБЛЕР КОММЕНТАРИИ 
зацикливания изобрахения весьма 
полезен для игровых програнм. овб гзт60 

Программы с Т.г по 1.5 де- 23750 11 00 58 12 ГЕ, 22528 Начало области экранных 
МОНСТРИрРУЮТ смешение атрибутов ; атрибутов. 
6ез возврата с противоположной 23763 21 го 58 10 Н.. гг560 Начало области атрибутов 
СтоРОНЫ для всех четырех направ- р пля второго ряда знаконест. 
мений (такое движение принято 23766 то ВС, 736 ;длкна перебрасываеного блока 
называть “протяжкой” -  5СКОШ.). ; (23 нижних строки по 32 зна- 
Програмны с 7.6 по 7.9 денонстри- ; конеста). 
РУЮТ снешение атрибутов по всем БОТЕ ‚Перенос атрибутов на одну 
четырен направлениям с возвратом :СТРОКУ вверх. 
Кназовем это двихение "прокрут- 10 В, 32 Заполнение нижней строки 
кой" - КОМ. 80 5С 10 А, (23593) ‘экрана’ постоянными атрибута- 
|  "Прокрутку” и ”пПротяжку" сим- 10 (ФЕ), А ми, взятыми из систенной пе- 
волов для всех четырех направле- тНС ПЕ ременной АТТЕ_Р(23693) 
ний денонстрируют программы 7.10 рут 12 


Т. 18. ‚ Возврат. 


Иствовать для ‘организации вом, и 
|5СКкОы. только части экрана. весь 
экран условно разбит на 3 сегмен- 
та, по 8 РЯДОВ в кахдом. Каждый 
в свою очередь. состоит из 8 

каздая ‘линия в дисплейной 


вкаючительно. 
затем записываются вторые 
улинии первых восьми рядов, затен 


третьи и так послеловательно весь 
1сегмент, после чего записывается 
второй и за ним ‘последовательно 
третий сегмент экрана.  Каздый 
сегмент занимает 2048 байтов в 
йдисплейной области памяти. 
| Обратите внимание, что в 
процедурах 1. 3... 7,18 используют- 
ся команлы передачи блока байтов 
"- 018 и ЬЮОВ. После выполнения 
этих команд. в регистровня парах 
Н. и ОЕ остается записанный ко- 
Инечный адрес блока +1 (для 01) 
пи конечный адрес - |1 (для ТОВ). 
Это нохно использовать для зада- 
]ния адреса продолжения выполнения 
програни процедуры, а не переза- 
уписывать адрёса в НЫ и ФЕ. Г 
| ПРОоГРамны 7.2. . .Т. 18 написа- 
ны так, чтобы не вносить в них 
изменения при смене адреса за- 
|грузки. Программа Т, 19 является 
пусовершенствованной версией про- 
|граммы 5СЕЕЕН ОР 5СКОМ.. Если Вам 
'все понятно в ней. попробуйте 
ами усовершенствовать программу 
ИЭСВЕЕН БОМН $СВОШ,, 

| Сравнивая програмны 7,15 и 
Т. 19 Вы заметите что вторая зани- 
а только 87 бай- 


програнма перемещает вверх роте 
Исимвод ряда, диния.за линией, 


Листинг т, 3 


$СвОМ. вниз для атрибутов 


Продо. 


РОР ВС 
ри, 
ВЕТ 


112 


яжение Л Т.4 


и 


5СВОБ. вправо для атрибутов 


12 в, 2% 

10 НЬ, 23295 
РОБН НЫ 

РОР РЕ 

РУБН ВС 

ЕС нь 

ТО БС, 31 
орою 

1) А, {23693} 
ТР {0Е).А 
РОР ВС 
рум, 
ВЕТ 


11$ 


114 


листинг 71.5 


Е. 


Продолжение Л. Т, 8. 


РОЗН НЫ 
РОР ПЕ 
РИ5Н ВС 
10 А, (НЫ) 


= Дл 


ЪР: А, (НЫ) 
РОЗН АР 


тыс нь 
РУ 116 


Г ВС, 35 
ылВ 224 


то в, за 
РОР. АЕ 
ЕС НЫ 
ЪР (НЫ. А 
БИА ат 
КЕТ 


тат 


р Н., 22528 ; 
ри 


тр в, г4 
То НЬ, 23295 
РУ5Н НЫ 
РОР БЕ 

РОЗН ВС 

14) А, ЦНЬ) 
ВЕС НЫ 

Бо ВС, 31 
Ик 

10 (ФЕ, А 
РОР ВС 
рул, 
ВЕТ 


153 


листинг 7. 6 
я атрибутов. 

Начало ат- 

} РИбУТОВ. 

; Копирование 
‚через стек. 
;3а знако- 
;места ряда. 

: запомнийи 

‚ атрибуты на 
:; стеке, ы1 
; знакомес- 
;то справа. 
‚Повтор пля ` 
‚всего ряда. 
;Протяжка для 
;23-к Нижних 

РЯДОВ. 

; Восстанавяи- 
‚.ваен атоибуты 
‚верхнего ряда 
:в нижнем ряду 
; экрана, 

: Возврат. 


Листинг 7.10 
ВОГ, влево для символов. 
Ь0 В,192  ;Высота экрана. 
ГО И, 16388 :Начало экран- 
; ной области. 
РОЗН НЫ ; копирование 
РОР БЕ з Через стек. 
РОЗН ВС ;Запомнили ВС. 
ГЛ А, (НЫ)  ;запомнили те- | 
}КУШУЮ ЛИНИЮ 
‚самого левого, 
; знакоместа. 
тс н. ‚Адрес линии 
: справа. 
т ВС, 31 :31 аконесто 
;В РЯДУ. 
= В ; Копирование. 
Тр (ФЕ), А ; Копирование 
‚зяйнии самого 
‚левого знако- 
уместа в самое 
; правое. 
РОР' ВС ; Восстановление 
; ;счетчика линий 
рле 1 :Есаи не все 
ЛИНИИ СКОПИРО- 
‚ваны, то воз- 
; врат на 11, 
ВЕТ }ВЫХОд. 


Е. 


РОР БЕ 
РИЗН. ВС 


Листинг Т. 11 
ВОГ. вправо для симвозов. 
тр в, 192 
10 н., 22521 
РОЗН Н. 
ТА, (НВ 


листинг Т.Т 
ЬО РЕ, 23295 
ЬО Н., 23263 ВОМ. вниз для атрибутов 
ЬО ВС, Т3б О О им 
горю 10 Н., е3295 
ьо в, з2 РУ5Н На. 
ЬР А, (23693) РОР ПЕ 
ьТ ТО (ФЕ, А ЬО в, з2 
ТС БЕ 24 2 А, (Но) 
руна, 17 РОЗН АР 
ВЕТ ФЕС Н. 
РЕ 1.24 
тр, вс. 736 
Листинг 7.4 ООВ 
$ ГО Ве. 
СКОМ. влево для атрибутов 125 РОР АЕ 
о И ленив тис нь 
Ьр в. 24 10 (Н.),А 
р. НЕ, 22528 румЕ 125 
Ь12 РОЗН нь ВЕТ 
РОР ПЕ 
РАЗН ВС 
ТС нь листинг Т. 8 
х 1.5 ВС, 31 КОМ. влево для атрибутов 
[4 ыы А ТИ 
12 А, (23693) о в, га 
О (ФЕ). А 10 ни, ге5ёв 
Е Ее 
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О нЕ, 16384 
ХОВ А 

ЬО В, 192 
РО5Н ВС 
РОЗН НЕ 
РОР РЕ 

1нс нь 


ИЕ $СВОЫ. 
ИТС 


Листинг 7. 135 


влево для синволов. 
х второй Вариант) 


во нЕ, 16385 
БО РЕ, 16384 


ы РАБОТА В МАШИННЫХ КОДАХ | Е ОН ААВ 


Продолжение Л. 7. 15 
роли, 13 
10 БЕ, 18432 
Ы НЕ. 18464 
Л В, 2016 
в 
И: 
ЬО Н,, 20480 
12 БЕ, 18656 
РОЗН ВС 
РУЗН НГ. 


ол, 14 
О БЕ, 20480 
ау’НЕ, 20512 
Гр ВС, 2016 
БотЕ 

в: } 
Ьр НЕ, 20704 
РОЗН. ВС 
РОЗН НЕ 

1. в, з2 
ьр(н.). 0 

1ЫС НЕ 


ггг 
т23 


Продолжение Л. Т. 16 


рун’ 121 
10 Е, 20480 
р НЬ, 20512 


вр нихегэат 
ьВ в, за 
РОР АЕ 

ЕО (НЫ, А 
ВЕС НТ. 
ВЯ 123 
ЫО` А; 255 


Листинг 7. 14 


[0 НЕ, 22521 


ЬО (ФЕ), А 
РОР ВС 
ОУН7 1.14 
ВЕТ 


вправо для символов. 


Листинг Т. 15 


5СвОМ, вверя для символов. 


ГР РЕ, 16384 
ГОН. 16416 
Ьр ВС. 2016 
тре 

р в,8 

р Ну, заза 
р РЕ, 16608 
РОЗН ВС 
`РИЗН НЫ 
РОЗН ОЕ 

10 ВС, з2 
Бот 

РОР БЕ 

РОР НЬ 

РОР ВС 

нс р 

нс Н 


Листинг Т. 16 


` ОШ, вверх для символов. 


1.18 
1.19 


120 


р НЕ, 16384 
гр в, за 
10 А, (НЫ) 


118 
[О БЕ, 16384 
10 НИ, 16416 
Тр ВС.2016 
ьоте 
о: 
то нЕ, 18342 
1.2 БЕ, 16608 
РОЗН ВС 
РОЗН НЕ 
РОЗН Е 
ер- вс, з2 
ме 
РОР БЕ 
РОР НЕ 
`РОР ВС 
тис ; 
ТСН 


РН, 1г0 


10 БЕ, 18452 
Ъ0_Н,, 16464 
10 ВС, 2016 
Бот 


ЭСРОМ. вниз для символов. 


нение жи ини яннниы 


18 


РУЗН-БЕ 


` 0 н, 18399 


Листинг 7.17 


ь5 Е; 22527 
БО НЕ, 22495 
ГО ВС, 2016 
во“ 

10 вв 

10 НЕ, 18656 
10 `0Е, 20480 
РЗН ВС 
РУЗН! НЕ. 
РУЗН Е 

12 вс, з2 
в. 
РОР` БЕ 

РОР; НЕ 
РОР`ВС 
Со“ 
тен 
9: 

[0 ВЕ,‚г0479 
[2 НЕу20447 
10 ВС; 2016 
ЮВ 

10 в, 8 

Бр НЕ, 16608 
1 РЕ, 18432 
РИН ВС 
РОЗНЬ 


рр вс, за 
БоТЕ 
РОР БЕ 
РОР НЕ 
РОР ВС 
тс 
ен 
рут, 139 
10’ Е, 18431 


0 В6;2016 
БООЕ 
ЬВ-НЫ; 16384 
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5— . 


Продолжение Л, 7. ат | 


30 пр в, 32 
тар вон. о 
тис нь 

Оле, 11 

ХОБ А 

БО Ь.А 

СН 

ГР А, Н 

СР 12 

зе на, во 

ВЕТ 


листинг 7. 18 


КОГЛ, вниз для символов 


10 нь, га52т Конец дис- 


‚плеиной об 
; ласти. 
126 10 В, 32 ;3а знакоместа 
;В СтроКв. 
27 1 А, (НЫ, ; Запомнили 
; НИЖНЮЮ ЛИНИЮ 
РОЗН АЕ ‚текущего зна- 
;коместа, 
РЕС НЬ ;Знакоместо 
:; слева. 
р.лий, тет зи отак 8 раз. 
ГО А. 255 { Возврат к 
Гр, А ; предыдушей 
ЕС Н глинии послед- 
БРА, Н ; него  энако- 
” ; места ‘ряда. 
СР. 79 Проверка на 
; выход в 2г3-ю 
‚СТРОКУ экрана 
Зе Н2.1.26 ;Если нет, то 


: возврат назад 
10 РЕ, г252Т ; Копирование 


РАБОТА В 


НМАМИННЫХ ‚ КОДАХ 


29 


1.30 


1,31 


Боя 


р в, 8 
грн. 
10. Е, 


4 ть 


Продолжение Л, 7. 18. 
Бр ОБ, 204719 
Го НЕ, 20447 
БР ВС, 2016 


16608 
18432 


РОЗН ВС 
РОЗН НЫ 
РИ5Н РЕ 
ьр вс, за 


БрТВ 

РОР БЕ 
РОР НЕ 
РОР ВС 
ис р 
18с Н 
ри, 

го ря, 
о нь, 
го вс; 
гов 


р нь, 
10 В, 3 
РОР_АЕР 
ЬО дн 
тис в. 
рр ь 
ХОК А 


1.29 
18431 
18399 
2016 


16384 


‚ 


}, А 


31 


‚диз восьми 


‚движение ин- 
‚формации во 
‚втором сег- 

:менте на ряд 
гввиз. ‘ 


перенос 
информации 
через 
границу 
мезлу 
первым 

И ВТОРЫМ 
сегментами. 


движение ин- 
;Форнации в 
‚первом сег- 
;менте на ряд 
;вниз, 

‚Начало экрана 


Восстановле- 
ние со стека 
информации 
дяя восьми 
линий первого 
ряда (на стек 
©на поступила 


вижних линий 
экрана). 
‚ ВЫКОЛ. 


Листинг 7. 19 


Е.Н, вы ИЕ ВЕ НЕЕ ОВ НЕВЕЕИ Е НЕ ВНЕ ТЕ НЕЕ 


’ Продолжение А. Т. чо. | 


Нняеследующая процедура копиру- 
ет все ряды (кроме верхнего} 

в текущем сегненте на один РЯД 
выше. 


5ЕСМ Гр В,Т } Первый ряд сег- 
‚мента не пере- 
‚носим, потому Т 
11  РУ5Н ВС  ;Сокранили от 
;"ПОРЧИ". 
12 вс.з2 ;Соответствующая 
‚линия следующе- 
‚го ряда отстоит 
; текущей. 
РОЗН НА, ‚ Копирование ад- 
РОР БЕ :реса через стек 


АПР Ш., ВС ; НЬ указывает на 
; РЯд ниже. 


РИЗН Н.  :;Сохранили НЬ и 
:ВЕ от "порчи" 

РИЗН БЕ ;‚ конандой тот. 

САМ, ОР скопирование ря- 
‚ да’ вверх.. 

РОР БЕ Восстановление 

РОР регистров. 

РОР_ ВС 

ол. 11 ‚Если не все 7 
‚РЯДОВ СКОПИРО- 
;вавы, возврат. 

ВЕТ. :Рыхол. 


Нижеследующая пропецура копиру- 
ет содержимое экранного ряда 
на один ряд выше. : 
УР 
2 


о. В, 8 8 линий в ряду. 
РУЗН ВС ;Сокраниви регис- 
РУЗН Н. ;тТРы ОТ “порчи” 
РОЗН БЕ :командой БОТ. 
10 ВС, 32 ;32 байта в линии 


ОН, 22495. ; информации в $СКОМ. вверх дия символов ТЗ :Перенос на один 
ГО ВС, 2616; третьем сег- (2-ой вариант) ‚ряд вверх. 
ОБЕ :менте на рРЯд ИСЗ ИР РОР РЕ 
; вниз. | 1) Н.. 16384 ‚Начало дис- РОР. НЕ Посстановление 
РО В, 8 ; Восемь ‘линий. ‚плейной об- РОР: ВС регистров. 
ГО НЕ, 18656 ; Адрес начала ; ласти памяти. с р ‚Переход к оче- 
‚первой линии САМ. 5ЕСН движение пер ‚релной линии 
; последнего ‚вого сегмента тыс н ; текущего. ряда. 
;ряда второго ЕХ БЕ. М Перенос оли 12 сли не все 3 
; сегмента. 2 НЕ, 18432 | ряда через линий скопирова- 
р РЕ, 20480 ; Адрес начала РОЗН НЕ. границу ;ны, возврат. 
; первой линии САТТ, ЦР сегнентов. ВЕТ ; Выход, 
‚первого ряда РОР №, ` те 
; третьего сег- СА. 5ЕСбМ ‚движение вто- Вместо программы, выполняющей 
мента. :Рого сегнента перемещение сразу же целого ряда, 
128 РУБН ВС :Сохранили ре- ЕХ РЕ, НЕ, Перенос ‚ряда нохно написать рогранму, ‹ вынол- 
РУЗН НЬ ;ГИСТРЫ ‚от 10 Н,, 20480 1через границу НЯзлуЮ перемешение только одного 
РИН РЕ зпюрчи конан- РУБН НЕ сегментов, столбца, Чтобы переместить весь 
эр дой Е, САЫ. УР ряд, эта програина лояхна повто- 
о вс, за ;32 байта в РОР НЫ РИТЬСЯ 32 Раза. В то не вреня, 
; каждой линии. САШ, 5ЕСН ‚Движение тре- такое решение позволит перемешать 
ог ; Перенос одной ;тьего сегмен- не весь Ряд, а только заданное 
; линии через ; та. : количество стоябцов и, бсаее то- 
; границу сег- О НЕ, 20704 | Обнуление Го, ПРИ Таком решении нет необхо- 
; ментов. 14  Р9$Н нь (стирание) диности хранить в памяти все 256 
РОР ВЕ ; Восстановле- р в, з2 инФорНации байтов: верхнего ряда экрана (как, 
РОР НЕ. ;ние. регистров 3 1 н.о в последнем налринер, в программе 7.18), а 
РОР.ВС уе ' тс. 1, РЯДУ только 8 байтов одного столбиа 
ис р ‚Переход к Влий. 13 третьего ряда. Програнна 7. 20. показывает, 
тис Н ‚очередной ли- РОР Н. сегнента. как достигается такое уненьшение 
унии ряда. сн объена памяти. Здесь’адрес перво- 
БУГ, 128 ‹;Возврат для Гр А.Н го байта смешаемого столбца запи- 
о: Нереноса 8-ни СР 88 сывается в регистровую пару’ ПЕ, а 
; линий через ЗЕ в. 14 общее число смешаеных столбцов 
‚границу вег- ВЕТ ‚Выход записывается в регистр В. Эта 
;нента. программа может быть раэкешена в 
любом участке паияти. 
94-6622 
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Листинг Т. 20. 


$СВОШ. вверх по столбцам. 
ние няти ани июни ним 
ХОЕ А Сброс ак-ра. 
12 РЕ, 15388 ; Адрес верхней 
злинии 4-го 
; стоабна. 


гр в, 10 ‚двигаем вверх 
}10 столбцов. 
РОЗН Е Сохранение ре- 
} ГИСТРОВ 
РУЗН ВС гот КОРРУПЦИИ. 
РОЗН ОБ ‚Копирование из 
РОР НЕ ОЕ. в НЕ. 
1) в.8 ;8 линий ряда. 
[О А, (Н.)  :запонинаен на 
РИН АР ‚стеке восень 
„ен ;линий верхнего 
ли 16 ; ряда. 
И: ;7 рядов сег- 
; мента. 
РУ5Н ВС 
о нь, зг ; Указание на 
АБО Н., БЕ  ;следующую ли- 
:нию ряда, 
РОЗН НЕ 
Ьр в, 8 ;Восень линий 
: В РЯДУ, 
10 А, (Н.) ; Копирование 
10 4ОЕЗ, А  ;через акк-р 
тыс н ;для одного 
тнс р ; ряда. 
ПЛ, 1 : 
РОР РЕ Восстановление 
РОР ВС ;РЕГИСТРОВ. 
рун, га ; Повтор дая 
‚очередного ря- 
; ца в сегменте. 
Гр М, 1824 ;Перекод через 
АБР НТ, РЕ  :границу сегн, 
10 А.Н Проверка ва 
СР 88. ; конец экран- 
ЭК, 2, ЕНО ; вой области, 
РИЗН НЕ ; 
Го В, 8 Перенос восьми 
Л А, ‹НЬ) ; линий через 
1 (ФЕ). ^  с;границу сег- 
тыс н : мента. 
НС р 2} 
РУ, 13 ; 
РОР БЕ 
в, 14 ‚Возврат для 


: работы со сле- 
; дуюшим сегм. 


ЕН 10 Е, 52 :Восстановле- 


$ВС Н..РЕ  ;ние со стека в 
о В, 8 ‚ нижнем ряду 
РОР АЕ ‚стоябпа того, 
о ‹НЬ), А  ;что запомнили 
ЕС н. ;в самом верх- 
рлий, ЕТ : нем ряду: 
РОР. ВС ; Восстановление 
РОР БЕ { РеГИСТРОВ, 
тнс РЕ ;Пережод к оче- 
ГРЕдномУ СтТОолб- 
; ну экрана. 
2742, 1.5 ;Если не все 10 
;стоибпов об- 
:зслухжены, ‘воз- 
`;врат на 1,5. 
вЕТ ;Выяод. 


Цаяьнейшее уменьшение объема 
занимаеного програмной, 
нохет быть достигнуто, если вы- 
пиоанять перемешение оцновременно 
не всех рядов, а только, заданного 
их количества. При этом можно ре- 
апизог`“, смешение на экране оп- 


ер..ни. Програнна Т.21,  занимаю- 
мая всего 58 байтов; демонстриру- 


‚ного окна с заданными раз-— 


Г рлвота В МАМУННЫХ кодля |-— 


ет это решение. Для проверки вы- 
хода на границу сегмента экрана 
здесь используется команда 
В1Т 0,Н. Если нулевой бит регис- 
тра Н не равен 0, то ны нахопиися 
на границе сегмента экрана и вме- 
сто добавления числа 32а к числу, 
записаннону в регистровой паре 
рЕ, необходимо добанить число 
1824 для перевода “первого” ряла 
в следующий сегмент. Число смета- 
емых рядов определяется числон 
шагов цикла 1/4. Апрес ячейки 
верхнего левого угла смешаеного 
окна может быть определен по 
Форнуле: 

163844 (1824 ® ТТ (60м/8)) + 
(КОМ - ТЫТ(2О4/8} )=з2 + СОБОИЯ 


Здесь КОМ - номер экранной 
СТРОКИ (в знакоместах), 

сомлиН - номер экранного 
столбца (в звакоместаз). 

Для смешения всего экрана в 


регистровой паре ГЕ дойжно быть 
записано число 16384, в регистре 
В перед циклом 16 число з2и 
здесь же, но перед циклом 14 - 
число 23. Эту програнну нохно 
переделать для организации 
свешения вверх/вниз. 


листинг 1.21. 


ХО А 

БР БЕ, 16515 ;левый Верхний 
:УГОЙ ПРОКРУЧИ- 
; ваемого “окна” 
; имеет коорди- 
:наты х-3; 
:У=4. 

Ширина "окна” 
; - Т энакомест. 


го вт 


1.6 РОЗН БЕ 
РИЗН ВС 
РОЗН БЕ 
РОР Н. 
Го В,8 

11 10 А, 1.) 
РОЗН АР 
тс н 
ря, 11 
Г В. 13 ;Высота “окна” 

;- 13 знакомест 

14 РОЗН ВС 
ео нЕ, за 
АОР НЕ, БЕ 
вт о,н 
те 7, 12 
Гр нь, 1824 
АПР НГ, ОЕ 

12 . РИЗН НЬ 
ТР В, 8 

ь3 10 А, (ВБ) 

10 ОБ), А 
и р 
ГСН 
рт, 13 
РОР ПЕ 
РОР ВС 
7, 18 
Гр В, 8 

15 РЕС Н 
РОР АЕ 
Ро (Н.А 
ВНР, 15 
РОР ВС 
РОР БЕ 
РОР ГЕ 
ТВС БЕ 
рии, 1.6 
ВЕТ 


В ПЗУ конньютера 2х Зресаиив 
имеется одна из наиболее полезных 
процедур - 5СвОМ. п, позволяющая 
смешать п строк внесте с их атри- 
бутами. Число п должно быть боль- 
ше иди равным 2 (но, конечно, не 
больше, чем 24). 

Программа 7.22 показывает, как 
можно использовать эту процедуру 
для очистки строк с 16-ой по 24-р 
включительно. Число строк отсчи- 
тывается от 24-й, при этом в ре- 
гистр В записывается число 
Сстрок-1 и девять раз вызывается 
процедура 5СВО, п, находящаяся 
по адресу 3584: 


Листинг Т. 22 
ьО В, 9 
11 РОЗН ВС 
Гр в, 8 
САМ, 3584 
РОР_ ВС 
рт, [1 
ВЕТ 


НУ и в конце этой главы 
разберем процедуру, позволяющую 
одновременно смешать влево (или 
вправо) сразу же половину  симво- 
ла. Эта процедура хоть и корот- 
кая. но довольно сложная, т.к 
здесь используются новые коман- 
ды. Например, команда Я.) пере- 
мешает биты с 0-го по 3-й в 
биты с Т-го по 4-й в ячейке, 
адрес которой наколится в регис- 
ТРОВОЙ паре Н.. Биты же с Т-го 
по 4-й из этой ячейки переписыва- 
ются в биты с 0-го по 3-й в ре- 
ГИСтр А. А данные, которые были 
в этом регистре в битах с 0_го но 
3-й переписываются в ячейку, 'ад- 
рес которой находится в  регист- 
Ровой паре НЬ, и занимают здесь 
соответственно 0...3 биты. Эта 
команда не влияет на Флаги со- 
стояния процессора. 


листинг Т. 23 

р1 
р. НЕ, г2527 
ГО В, 196 

ь1 РОЗН ВС 
ХОЕ А 
ьр в, за 
РО$Н НЫ 

2 во 
ЕС НЫ 
руих, ь2 
РОР ПЕ 
ЕХ ПЕ, НЕ, 
АБР А, (1) 


В програмие 7.23 для каждой 
Строки экрана используется конан- 
да В.Л. для перемешения правой 
половины каждого синвода в . лезую 
часть. Левая половива первого 
химвола при этон остается пус- 
той. т.к. для кажлой строки изна- 
чально ‘в регистре А записан о. 
Чтобы организовать циркулярное 
смешение, необходимо временно за- 
поминать значение леной половияы 
первого символа, а`затен выводить 
ее, как правую половину последне- 
го сиивола, 


+44 


| сегодня мы представляем Ван 
нано НОВУЮ КНИГУ “30 часов 
Ц8кясика лля начинающих”. — Надо 
сказать, что это наш первый опыт 
в том смысле, что до сих пор мы 
издавали только книги, написанные 
собственными руками. сейчас, увы, 
поле обстоит так, что Вы, уважае 
мые лрузъя, читасте быстрее, чем 


мы пимемн и потому нам пришлось 
обратиться к классике. Поводом 
для этого стали многочисленные 


обращения дать что-то для начина 
ющих или хотя бы повторить наше 
самое первое издание, с которым 
мы дебютировали в 1989 г. - "Боль- 
шие возможности Вашего ”сСпектру- 
ма”. 

Мы сразу отказались от идеи 
повтора нашей первой книги, ведь 
за эти годы она была перелечатана 
многими организациями, где слово 
[в слово, где с добавленияни и, 
вполне возможно, она Вам встре 
чалась под другим . наименованием. 
Вместо этого мы сделали перевод с 


Йиля Британского `Напионального 
коллелжа заочного повышения. ква 
лиФикации ^ (Маф1опа! Еж4епз1ой 
со11еве). 

Книга готова и ее оригинал-ма- 
кет на дискете предлагается всем 
желающим самостоятельно ‘заняться 
печатью по нашей “лицензии и рас* 
пространением. Мы же ждем ее вы- 
кол из типографии не раньше ноя- 
6ря текущего года, 

В этои книге нам больше всего 
понравился ход мысли автора. Все 
основные операторы БЕЙСИКа даются 
читателю на основе конкретных 
практических задач. сегодня в 
качестве презентации новой книги 
ны даем одну маленькую главу, 
Которая, как нан кажется, ‹ хорошо 
| 


иллюстрирует нетодическии подход 
автора. 
с'трингов оператором (... 


Глава посвяшена - членению 
То, 


5.6 Расчленение стрингов. 
| Вы никогда не задумывались о 
том, что такое дата? Например, 
как компьютер представляет себе 
е3 июня 1973 года? 

Мы энаем, что компьютер умеет 
Хранить данные. И делает это дву- 
ня способани - в виде чисел или в 
виде символьных строк (СТРИНГов). 
В виде чисел он уделяет по 5 бай- 


тов памяти на каждое число, а для 
СТРИНГОВ - ПО ОДНОМУ байту на 
каждыи символ. Так что же такое 


дата? Число’ или стринг? 
23 июня 1973 года - вроде бы 
стринг, а если мы запишем то же 


книги ` Клаива ПРИГМбРа СУ е 
РАТЕТОГе) и Пола Шрива (рай} 
5вгегуе). которая являетея нето-. 
дическим пособиен по "Слектруму” 


самое как 730673 то вроде бы 
это число. Давайте ‘разбираться. 

Если 230673 это число, то 
почему 110593 (11 мая 1993$ года) 
неньше. ведь 93-ий год был позже 
13-го? А если это стринг, то 
спрашивается, ‘как! конпьютер сно- 


жет рассчитать, сколько лет будет 
в 93-м году молодому человеку, 
родившемуся в 13-м, да и вообще 
как тогда оперировать с календа- 
рен? 

Отяет очень прост. Даты -о это 
особый вид инфорнации и работать 
с ними надо особо. Их надо вво- 
дить, как стринги, а хранить в 
паняти ‘и обрабатывать надо как 
числа. И ‘вводят их именно как 
СТРИНГИ 6Ше и Потому, что не все 
элементы даты наи одинаково важ- 
НЫ. 

Напринер, если наша организа- 
ция ежегодно в декабре несяце по- 
вышает заработную плату тем, кто 
отработал. у ‘нас более десяти‘ лет, 
то ‘для этого важен только год. в 
КоторонН работник был зачислен. 
Если же наша организация занима- 
ется настройкой пианино и роялей, 
то каждые три месяца мы рассылаем 
всем  своин  зарегистрированным 
клиентам письнмо-напоминание о 
том, что надо бы обслужить ин- 
струмент. В этом случае нас инте- 
ресует только месяц, когда был 
последнии раз обслужен  данныи 
клиент, ‘а год и день не имеют 
никакого значения. 

Наконец, для отдела жалоб и 
претензий, которому полагается 
разбираться`с каждым заявлением в 
30-ти дневный срок, важен день и 
месяц поступления заявления. 


Итак, МЫ ВИДИМ, ЧТО СТРИНГ, 
содержашии дату, имеет важное 
значение как единое целое, но 


есть серьезные причины для того, 
чтобы вырезать из него отдельные 
части и обрабатывать их отдельно. 
Таким образом, после того, как 
дата была введена в Формате: 

ДДМНГГ или 

ДД. НН. ГГ или 

ММ. ДД. ГГ или как угодно, 


нан нужно иметь возножноств “вы- 
резать" из нее отдельно дни, 
несяцы и годы и работать с ними 


порознь, 
лани. 
Для этого нужен специальный 
оператор, и он есть. На "Спектру- 
ме” это делает оператор 
сто: 
ЕГО полная Форма, 
такая: 


но теперь уже как с чис- 


например, 


х$ (а ть 
Здесь из стринга я$ вырезается 
его часть, начинающаяся с синво- 
ла, нонер которого равен аи до 


символа с нонером Ь. 


ЕСЛИ 5$ "СПЕКТРУН", то 
х$ (5 тот) "ТРУ" 
Вы можете посмотреть, как 


это происходит, 
ошей програмны: 


на примере следу- 


12 ГМРИТ “Введите исходное слово“! 
1$ 

16 РЕТЫТ $ 

20 ТМРОТ "Начало вырезки”; а 

40 РЕТЕТ а 

50 ТМРОТ “Конец вырезки"; 6 

60 РАТНТ Ь 

80 БЕТ п$:0$(а То ь) 

90 РЕТНТ 1$; "(";а;” ТО 
п$ 

#00 5ТОР 


В некоторых других языках про- 
граммирования, а также в некото- 
РЫх других версиях БЕЙСИКа Вы! 
найдете еше несколько операторов 
для вычленения субстринга из 
СТРИНГа. Нан бы не стоило на них 
и останавливаться, но Вы должны 
знать, как Ван реализовывать те| 
же возможности, раз этих операто-1 
РОВ У Вас нет. 


ГЕЕТ$ (х$,К) - дает Ван К ле- 
вых синволов стринга. на "Спек-| 
труме” его аналогом будет: 


Х$(1 К). 


ЕГСНТ$ (53,К) - дает К правых 
синволов стринга. На “Спектруме” 
аналог подобрать труднее, прихо- 
дится пользоваться Функциеи ГЕН, 
КОТОРУЮ МЫ расснотрели ранее: 


Х$ (ГЕН (к3)-К+1 ТО ГЕН (=$)) 


НГОЗ (х$, К, Ш) - дает Вам ш сим- 
волов, начиная с к-го символа. с 
этим. оператором дело обстоит про- | 
ше: у 


х$(К ТО К+№) 


ххиииимикихикииихихкникикихикикик 
книга написана в стиле дружес- 
кого диалога, имеет большое ‘коли-| 
чество вопросов для самоконтроля | 
и упражнении с. решенияни. она 


доставит удовольствие не только| 


тен, кто сам осваивает БЕЙСИК, 
но и тем, кто передает свой опыт. 
ДрУГИН. 

общий объем книги довольно! 
велик, но мы "уложили” его в 


208 стр. стандартного Форната. | 

Спешите приобрести лицензию, а 

мы в это время планируем издание 

собственной книги “БЕЙСИК — для| 
подготовленного пользователя“. 
ваш ”ИНФОРЕОН”. 


уж 
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РОвОН й 


В прошлом выпуске "7Х-РЕВБЮ" мы 
объявили о создании совместно с 
Государственным Политехническим 
|нузеем АССОЦИАЦИЯ ПОЛЬЗОВАТЕЛЕЙ 
ДОМАШНИХ КОМПЬЮТЕРОВ и 
|"ФЛОП" (ФОНД литературы, описаний 
и програмы) и читатели уже с ин- 
|птересом откликнулись на это начи- 
нание. ы 

Нам пишут Д. Палтусов и В. Кутин 
из г. Екатеринбурга: 


Здравствуйте, господа! 
Ны хотим выразить вам глубокую 
признательность. Дело, начатое 
вани позволит сформировать нако- 
'нец-то в России рынок программ, 
периферии и литературы лая машин 
класса "Зрес1тишо". Теперь люди, 
использующие компьютер не только 
для игр, СИоГУТ рассчитывать, что 
| "родина. их не забудет”. 
ИФК: Большое спасибо на добром 
слове. Мы передаем все письма с 
‘пометкой "ФЛОП” в Политехнический 
музей Надо ‘сказать. что это их 
инициатива в создании такого фон- 
да. Мы’ же только оказываем по- 
сильную помошь в его становлении, 
[пользуясь тем авторитетом,  кото- 
РыЙ “7Х-РЕВЮ” имеет по стране. 
| И главное, что мы хотели бы 
Твидеть в итоге - это нё совсен 
"рынок программ и периферии. 
прее нан видится будущее, как сво- 
|бодный рынок талантливых людей. А 
|программы, устройства и прочее - 
это вроде как визитная карточка 
этих талантов, способных делать 
большие делать и получать достой- 
ную оплату за свой труд. 
КОРР: Мы готовы предложить 
|некоторые свои работы. Это годы 
[работы и килобайты кода: 
1. Вазе - игровая программа (92). 
2. Сопзигис&ог - КОНСТРУКТОР длЯ 
создания игр (92}. 
3. `бепегажог - редактор 
| спрайтов (91). 
4. тозла! - дисассемблер (93). 
15. Мева-веп - редактор 
| спрайтов (93). 
16. Ма1к1е914+041114у1 - редактор 
мультфильмов (92). 
7. Бъагевотаег - игра (92), 
8. Тогьо-Сору - комировшик (93). 
| ИФК: Вашими разработкани ны 
открываем раздел “Авторская про- 
|грамна” (см. соответствующий раз- 
дел). 
| КОРР: Вместе с тем, у нас есть 
несколько разработок, которые не- 
льзя считать авторскими, посколь- 
ку НЫ просто адаптировали или до- 
работали Фирменные программы. Ны 
полагаем, что авторские права на 
Иних мы заявлять не можем. Может 
быть Вы что-то подскажете? 
Это русифицированная и дорабо- 
танная версия графического редак- 
тора “АЕТЗТОРТО", русифипирован- 


Ско-: сильно подорвать желание 


’ небольшой 


ные аналоги игр серии 0127 Оли- 
вера Твинса, доработанная версия 
АССЕМБЛЕРА. "7295", 

ИФК: Дорогие друзья, мы не 
сильны в юриспруденции, но знаем, 
что кроме инушественного авторс- 
кого права есть еше и неимушест- 
венное - моральное. А это, как 
нам кажется, то, что всегда оста- 
нется с Вани, если Вы знаете, что 
сделали большое и нужное дело, то 
почему бы об этом не знать и дру- 
гИм? 

Никто не претендует на авторс- 
кие права Шекспира, когда перево- 
дит "Ромео и Джульетту", но разве 
мы бы познакомились с его произ- 
ведениями, если бы Маршак и Пас- 
тернак не приложили к делу свой 
талант и переводчика и поэта? и 
разве сегодня мы не чтим память и 
того и дрУГОГО? 

А знаете, сколько добавляют и 
отнимают режиссеры, когда ставят 
пьесу или снимают Фильм по тому 
хе Шекспиру? конечно, имя Шекспи- 
ра всегда стоит на афише, но вы- 
пающихся режиссеров народ тоже 
знает и помнит. 

Нам кажется, что адаптация 
программ вешь безусловно нухная, 
полезная и стимулировать ее ‘рас- 
ширение желательно. Тем более, 
что большинство програмнистов на- 
чинают именно с этого и занинают- 
ся этим до тех пор, пока наберут- 
ся достаточного опыта для созда- 
ния собственных програнм. 

Если создать вокруг адаптаций 
ореол "второсортности", то оножно 
будущих 
‘творцов двигаться вперед, что-то 
изучать, создавать и творить. 
Интересы нашего ‘общего дела от 
этого только пострадают. Поэто- 
му мы думаем, что для авторских 
адаптаций надо ввести свой ‘раз- 
дел, что мы и сделаем. 

Поэтому пожалуйста 
"объективки” на Ваши адаптапии 
(название, автор, дата и т.п.) и 
НЫ ВКЛЮЧИН их В Разлел. 
ихининиииикикихиикииихикиикикик 


пришлите. 


Нан пишет Скворцов Владимир 
Николаевич из города Чебоксары: 


Ассоциация пользователей до- 
машних компьютеров - это как раз 
то, что надо, это здорово! Ведь 
сколько  любитьлей компьютеров 
предоставлены сани себе. И у ках- 
дого есть свои находки, свои от- 
крыТиЯ в любимых программах и 
компьютерах. И как часто хочется 
поделиться со своими единонышлен- 
никани находками и открытиями, 
Поэтому готов сотрудничать по лю- 
бын вопросам, связанным с дея- 
тельностьр Ассоциации, 
инииниккиккиихииниииикииикиккикик 


Нан пишут из г. Ташкента: 

Привет. ИНФОРКОМ! | 

НЫ, Сметанин Юрий и Ильичев 
Андрей, проведя некоторые иссле- 
пования. хотели бы внести свой 
вклад в досье игры 


ЕЛТЕ. К сожалению, мы не получа- 


ем "7Х-РЕВЮ" за 1993 год, а хоте- 
лось бы, поэтому не знаем, но-| 


жет быть эта работа кем-то о ужей 
сделана. 
ИФК: Сейчас, когда работа поч-! 


ты стабилизировалась, мы  вновь| 
принимаем на себя ответственность 
отправлять "2Х-РЕВЮ” за пределы 
России и подписку от читателей из 
республик СНГ прининаен и на| 
93-ий год и на 94-ый, котя, прав-| 
да, для них это стоит существенно! 
дороже. Мы надеемся. что наши чи- 
татели скооперируются, ведь "син- 
клеристы” не водятся по-одиночке, 
а ведут социально-активный образ! 
жизни и выписывать "РЕВЮ" 
смогут. 

КОРР: ...Итак. мы 
значение почти всех кодов в сим- 
вольном наборе программы. (Список! 
кодов прилагается). 

ифк: Сведений о полном иссле- 
довании кодов к нам не поступало, | 
хотя Вы вероятно знаете о том, 
Что д. П. Шилин ПРОВОДИЛ ИСсследова-- 
ние кодировки слогов текстовых 


| 


сообщений (2Х-РЕВЮ Н5,6- 1992г. ) 1 
КОРР: Значение некоторых] 
кодов, а именно 2,3.4, 127 выяс- 


нить не удалось. При попытке их! 
распечатать программа "зависает", || 
а ‘некоторые коды 1,10,95... не] 
имеют печатного символа. Возможно 
это какие-то управляющие коды, 
Интересны коды 163, 167, 192. 
их значения непостоянны. На место 
знака (#) вставляется имя 


ше печатается нонер галактики, в 
КОТОРОЙ Вы находитесь. | 
как видно из анализа набора 


кодов, абсолютно все сообщения! 
состоят из 1-2 кодов. отсюда ста- 
новится возножной русификация 
программы. Над этин мы сейчав и! 
Работаем. | 

коп Значение 

1 ГАУЕ 

2. 
о 

М 

5 РЕт.: 0. 0 1.16НТ УЕАБ$ 

6 САН } 

т 

8 0.0 | 

9 св 

10 | 

11 

12 ы, | 

13 

14 И 

15 НАУ ВАУ! 1ЕУАРЕР И 

во ок Н 

17 ВООТРМЕНТ: 

18 : СЬЪЕАН 

19 : ОРРЕНОЕР 

20 : РИСТТТУЕ 

г1 НАЮМЕЕЗ $ 

28 МОЗТЕУ НАЕМЕЕ$5 

23 РООК 

24. АУЕВАСЕ 

25 АВОМЕ АУЕВАСЕ 

25 СОМРЕТЕНТ 

г2т РАНСЕКОЦ$ 

28 РЕАРЕХ 


146 


РЕЕЗЕНТ 


| 


за: 199 
символы 
псевдографики 


Совнадает со 
стандартным набором 
Графика 

?. (вопросит. знак) 
- Чюдчеркивание) 
Совпадает со стан- 
дартным алфавитом 
Графика 


ЕХТКА 


МТ5$1ЕЕ 
ТАВСЕ САКСО ВАС 

Е. С.Н. ЗУЗТЕМ 
ЕХТЕА РИЛ,5Е ТА5ЕЕ$ 
ЕХТКА ВЕАН 1АБЕВ5 
РОМ, 5СООР5 
ЕЗСАРЕ РОГ 

ЕНЕКСУ ВОМВ 

ЕНЕРСУ ОНТ 
ВОСКТМб СОНРИТЕЕ 
САГАСТТС НУРЕВ5РАСЕ 
МИЛТАКУ ГАЗЕК 
ИТЫТНС ГАЗЕВ 


ТНСОМТНС Н15511Е 
ЕНЕЮСУ 

САГАСТТС 

РОСК1НС СОМРОТЕЕ ОН 
ма. 

СТОАКТНС РЕУТСЕ 
СОММАНОЕЕ 


1$ 

Е 

он 

РУЕГ, 5СООР5 ОН 
СНАКТ 
СОУЕЕКИЕКТ 
РАТА ОК (№) 
ТНУЕНТОВУ 
БУСТЕН 

РЕТСЕ 

{#) НАЮКЕТ РЕ1СЕЗ5 
ТВООБТЕТАЕ 
АСВТОЛ.ТОРАГ, 
ТСН 


НИТ -СОУЕВНМЕКТ 
ОТСТАТОЕЗНТР 
СОННиНт5Т 
СОНЕЕРЕВАСУ 
РЕНОСВАСУ 
СОЕРОКАТЕ ЗТАТЕ 
НР 

РРОПИСТ 

ЬАБЕВ 

НИНАН СОГОНТАЕ, 
НУРЕВЗРАСЕ 

ЗНОВТ. ВАМСЕ СНАРТ 
О15ТАНСЕ 
НУРЕББРАСЕ (#) 
НУРЕВЗРАСЕ ВАМСЕ! 
НАУ БАУ! СОВТО1.15 14 
РАНСЕК! 


виа.тон 
САГАСТТС СНАЕТ 
ТАКСЕТ ГО5Т 
#155 П.Е ЛАННЕР 
ВАНСЕ 

5т 

ОПАНТТТУ ОЕ 
ЗЕ 

САВСО 

ЕООТРТ 

ие] 

ТЕХТИ.Е5 
КАОТОАСТТУЕЗ 
ЗЬАУЕЗ 
ГТО0ОВ/НТНЕЗ 
ГОХУЕТЕ5 


ИТНЕКА! 5 
бор 
РЕАТТНОМ 


СЕН ТОНЕ 
АЕТЕН ТТЕН5 
Сг 

ТАВСЕ 
ЕТЕКСЕ 
НАШ, 

СВЕЕН 

КЕО 

УЕ. Ом 


‚творческим подхолон. 


233 ВЕ 

234 ВЬАСЕ 

235 НАКНЕЕ55 
236 5ТМУ 

езт ВУС-ЕУЕР 
238 НОЕНЕП 
239 ВОНУ 

240 РАТ 

241 РУКРУ 

2ще, ВОрЕНТ. 
243 ЕКоб 

244 ГТЕАВО 
245 ГОВЗТЕР 
246 ВТЕВ 

гзт НУМАНОТО 
248 РЕМНЕ 
249 ТН5ЕСТ 
250 ЛУЕКАСЕ КАПО15 
251 сом 

252 СОНМАНТЕЕЮ 
253 РЕЗТКОУЕВ 
254 ко 

255 ОНТ ООАНТТТУ 


Колы, отмеченные знаком (’),| 
вызывают “зависание”  програнны| 
при попытке их вывести на печать. 

В символах 163.167, 192  на| 
место знака (#) вписывается иня 
планеты, 
тесь. 

Символы 7, 10, 11, 13, 14, 35, 119 
не имеют печатного обозначения и | 
печатаются как пробел. 

До свидания! Успехов Вам! 
иинкикиинкииинихнихкиикихккикикккх 


| 
на которои Вы находи-| 


Нам пишет Сороченко 
Владинирович из г. Норильска: 

Здравствуйте, редакция "7Х-РЕ- 
ВЮ"! Я большой поклонник конпью- 
тера "ЗРЕСТВОН" и Вашего журнала, 
Я занимаюсь исследованием сложных! 
имитаторов. адвентюрных и страте-| 
гических игр, В этом письме я! 
хочу предложить мое описание игры| 
ЕТСНТЕЕ ВОМВЕХ, сделанной Фирмани! 
Уесфог сгарь1с$ и Ас&1у1310п. | 

ЕТСНТГЕЕ ВОМВЕЕ - это имитатор 
санолета-штурновика. В этой игре 
прекрасная графика, идентичная| 
графике программы НАРО ОРТУТЩС, | 
сделанной Фирной РОНАЕК. 

ИФК: Огромное спасибо Сергей! 
Владимирович и за теплые слова и 
за Ваш труд. Вашу работу мы на-| 
печатали в разделе "Советы экс-| 
пертов". Вы знаете, что ны очень 
любим програмны именно этих жан-| 
ров и попали в самое сердце. 

В Вашей работе нам особенно 
понравилось то, что Вы не просто| 
“раскрутили” порядок работы с| 
программой, но и критически обсу- 
дили некоторые особенности ее ра- | 
боты. Всегда приятно иметь дело с| 


КОРР: ... В заключение прими- | 
те. пожалуйста, мои поправки к 
вашену описанию игры ТОНАНАМК. Я 
не знаю, что на карте обозначено! 
цифрами, но это не Ваши базы, так! 
как при выходе на них я не обна- 
рУЖил на зенле ничего, а при по-| 
садке по координатам никакого ре-| 
нонта не было. Ремонт. заправку и| 
перевооружение производят только 
на вертолетных плошадках, которых 
в каждом квадрате четыре. 


14? 


И еше. Поврехдение ТАОЗ - это 
|не повреждения хвостового опере- 
пния, а позреждение прибора, пока- 


Изывающего, какая цель находится в 
перекрестке прицела. 

| ИФК: НУ вот, Вы нас и проково- 
|ли. А может, мы специально такую 
|пенку сделали? Вдруг они там в 
Пентагоне тоже "7х-РЕВЮ" читают? 
йНожет, мы хотели оставить полки 
"Томагавков" без. ремонтной базы, 
|а теперь они обо всем догадаются. 
|НУ да ладно, сдерем с них пару 
| сотен миллионов ихних папуасских 
долларов за это "ноу-хау" и купин 
|себе новый джойстик. 

КОРР:...В следующем письме я 
|хочу предложить описание игры 
ОСЕАН СОНОЦЕКОЕ Фирмы Р1в1{а! 
Тпиевга\ 1оп. 

ИФК: Огромное спасибо. От души 
поиграем, как раз и новый пжойс- 
|тик опробуен. 

Ди хмхикикииикихикихиинихикиикииких 


Военнослужаший Похилюк 
из г. Славгород Алтайского 
задает следующий вопрос: 

"В нашем небольшом городе 06- 
разовалось нечто вроде клуба лю- 
|бителей "Спектруна” и у некоторых 
его членов имеются компьютеры с 
|ПЗУ "ТУРБО-90", у большинства хе, 
Лкак и У меня, ПЗУ стандартное. 
Преимушества "ТУРБО-90” налицо, и 
мы хотели бы иметь такое у себя; 
50 специалистов в этой области у 


н.п. 
края 


нас в городе мы не знаен, а вот 
сножем набрать программу, которая 
| делала бы то же самое, что ПЗУ 


смогли бы”. 

' ИФК: Сделать то же самое, что 
делает встроенный монитор этой 
ПРОШИВКИ В принципе можно. - Можно 
*выташить" нонитор из НЗУ и рас- 
полохить его ‘в 03ЗУ, изменив адре- 
сацию в нашинных кодах. Но это 
теряет смысл, так как любая про- 
гранна-монитор, расположенная в 
ОЗУ, может находиться как раз в 
той же области паняти, в которой 
находится исслелуемая программа. 
"Ведь заранее совершенно неизвест- 
|но, какая область памяти оста- 
Йнется "свобопной" после загрузки 
[интересующей програнны. Прелесть 
|"ТУРБО-90" в том и состоит, что 
монитор не в 03у, ав ПЗУ. ПРИ 
этом все ОЗУ свободно и при помо- 
ши монитора, находящегося в ПЗУ 
Вы можете “забираться” в любые 
уголки памяти и исследовать любые 
программы, загруженные в ОЗУ. Из- 
влекать же монитор из ПЗУ для 
|размешения его в ОЗУ нет необхо- 
димости, ведь это не самый лучший 
монитор. Существует достаточно 
|много програни-мониторов,  выпол- 
|вяющих все те ме Функции, что и 
монитор "ТУРБО-90” плюс еше нного 


| ДРУГИХ. Например, "НОН5-4” 
{”НОН5-3") ‘из пакета. программ 
"РЕУРАС". Это довольно ‘старая 
программа, но она до сих пор яв- 


1ляется непревзойденной по своии 
возможностям. "НОК5”, кстати, 
устроен так, что может работать в 


. В верхней части памяти, 


любых адресах. То есть, если Ваша 
исследуемая програмна расположена 
вы можете 
"НОМ5" в нижнюю часть и 
наоборот. К тому же, при помоши 
монитора "ТУРБО-90” Вы не имеете 
возножности дизассемблирования 
программы, а это очень немаловаж- 
ная Функция при исследовании ко- 
дов програнм, 

К сказанному следует добавить 
еше один любопытный Факт. В свое 
время мы сообщали о нониторе, ра- 
ботающем в ОЗУ, который находится 
В игре "ЕСОТНОХ". По своим Функ- 
циям и УПравляюшим. клавишам он 
поразительно похок на монитор 
"ТУРБО-90" (или монитор "ТУРБО- 
90" похох на монитор "“ЕСОТНОХ”). 
ЕСЛИ Вас заинтересует эта инФор- 


загрузить 


мация, то Подробности снотриТте 
"2Х-РЕВЮ”" Н 11-12, за 1991 г. на 
СТР. 254. 

и, наконец, последнее. Мы 


очень рады, что в Вашем городке 
образовалось "нечто вроде клуба 
любителей "Спектрума”. Знаем ны, 
что то же самое есть и в сотнях 
ДРУГИХ больших и малых городов, 
Мы нного раз ухе писали, что мы 
приветствуен неформальное объе- 


динение синклеристов, что это 
одна из наших главных целеи, что 
мы всегда готовы абсолютно 


бесплатно и без очереди давать 
объявления о создании и работе 
клубов, но почему-то никто этим 
не пользуется. Разве наши ‹ чита- 
тели не хотят наладить связь 
между клубами напрямую? Разве это 
не НУЖНО? конечно, кое-какую 
информацию о своен компьютере Вы 
получаете из "7Х-РЕВЮ", но мы 
ведь не. можен объять необъятное, 
Объединяйтесь, обменивайтесь ин- 
фориацией напряную, мы не боимся 
конкуренции, а наоборот окажен 
любую помошь для свободной цир- 


куляции информации нехду клубани, 
киккимихикиккиикикх их нииикимихихи 


По поводу ПЗУ "ТУРБО-90" приш-` 
ло еше одно письно от нашего чи- 
татёля из Ульяновска“ - Силан- 
тьева М. 

Он исследовал эту прошивку ме- 
тодон "теневого ПЗУ", Таким спо- 
собом это делать очень удобно, 
если в Вашем компьютере прелус- 
нотрена такая возножность - тене- 
вое ПЗУ, загрухжаеное в ОЗУ. — Для 
тех, кто не знаком с этим, с006- 
шаем, что такая возможность есть 
у конпьютеров, имеющих две “ли- 
нейки" микросхем памяти - отдель- 
но основное ОЗУ и отдельно экран- 
ная память. При этом. если после 
рестарта компьютера. сделать РЕЕК 
АРВ, Где АБР = 0...16383. то чи- 
таться будет ПЗУ, но если подать 
команду РОКЕ АБ, то будет снела- 
на запись в область памяти озу, 
являющейся “теневой” для ПЗУ (в 
данный момент она неактивна и ни- 
как себя не проявляет). Можно 
даже сделать  ЗАУЕ  *5У5"СОБЕ 
0, 16384 на компьютере, имершем, 
например, монитор "ТУРБО-90". А 


потом загрузить его в свой ком- 
пьютер, (имеющий стандартный но-1| 
нитор) командой ГоАр "5у5"СОБЕ 0. | 
для того, чтобы переключиться на| 
эту "теневую" прошивку, наш чита-1 
тель Силантьев Н. пользуется 
тумблером. В "Новосибирском" ва-| 
рианте такое переключение выпол- 
няется командой ОПТ 15,0. 
этон переключается триггер, 
ключаютий основное ПЗУ и подклю- | 
чающий теневую область ОЗУ. При| 
этон активным становится загру- | 
женный нонитор, а основное ПЗУ - 
пассивным. Теперь ножно восполь-| 
зоваться дополнительными возмохж-| 
ностями, заложенными в этой про-| 
шивке. ‘Для того, чтобы переклю-| 
читься обратно на основное ПЗУ, 
надо опять выполнить команду 
ОПТ 15,0. Определить, какое ПЗУ| 
в данный момент является актив-| 
ным, ножно, например, по начер-| 
танию символов: В “ТУРБО-90* оно| 
несколько отличается. Ножно по-| 
дать конанду НЕМ. тогда будет! 
выведено Фирменное сообщение об 
используеной версии. 

После этого отступления  ны| 
возвращаемся к письму нашего кор-| 
респондента. 


| 


КОРР: "У меня обнаружилась од-| 
на неприятность. Первые 5 байтов 
теневого ПЗУ самопроизвольно 
изменяются после первого  же| 
обращения к ним. Если попытаться! 
вывести значение этих ячеек! 
конандой: 

РОБ +-0 ТО 10:  РЕТ РЕЕК Е: 
НЕХТ + 


то первые 5 байтов имерт нулевые 
значения. А если поочередно. 
давать команлы: 

РЕТЫТ РЕЕЕ 0 

РЕТЫТ РЕЕК 1 
то печатаются неизвестно, откуда 
взявшиеся числа. При попытке 


восстанавливаются", Дизассенбли-| 
рование этих первых 5 байтов дает 
какую-то абракадабру. Из за этого 
неправильно обрабатывается под- 
программа ВЕЗЕТ (ВАНРОНТЕЕ 958 0) 

ИФК: Мы проверили то, о чен 
пишет наш читатель ва "Новосибир- 
ском" варианте Спектрума и убеди-| 
лись, что этот компьютер ведет! 
себя в точности так же. В чем же] 
тут дело? Может, кто-нибудь из 
читателей сталкивался уже с по- 
добной проблемой? Или хотя бы 
знает причину этого явления? Если| 
такие есть. откликнитесь, пожа- 
луйста. | 
хннихиииикииикхикккиникииккхкикикхх | 


Дорогие читатели, Вы помните 
заметку "НАЛЕНЬКИЕ ХИТРОСТИ” в 
5-6 выпуске "РЕВЮ" за этот год, 
где на стр. 96 было опубликовано! 
сообщение Радзевича А.А. из. г. 
Нальчика? Оно касалось любопыт- 
ных эффектов, возникающих | 
исполнении оператора КАМ. 
никто не ответил на вопрос 
это происходит?” . Но. ны ) 
стороны провели небольшой розыск 
по зарубежным журналам и оказа- 


1ав 


лось, ЧТо этой проблемной занима- 
емся не только мы. Вот что ны 
памли в ирньском номере журнала 
"БТУСЬАТВ  ОБЕК” за 1986 г. (Но. 
51} на стр, $5. Там ПРИВОДИТСЯ 
инесколько иной вариант программы, 
воспроизводящшеи Такие эффекты. 
То т п: 1 

10 РАРЕК 0: ПЕК 4: 
| 20 БОР а:51 ТО 
25 Тл по 

| 30 РЬОТ_ 65, 30 

| 40 РРАМ ЗНУЕРЗЕ п: 120; 120, РТка 
| 50 МЕХТа 

| Были и другие 
| тон журнале, например №5. 1986, 
но СУТЬ не меняется все это 
разные модификации той же идеи. 
К сожалению, намеков на ПРИЧИНЫ 
проискодяшия на экране эФ®Фектов 
там нет. Итак, проблена остается 
Йоткрытой. хоть И приобрела  неж- 
дународный характер. 

инк кки кии и ними икикни ий инкихикнии 


ВОВПЕК 0: СЕ$ 
10000 5ТЕР 100 


публикании в 


| нам пишет лярсмии С.С. из пос. 
Березовский Свердловской обл: 


| Уважаемые коллеги! 

1 Разремите мне поделиться с Ва- 
Ани своими соображениями по поводу 
]летифраций ПОРТОВ в "Левинграде”. 
Если человек впервые собирает та- 
кую конструкцию как компьютер и 
Деше если они его сумеет довести до 
того состояния, в котором он  ма- 


ло-мальски работает, - этот чело- 
вырк, конечно, радуется тому, что 
у него ест Компьютер, ЧТО ИГРУШ- 


|ки играются, что програнмы с рабо- 
тают и т.д. Но это только первое 
|вреня. Дальше наступавт непреодо- 
лимое желание усовершенствовать 
свою нашины, расширить ее возмож- 
Йпости, а если еше У Вас такая 
“сырая” штуковина, как первый 
ВЫПУСК "Ленинграда" - бери в руки 
паяльник, напрягай нозги и 
ред с песней". 

'усовершенствований хватит на 
всю оставшуюся жизнь. Это, конёч- 
но же. не упрек авторам Ленин- 
градской версии, 

Очевидно, их задачей было сде- 


лать наиболее простую, дешевую и 
более-менее “Спектрум” -совмести- 
мую нашину. Возможно, ин и уда- 


лось решить задачу простоты, но 
что касается дешевизны и’ совмес- 
тиности - это большой вопрос. Вот 
и мне, после сборки и наладки та- 
кого "Ленинграда", пришлось стол- 
кнУТЬся с тен. что не все игры, а 
конкретно "ВЕСЕ ТЕЕ" работают от 
пжойстика. Я стал советоваться с 
друзьями и те, кто раньше меня 
собрали и немного освоились с 
этин компьютером, — посоветовали 
подать логический "0" на три ста- 
РШИХ разряда порта джойстика. Но 
после того, как я это проделал, 
некоторые игры, ‘например, "ЕХО- 
ГОН", зависали ` после загрузки и 
запуска Бейсик-загрузчика. Тогда 
я стал разбираться с  Нонитором, 
зашитым в зу и понял, что’ при 
существующей дешифрации портов в’ 


"впе-. 


= РОРОМ | кое 


"Ленинграде" ‘таких накладок мне 
не избежать. Искодя из этих сооб- 
ражений и еше прочитав разработку 


НТК “ПЛЮС” по интерфейсан “”Спек- 
трума", родилась схема, которую я 
Ван и предлагаю «приведена на 


следующей странице). 

В своем "Спектруне" я исключил 
две никросхены 555кП!{, которые 
использовались для чтения клавиа- 
туры, магнитофона и дхойстика. 
Никросхену 555ТМ9 я оставил как 
выводной ПОРТ с адресом "РЕ", до- 
бавив две никросхемы 555АП5 для 
чтения клавиатуры и магнитофона и 
с учетом дальнейшего расширения 
возножностей ноего компьютера до- 
бавил параллельный порт 5808855, 
включив его по рекоменлациян НТЕ 
"ПЛЮС". только с более жесткой 
дешифрацией портов. В этой схеме 
я использовал свободные инверторы 
"Ленинграда", а также элементы, 
которые выделяли сигналы ТОКр’ и 
ТОМЕ” {014.1!, 014,4). 

Сигналы по схеме: 

С2 - запись в порт "ЕЕ", 
С3 - чтение порта “РЕ”, 
сигнал ©! - вспомогательный. 

Если не устраивает жесткая де- 
шифрация, можно исключить элемен- 
ты 041.1 и 1042.1 и тогда внесто 
сигнала С1 на входы 4 < 142.2 и 
12 - 042.4 подать сигнал ГОВо’. 
Адреса внешних портов нс 5808855 
будут следующие: 


"1Е" - чтение, запись порта 
"А" (порт джойстика); 

"ЗЕ" - чтение, запись порта 
ж 

"5Е" - Чтение, запись порта 
а Н 

"ТЕ" - Регистр управляющего 
слова. у 

Вот, пожалуй, и все по поводу 
этой схемы, 

НФК: Нас, как и большинство 
наших читателей, очень интересует 
все, что касается совершенствова- 


ния компьютеров в плане повышения 
их совместимости с Фирменныни но- 
делями. Такик работам мы даем 
“зеленую улицу" и принимаем их с 
особой ‘благодарностью. 

Приносим свои извинения нашим 
читателям за нестандартный вид 
схемы (мы уже говорили о слохжнос- 
тях исполнения графических работ 
в текстовом редакторе}, а для 
Работы в графической среде у нас 
не хватает кадров и времени. Так, 
например, инвертированные сигналы 
вместо общепринятой черты над 
обозначениен сигнала у нас отне- 
чены знаком (’) - апостроф. 
хиимиинихиихиикииккмикикуимикииниии 


Нам пишет 
г. Улан-Удэ. 

Здравствуйте, ИнФоркон! 

Большое спасибо за очень. нуж- 
ный и интересный журнал. Поднис- 
чиком я не являюсь, но регулярно 
пользуюсь Вашини разработками и 
работаю с журналом. Беру я его У 
знаконого, “товариша по Спектру- 


Стас Рубцов из 


ну", если можно так сказать. он 
является Вашим подписчиком с са- 
ного первого / выпуска. Так чтой 
нне, ножно сказать, повезло. 

ИФК: Спасибо на добром слове, | 
Стас. Мы очень рады, что у Вас! 
есть хороший друг. На Вашем при- 
нере еше раз посоветуем всем, кто! 
нас читает, объединяться и еше!/ 
раз объединяться. Новые повышения! 


| 
цен на печать в конце этого года! 


поставят Вас перед необходиностью! 
существенных затрат на вздорожав- 
шее "РЕВЮ" и только единение по- 
может выхить и Вам и нам. | 

КОРР:... Работаю я на 7х-сов- 
нестиной машинке “дельта-С”. У| 
нас в городе "дельты" разошлись! 
по рукам за две недели -`по самым 
предварительным сведениям - три! 
партии по 800 штук. Были ли ете| 
пертии, я не знаю. во всех Ваших! 
журналах нет ни одного слова о! 
компьютере “Дельта-С" и это может 
Говорить либо об ограниченном его! 
распространении либо о`его полной! 
совместиности с Фирменной наши-| 
ной. Ни то ни другое не соответ-1| 
ствует действительности.  "Дель-| 
та-С" распространена и в Тоиске, | 
и в Иркутске и в других городах, 


в Москве я видел в Фирменном| 
"Московском" (на пломади трех! 
вокзалов). Работаю я с “дель-| 
тои-С" год, и хочу сказать нес-| 


колько слов 06 этой машинке. По 
ноин сведениям, "дельта-С" выпус- 
кается по меньшей мере на трех! 
заводах. У меня вариант Курскоги 
завода (305040, Курск; ПО "ПРИ 
бор"). Оформление машины не очень! 
хорошее, в частности, "жесткая 
контактная клавиатура. не очень! 
качестненно сделан ‘вывод звука, 
неважный внетний вид. Однако тех- 
нически мамина прекрасная. 
встроенный 7Х-интерфейс ТТ, 
ризированный выход на 2Х-принтер. | 
Несовместина "Дельта-С" с Фирнен 
ным "Спектрумом" только в одном. | 
ПРи наличии в программе вариаций 
на тему “РОКЕ 23510, 16" `- вывод. 
заголовков типа "ВУТЕЗ..." и ДР. 
на принтер, из-за ошибки в схеме 
не проходит номер с подпрогранмой| 
ПЗУ "СОРУ-ЬТНЕ" по 
ОРОС-0Е13 (СОРУ-Ь-2г), 
принтер не подключен, 
“виснет”. - 

выход очень прост. Надо “под- 
ключить" принтер, дать ответ ‘из 
принтера по линии "ВИ5у" - "за- 
нят", что принтер не готов к 
приему информации. Но так как не 
у всех есть Фирменный 7Х-принтер, | 
советую всем столкнувшимся с этой| 
пробленой просто подать на вход 
"ВИбУ" уровень "ЛОГ 0". Я посту-| 
паю так: соединяю на разъеме вы- 
вод Азг "ГТ" (готовность принте- 
ра), ° соответствующий сигналу. 
"Во5У" с выводом А5(Аб) т.е. с 
общими проводом, через резистор 
4,5 кОм, при этон не надо разби-| 
рать компьютер. После такой пере- 
делки все программы идут, как на 
Фирменной нашине. 
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Рис. 1 
Краевой разъен платы. о 
Звук ножно вывести на усили- 


тель. для этого на свободном мес- 
(те (на задней стенке компьютера) 
Пмонтируем гнездо СГ-5, вскрываем 
компьютер, находим единственный 
‘проводник, ведущий к звукоизлуча- 
|телю (от транзистора на плате) и 
в тоне самое место припаиваен ни- 
НУСОВЫЙ вывод конденсатора 
ВК5О-3 10 мкФ х 12 У, плюсовый вы- 
вод припаиваем к контактам “1” и 
"4" на СГ-5, а к контакту "2” на 
тон же разъене припаиваён “массу” 
компьютера (перемычку от контакта 
|"2" разъема "+58" либо от контак- 
та "2” разъема СВ), 

| Хотелось бы, чтобы изготовите- 
йли "Дельты-С“ учли эти вопросы в 
своих разработках. 

ИФК: ОТ всей души присоединя- 
емся к этому пожеланию и дунаен, 
что независино ни от чего Ваши 
реконендации поногут многим люби- 
телян повысить совместимость 
|своих машин. 

КОРР: ... Я прошу извинить ме- 
|ня за то, что получилось так, как 
будто у: "Дельты-С* есть сушест- 
венные недостатки. Это прекрасная 
нашина и это видно даже по печат- 
ной плате. жалко только, что к 
рнену не прилагается принципиаль- 
ная схема. Момет быть его произ- 
водители учтут и этот момент? 
Пимиииииин ни ии ии ниинииииниимикии 


| По вопросам совместимости раз- 
йличных версий “Спектрума” нам пи- 
|шет из Иошкар-Олы Москвин Денис 
ЕГОРОВИЧ: 

Адресую свое письмо в раздел 
|"Форум" хурнала "7Хх-ревю", так 
как хочу поделиться своим откры- 
тием в области совместимости кон- 
пьртера "Пентагон 48" с Фирменным 
"2Х-бресагшо”. 

В последнее время 48-е наши- 
|йны вытесняются 128-нми, но мне еше 
раз хотелось бы остановиться на 
[48-м "Пентагоне". 

В ваших хурналах опубликова- 
но иножество статей, посвешенных 
совместимости "Пентагона", но 
(среди них не оказалось статьи о 
том, почему не работают на “Пен- 


тагоне" такие всем известные про- 
грамны, как "Соьга  54а1опе“, 
"Вепеваае-1", "54г. Намк” и т.п. 
Нне бы хотелось, чтобы этот про- 
бел был восполнен. 

Эти программы и ин подобные 
не “идут” потому, что в “Пентаго- 
не" не коннутируется сигнал ЧАТ 
(ожидание). Этот сигнал, как ока- 
залось, в Фирменнон конпьютере 
используется для разрешения кон- 
Фликтов паняти, вызванных регене- 
рацией нижней области 03У, где 
хранится содержимое экрана. 

Скомнутировать сигнал ЧАТ 
можно с помошью триггера. В "Пен- 
тагоне" это  микросхена тнг 
(2011), расположенная в нихней 
части платы компьютера рядон с 
никроскемой ЛИ5, с которой выво- 
длятся цвета (р, С, В) и яркость 
(7). 

Если сигнал УАТТ подключить 
согласно приведенной ниже схеме, 
то. можно будет смело загружать 


“Вепеваае“, т.к. она будет рабо- 
тать! : 
рр 11.2 
тт 4 


МАТТ (280) 
> 


< 5 
ВАН” 
Рис. 2 
Здесь на схеме: 
$ТТ - это вывод 12 м/с 001.3 
(ЛН1 - на плате она одна); 
РАН’ - это вывод 11 0018.1 (ЛАЗ - 


ее легко найти, т. к. именно к 
выноду 11 ‘подключена перемычка, 
ухопдяшая под процессор); 
МАТТ - это вывод 24 микропроцес- 
сора. | 
Таким образом, если попытожить 
все исправления "Пентагона", опу- 
бликованные в Ваших журналах, то 
“пентагоновская” версия 48-го 
станет полным аналогом фирменного 
ЗРЕСТВОМАа. й 
Данная доработка опробована на 
5-ти конпьутерах. опыт показал, 
что при подключении сигнала  чА!Т 
к процессорам КР 1858 БМ! (совет- 
ский аналог 780) программы Соьга 
и Вепеваае все равно не работают. 
Видино, это проискодит из-за не- 
правильной системы прерываний у 
данного процессора, 
ицимиинииикикиииниикиииккикикиких 


Нам пишет Гасин Руслан Влади- 
НИРОВИЧ ИЗ Нагадана. 


Здравствуйте, уважаемая редакция! 

Я являюсь недавним Вашим чита- 
телем (подписчиком). Основной це- 
лью» подписаться на Ваш журнал 
было желание научиться работать с 
нашинными кодами, описание про- 
грамм (в основном системных), 
взлом (а вернее техника зашиты) 
програнн. 

Ну что х. В принципе я удовле- 
творен. Нне понравилась инФорна- 
ция, представленная  Микайленко 
В.С, Все это Яорошю. Но я дунаю, 
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что многие согласятся со нной, 

Я предлагаю хоть ЧУТЬ-ЧУТЬ 
расснотреть технику зашиты прог- 
рамн на диске (в систене ТЬ-105). 
Конечно, можно заявить. что с 
дисководом работают не так ужи 
иного пользователей 7Х-ЗРЕСТВОМ. 
Я сам только подумываю о нен 
(дисководе). Но я и не требую 
доскональных данных о зашите (на 
дискетах). Отталкиваясь от Ваших 
ме принципов (дать общую методи- 
ку, ищер, направление, а люди 
сани додунают), можно дать лишь 
общие сведения. Например, такую. 
На диске есть директорий, — он 
“ГОВОРИТ” © длине, расположении 
Файлов и т.д. Так почему бы не 
сделать так. чтобы на диске был 
файл, ‹но операционная система не 
ногла ни вывести его название, 
плину в директорий, ни запустить 
на выполнение без разрешения 
пользователя. Конечно же, все это 
выполнимо, и что-то молно сде- 
лать? Но не хватает сведений о 
Тк-005 (ее переменных и т. д. ) 

Естественно, это не совсем за- 
шита от взлома, а скорее от не- 
санкционированного доступа к про- 
грамме. . я 

очень ПРОШУ, напечатайте ное 
письмо. Вдруг, кто-то откликнется 
и расскажет, что знает. А от Вас, 
если это произойдет, зависит то- 
лько вопрос - напечатать или нет. 


Но я думаю, что одну страницу не 
грех будет отдать. 
Надеюсь, что мое письмо не ос- 


тавит Вас равнодушными. 

иФк: Увахаемый Руслан Владими- 
Рович, здесь двух инений быть не 
ножет. Голосуем "за" единогласно 
и безусловно дадим все, что соч- 
тут вужным сообщить наши читате- 
ли. Но, кажется на горизонте по- 
явилось кое-что поинтереснее. Ны 
имеен в виду операционную систе- 
му 15-005. Ннение знакомых спе- 
циалистов, опробовавших ее, 
нодушное - ЭТО БЛЕСК, 
действительно превращает 
ТРУМ” в полупрофессиональную ЭВН. 
Впрочем, пока СТОП... мы находин- 
ся в начале пути, информация пока 
скудна. но не исключено, что сле- 
дуюший год пройдет под знаком 
иненно этой системы. 
нинииииикиииниииининиииинихииниииих 


Нам пишет Алексей Хильцов из 
Санары: 

Я хочу сообщить Вам об особен- 
ности игры “Реаёв №135-3”. Если 
встать в доме под окно и нажать 
"У", но на экране появится план 
Улицы и прицел, двигая которым и 
стреляя, нохно расстеливать про- 
бегаюших бандитов. Только нухно 
следить, чтобы сзади никто не по- 
дошел, иначе будут проблены. 
иикикиикининиииииккинииинииикикик 


Нногие наши читатели халуются, 
что мы мало внимания уделяем ап- 
паратной части. Это так, но если 
Вы вспомните, ны уже писали, что 
У истоков "ИНФОРКОНа*" и "7Х-РЕВЮ" 
стоял коллектив по своей квалиФи- 
кации скорее преподавательский, 
чен технический. Поэтому апва- 


ЕОВУН 


ратные вопросы мы всегда отдавали 
другим. Сначала нан. помогал в 
этом НТК "ПЛЮС", а сейчас, когда 
эта ‘фирма’ увы больше не работает, 
мы можем только опираться‘на Ваши 
письма, увахаеные читатели. Писем 
с программами или програмныни во- 
просами намного больше, чем с ап- 
паратными. И ‘тен ценнее для нас 
каждое письмо, в которон так или 
затрагиваются аппаратные 
и коль ух сегодня ны 
дали некоторые рекомендации по 
возножным доработкан ”дельты-С", 
то очень кстати будет и сообщение 
нашего читателя из г. Норильска - 
Галушака Александра. Вот что он 
пишет: 


*В Норильске много владельцев 
ик “дельта-С", ио многим из них 
не нравится, что в “Дельте” нет- 
порта КЕМР5ТОН-лхойстика. (Я по- 
дозреваю, что в СНГ существует 
немало ‘типов конпьютеров без 
КЕНР5ТОН-дхойстика. 

‚Я подключил джойстик к "Дель- 
та-С” своему товаришу и хочу по- 
целиться опытои с читателями 
"2Х-РЕВЮ". 

Собран интерфейс КЕМР5ТОН-пхой- 
стика на двух микросхемах, уста- 
яовленных на небольтой печатной 
плате, и соединяется с 2780 три- 
надпатью проводами, включая нита- 
ние. 

Я обратил внимание, что на 
"Дельте-С” вместо двух микросхем 
2764 используется одна никросхена 
27128, а место для второй мик- 
Росхемы - свободно. Поскольку на 
ПЗУ выводятся почти все необходи- 
ные для интерфейса джойстика сиг- 
налы (кроме ОКО и ВП}, то я раз- 
работал печатную плату в расчете 
на то, что она будет установлена 
ча место неиспользуеной никросе- 
мы 2764 (П3У-1) и соединяться с 
основной платой компьютера корот- 
кими гибкими проводами. Распопо- 
зенный такин образон интерфейс 
размещается внутри корпуса компь- 
ютера ничему не мешая. С разъемом 
КЕНР5ТОН-дхойстика дополнительная 
плата соединяется шлейфом (6 хил) 
необходимой длины. 


пиТЯниЕ: 
00: 8-08 
002 ?-0в 


00116-58 
002:14-58 


Возможны и другие решения. |: 
частности, если в ИК используются 
г никросхены 2164, то  ножно 
использовать эту хе печатную пла- 
расположив ее над процессорон 
и соединив непосредственно с 
|выводани 780. 


данная схема в наладке не нух- 
дается, при использовании исправ- 
кых конпонентов, и доступна для 
повторения для любого радиолюби- 
теля". 

ИФК: Александр готов ответить 
на любые вопросы, возникшие при 
изготовлении интерфейса и дает 
свой адрес: 


663305, г. Норильск Краснояр- 
ского края, ул. Талнахская, пон 
27, кв. 139, Галушак Александру 


Просьба вкладывать конверт с 
обратным адресон. 


КОРР: "Мои предложения беско- 
рыстны, просто я надеюсь найти 
люцей, с кем я мог бы обменивать- 


ся инфорнацией по “7Х-бресагшо", 
литературой и програмнани. 


Ете, если есть такие вопросы, 
МОГУ выслать рисунок печатной 
платы для 2Х-ГРЕТНТ-3 (описание 


которого было в "РЕВЮ-91" Н Т-8). 
Этот интерфейс принтера нною соб- 
ран и благополучно работает уже 
год". 

ИФК: Спасибо, уважаеный чита- 
тель за интересную информацию, за 


прухескую помошь тем, кто в ней 
нухдается, И нам, поверьте, было 
очень приятно узнать, что опубли- 


кованная у нас схема интерфейса 
принтера собрана и благополучно 
работает. 

ккикникиинин иикииииниикикхикикикк 


В работе с письмами наших чи- 
тателей нередко один вопрос вы- 
зывает другой. Вот и сейчас так. 
Олин наш читатель успешно решил 
проблену подключения джойстика, 
ДРУГОЙ ПЫТается найти подходы к 
подключению “ныши”. Матвеев Ю.Н, 
из Кемеровской обл. просит оТ- 
кликнуться тех, кго мохет ‘что-то 
подсказать по этой проблеме. Он 
также был бы рад познакомиться с 
целью переписки с "синклериста- 
ни", любящими занинаться коработ- 
кани своих нашин. 


$52692, Кемеровская обл., 


с. Горскино, 


ГУРЬеВСКИЙ Р-Н, 
матвееву Ю.Н. 


В заключение передаем увахжае- 


момУ корреспонденту планенный 
привет от редактора раздела 
"К.Н, " Матвеева Ю.А. 


Хим никхиижииикининиккиижиинуики 


как добро и зло, как плюс и 
минус не могут сушествовать друг 
без ‘друга, так не ногут существо- 
вать отдельно друг от друга ‘воп- 
РОосы зашиты и взиона программ. 
Ситуация складывается примерно 
так. Появаяются новые разновид- 
ности зашиты, существующие ка- 
кое-то вреия, затеи они раскалы- 
ваются, появляется литература на 
тену о зашите и ее снятии. Новые 
варианты зашиты разрабатываются 
ужё на оёнове систематизированно- 
го натериала по снятию зашиты. 
появляются новые. более изошрен- 


ные способы взлома и процесс про-° 


полжается дальше, заныкая очеред- 
ной виток эволюционной спирали. 
Кто сделает следующий код в этой 
бесконечной игре? 

Мы уже печатали натериалы по 
затите програмы, хорошо осознавая 
тот Факт, что этин ‘материалом 
пользуются как те, кто  зашишает 


свои програнины, так и те, кто их! 
после этого взланывает. сегодня 
ны предлагаен материал, прислан- 


ный Григорием Борисовичен Луппо- 
вым из ` города Кирова. На наш 
взгляд им как раз могут результа- 
тивяо воспользоваться разработчи- 
ки зашиты. в то же время для 
"взлоншика” - здесь всего’лишь 
общие Фразы. 


вот что пишет нам корреспон- 


дент; “Я ‘в общем-то серьезно 
“Спектруном” не занимаюсь. - боль- 
ше спец по “Вектору 054". Однако 
имею "Пентагон &8К" и с удо-и 


вольствием читаю "7Х-РЕВЮ", когда) 
удается выпросить его у знакомых! 
"спектруновшиков”. В номере 1-2| 
за 1392 г. увидел статью по заши- 
те, а зашита программ - дело оди- 
наково актуальное для всех быто- 
вых персональных ЭВН в конФигура- } 
ции с нагнитофоном. Хочу предло-| 
хить Вашену вниманию свой ‘взгляд 
на этот вопрос. я | 

В ходе долгих размышнении и 
поисков вариантов зашиты програмы] 
для *Вектора", я пришел к выводу, 
что действительно, для магнито- 
Фонных версий ПЭВМ надежной заши- 
ты нет! Все способны зашиты, кото-| 
рые существуют на "Спектруне”" 
это своего рода искуссные, краси 
вые трюки авторов, крайне недол 
говечные. Эти трюки в целон проб-| 
лены не решают. Бнешне это выгля-| 
дит так: автор, петляя и извора-| 
чиваясь,. как заяц-русак, ны 
ется сбить со следа волка-взлом-| 
шика. Результат один - заяц поги- 
бает. | 

Нукно применять другой подход, 
Зашита доляна быть простая, от- 
носительно несложно ставиться, но! 
самое главное - она должна быть! 
трудоемкой для снятия и легко мо- 
дифицируеной (на случай, если од- 
ну модификацию сняли). 

Предлагаю классическую схему: 
основная програмна в своем форма- 
те (отличном от стандартного), | 
впереди идет закодированный заг- 
рузчик с ‘декодировшиком в Формате 
"Спектруна”“ и не обязательно с! 
автозапускон. И 

Слабость скемы очевидна - де- 
копер всегца ножно просмотреть и! 
разобраться в принципе его рабо- 
ты. Поэтому процесс декодирования! 
должен включать в себя несколько! 
основных положений. й 

1. декодирование с использова-1 
нием всего адресного прост} 
ранства конньютера. к 

г. декокирование Сс 
по времени. | 

3. Перекод на декодированный| 
загрузчик должен быть неочевидным 
(чтобы нельзя было вставить пёре- 
ход на взламывающую подпрограммуй 
после декодировки). он ‘должен 


полвязкой 
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|быть включен в  закодированный 
итекст и декодироваться последним, 
то есть декодирование идет от 
старших адресов к младшин. 

4. При декодировании использу- 
ются псевдослучайные числа. 

В начале работы декодер заби- 
вает все свободное, пространство 
ОЗУ (и видео-0ЗУ в том числе) 
псевдослучайными числами. Генера- 
тор таких чисел должен быть: 

а) последовательным - это зна- 
чит, что п-ое число можно полу- 


чить только после получения всех 
предыдущих чисел; 
5) параметрическим - это зна- 


чит, что получаемая последова- 
тельность будет зависеть от пара- 
метров генератора, то есть гене- 
|ратор легко перенастраивается. 

Числа в память должны за- 
носиться не подряд, а либо через 
какое-то смешение (не равное 1) 
либо по случайным адресам ‘(это 
пучше), например, первые два бай- 
та из генератора определяют ад- 
рес, третий байт ‘- данные. 
Естественно декодер и загрузчик 
меняться не должны. 

Затем декодер начинает не- 
йоосредственно свою работу.  деко- 
дирование идет сверху - вниз. Для 
получения очередного байта над 
ним нухно проделать ряд операций 
с использованием данных из озу, 
|адресуемых несколькими маркерами. 
[Маркер - циклически бегающий по 
{адресу декодера; маркер - цикли- 
чески бегающий по всему ОЗУ и ИЗУ 
| (кроме декодера и загрузчика); 
случайный наркер - обеспечивающий 
определенную зашиту от резидент- 
ных взломшиков. — Время-зависинмые 
данные (регистр В или ячейка-тай- 
мер) обеспечивают зашиту от эну- 
| лирования декодера пиратскин 
| ззломшикон. 

После декодирования управление 
передается на загрузчик. Так как 
|содержиное памяти загрузчику из- 
вестно, то он может загружать 
(декодировать) программу, исполь- 
зуя содержимое  паняти (однако 
снижается при этом  техкнологич- 
ность и нодиФфицируеность замиты). 
загрузчик долхен иметь гибкую 
СТРУКТУРУ, ЧТОобЫ загрухаеная 
Программа легко перехватывала уп- 
Правление в любое время. Лучше 
всего использовать блочный Фор- 
|мат: вся программа разбивается на 
блоки по 32, 64 или 256 байтов; в 
начале каждого блока идет заголо- 
вок с адресом загрузки, в конце - 
'байт-паритет КС. 

Программа может иметь и внут- 
Преннюю защиту, включающую провер- 
ку наличия в памяти меток о рабо- 
те декодера и загрузчика и т. д. 
Это можно сделать на авторских 


програннах, но не на чужих. 
для большей модифицируености 
Южно применять плавающую 


константу чтения, которая. либо 
изменяется по определенному алго- 
ритму, либо содержится в таблице. 

технологичность зашиты обеспе- 


ный особым образом загрузчик и 
использовать его затем на разных 


программах. Как только зашиту 
вскроют (ничто не вечно под ЛУ- 
ной), можно изменить параметры 
генератора случайных чисел и таб- 
лицу констант чтения, "Пирату“" 
придется повторять ‘° весь трудоем- 


кий процесс вскрытия. Трудоем- 
кость определяется тен, что нухно 
энулировать ОЗУ так, чтобы там 


был и набор псевдослучайных чисел 
и нпират-энмулятор декодера: Это 
ножно сделать с’ использованием 
дисковода или дополнительного озу 
(в 128К версии). Однако при этом 
будут изменяться вренмя-зависимые 
данные и процесс декодировки на- 
рушится. Если программа рассчита- 
на на версию компьютера с нузы- 
кальным процессором, то последний 
можно использовать. в качестве ге- 
нератора вреня-зависимых данных. 

Не могу ничего посоветовать 
относительно борьбы с "НАСТС", 
т.к. не знаю тонкостей работы в 
этом режиме. Однако многие прог- 
ранмы после обработки кнопкой 
”НАСТС" не работают, значит при- 
дунать что-то ножно”. 

Натериал этот чисто теорети- 
ческий, у многих ножет вызвать 
вопрос типа; "Это все складно 
звучит, но как же все это практи- 
чески реализовать? Где конкретные 
принеры, демонстрирующие излохен- 
ные принципы?” Примеров действи- 
тельно нет, так как любой практи- 
ческий пример приведет к снижению 
во много раз долговечности заши- 
ты, сведя на нет все усилия авто- 
ра програмны. Хорошая ‘теория - 
это уже больше половины дела. А 
как это конкретно воплотить в 
хизнь - как говорится, думайте 
сани, решайте сами, .. 

ИФК: Но ГРИГОРИЙ Борисович, 
видимо предвидя подобные вопросы, 
все же продолжает нисьмо конкрет- 
ным примерон, предлагая зашитный 


Трюк, связянный с блоками без 
заголовка. 
КОРР... Копиры определяют ко- 


нец такого блока, если при выхо- 
де из подпрограммы ТОАБ_ВУТЕЗ 
установлен Флаг 7. Подпрограмна 
загрузки бита имеет вид: 


05ЕЗ САШ, #05ЕТ 
05Еб РЕТ НС 

05Е7Т 10 А, #16 
05Е9 ПЕС А т 
О5ЕА Л НР, #05Е9Э 
О5ЕС АННО А 

О5ЕР 18С›вВ 

О5ЕЕ БЕТ 7 

0528 Л 2,#05ЕБ 


Если долго не появляется смена 
уровней (Фронт сигнала), то поди- 
рогранма досрочно возвращает уп- 
равление, Такая ситуация возника- 
ет как раз при загрузке Файлов 
без заголовка, если задана Фик- 
тивная (большая) длина. Трюк зак- 
лючается в том, чтобы выгружать 
такой блок как ножно более длин- 
ным. То есть сначала ны рассчиты- 
ваем байт-паритет (КС),  идуший в 
конце каждого блока, и записываем 
его в конец Файла в виде данных, 
а выгрухаем Файл с максимальной 
длиной. При загрузке все будет 


норнально, так как мы’ знаем ре- 
альную длину блока и загрузим егой 
без проблем. У тех же утилит, ко- 
торые не знают реальную длину 
(ПРОоГРаммы-Копировшики),  возник-| 
нут проблемы со свободной — па- 
нятьр. Конечно, . можно обрезать 
такой Файл, однако нет гарантии, 
что обрезали только ненужные дан- 
ные, или что загрузчик не прове-| 
ряет целостность Файла. | 

ИФК: Но и на этом письмо ГРИ-| 
гория Борисовича не заканчивает- | 
ся. Он предлагаёт читателям 
несколько слов насчет 
записи байта на магнитофон. 

Он пишет: “В "Векторе" исполь-| 
зуется следующий Формат: 1 заме- 
няется на 01, ао - на 10 
называемый каскадный код). 
этом длина битов одинаковая, 
ме того, не надо так точно выдер- 
живать нехдубитовую и междубайто- 
ВУЮ ДЛИНУ. Я уже пробовал энули-| 
ровать такой Формат на "Спектру-! 
ме”. Результаты - положительные. 
Они хороши еше ‘и тен. что на 
“Спектруме“ можно при этом Форма- 
те достичь в 2-3 раза большей 
скорости записи, по сравнению со 
стандартной, без каких-либо осо- 
бых проблем (нужен только загруз- 


чик). Это готовый турбо-Форнат., 
причем с изменяеной константой! 
записи, то есть Вы можете регули- 
ровать ее В ШиРОКИХ пределах. 


константа чтения автоматически 
определяется при загрузке. для 
защиты от помех используется дуб- 
лирование. Кахдый блок (по 256 
байт) задублирован. й  помехо- 
устойчивость можно улучшить, если 
дублировать не отдельный блок, 
как сейчас (по принципу: блок 1, 
дубль 1, блок 2, дубль 2, 
всю программу (блок 1, 
блок п, дубль 1, дубль а, 
дубль п). Кроме того, возножно|’ 
сделать (а на ВЕКТОРЕ уже сдела- | 
но), что сбой в каком-то блоке не 
вызывает сброс всей программы (на 
"Спектруме” одна помеха вызывает 
сбой всего Файла), так как прог- 
рамма разбита на мелкие блоки 
(как отсеки в подводной лодке). | 
Вы ножете остановить магнитофон, | 
отмотать чуть назад и повторно! 
загрузить сбойное место. Процесс! 
загрузки отображается на экране в 
виде карты загрузки. Очень наг-| 
лядно видно, где произошел сбой. | 
Кроме того, есть возможность, по-| 
жертвовав сбойным участком в 32 
байта, загрузить оставшуюся ин- 
формацию. | 

На "Векторе" загрузчик занима-| 
ет 256*г байт, на "Спектруне" его 
можно сделать короче”. 


ИФК: Если у читателей есть ин- 
терес к тому, что говорилось об 
этон Формате, то Григорий Борисо- 
вич предлагает выслать текст за- 
грузчика и текст подпрограммы! 
записи в таком Формате на магни- 
тоФон. 

Уважаемый Григорий Борисович! 
Ны искренне благодарим Вас за 
предоставленный натериал. дунаен, 
что это ннение разделят наши чи- 
татели. 


(С) збитнев В.А., 1992, 1993. 
(Г. Новосибирск} 


ПРИНЕНЕНИЕ СТАТИЧЕСКОГО 
ГЕНЕРАТОРА СЛУЧАИНЫХ ЧИСЕЛ 
НА ПРИМЕРЕ ПРОГРАНМЫ 

ЕГТТЕ" 


Вероятно, уже все знают о тон, 
что такое ВНР. Во МНОГИХ ИГРОВЫХ 
и учебных програмнах этот. опера- 
тор используется дая того, чтобы 
поведение компьютера в некотрых 
ситуациях было непредсказуеным. 
Эту роль прекрасно исполняет ге- 
нератор случайных чисел на 7%- 
ЗРЕСТЕИМе. Он относится к типу 
динамических. то есть таких, ко- 
торые изменяют свое состояние 
независимо от того, когда вызы- 
вается этот генератор. Свое зна- 
чение "спектрумовский” КНО вы- 
числяет, используя  перененную 
ЗЕЕШ (23670 БЕС), которая изменя- 
ется с течением времени, 

Но так бывает не во всех ком- 
пыстерах. НМногче, наверное, зна- 


Бейсика для компьютеров ‹ типа 
“Ямаха” (НСХ), 18. Сколько бы 
Раз Вы нё вызывали бы ЕНО в своей 
программе (наприйер для рисования 
звездного неба}. он выдает одни и 
те же числа’ после команды кон, 
ВАНПОНТ7Е (в случае рисования 
звездного неба одна и та же кар- 
тина будет на экране, если Вы ос- 
тановите программу и снова запус- 
тите ее через ВОН). 

Такой вид ЕНО-генератра назы- 
вается статическим. Он плох для 
непредсказуемых действий, но он 
прекрасно ножет работать в ка- 
честве кранилиша огронного объема 
панных, не требующих в памяти ме- 
ста. но самое главное - эта 
Форнация будет постоянной, сколь- 
ко бы раз эти данные не были бы 
затребованы. Простейший пример 
‘такого ЕНО-генератора на ассен- 


10 ВА 

10 А, (®г) 
гр {В1).А 
АП) А.Р 

Ш БА 

ГО А, (63) 
о (в2), А 
АГ А, р 
ВЕСА 

го (3), А 
ВЕТ 


‚81, Ва, БЗ - переменные. 

В регистре А будет содержаться 
случайное число (0-255). Но по- 
добный генератор случайных чисел 
все вреня будет генерировать оче- 
редные случайные числа. . Теперь 
создадим програнну, подобную 
БАНПОНТЕЕ в Бейсике. 

ВАНО: и А, 5. 
{В1), А 
А, 90 
(В2), А 
А, ЗТ 
($3), А 


нь 

1х 

вс 

А, В 

С 

Н7., 100К5 


Програмна 1 решолз 


30000 

КАНО ;Сброс генератора случайных чисел в исходное 
\ ; положение. 

ВНО5С ; Заполнение экрана атрибутами через ВНП. 


1Х,22528 ; Старый массив 
НГ, 31000 ; Новый массив 
ВС.168 —;768 байтов - размер области экранных атри- 


; бутов. 
А, (НЕ. 
А 
т 
(1Х+1) Если справа, слева, сверху или снизу но- 
7,5ЕТАТ |жет кто-то "съесть" этот атрибут, то 
(1Х-1) пусть’ “съедает”. я 


2, ЗЕТАТ 
(гх-з2) 
2, ЗЕТАТ 
(1х+32) 
2, БЕТАТ 


Продолжить обработку нассива. 


СОРУ 


(Н.А “Съедаен* текуший атрибут. 
ЕАТЕР , 


НЕ, 31000 копирование нового нассива в старый. 
РЕ, 22528 
ВС, 168 


НГ. 31000 | Заполняем новый массив байтани с числовым 
ВС, 168 значением от 0 до Т. 

ВНО: 

т 

(В). А 

|1 

вс 

А, В 

с 

7, РИ, 

СОРУ ‚ Копирование массива в старый массив. 


(НЫ), 255 


А, (61) Генератор * 
Т.А 

А, (62) случайных 

(81), ^ 

А.В чисел 

р, А 

А, (©) 

(ка), А 

А.П 


(3), А 


154 


== | ПРОФЕССИОНАЛЬНЫЙ ПОДХОД 
Теперь, после вызова подпро- 


грамны КАНО некий указатель вста- Г Продолжение программы Ветопз. 
ет на начало некоей таблицы, в $1 ° ПВО 
Которой хранится бесконечное ко- юг РЕРВ 0 
личество байтов, которые и извле- 5 ‹ ГЕЕВ О 
каются из нее подпрогранной ЕНО. м ии р 
Где это ножно использовать? К о ` Е АН СС | 
примеру, в хорошо известной игре 

"ЖИЗНЬ" (“"1ЛЕЕ") нужна матрица Програнма 2. 1 
|со ‘случайно’ расположенными в ней Заполняет нассив данными о планете, начиная с адреса 44 
клетками. Вводить через РАТА весь в следующем формате: 

|массив неудобно, недленно и не- 


Исходные значения параметров. 


есть картотека на 10000 человек, 
|работающих на космическом кораб- 
ле. Статический ВМО может быть 
пприменим и для динамической ин- ТС РЕ 

|формации. Примером может служить С ГР (Р05),РЕ ;Сокраняем позицию. 


УР 7, ЗАУР5 


8 (РЕ), А ;Записьваем 2-ой символ слога. 


практчно. Если заполнять массив имя звезды А, 
через обыкновенный РМО, то возни- а т. = ы 
|кает ‘проблема с тем, как снова 8 байтов 16. 165. - 10 байтов на планету. 
воспроизвести картину, если это 
ронадобится. Опять прибегаем к ос ‘30000 
ПРАТА. Но есть более практичный СА, КАНО 
способ: задание массива через во :256 звезд 
статический ЕНО, который будет $ТАВ5 РОЗН НС 
"выдавать ‘те же самые значения, СМЛ, ЦРНАНЕ ;Считать иня в НАМЕ. 
|что и в первый раз, стоит только САМ. ЗАУМИ ‚Записать имя из НАМЕ в массив, на который 
их ВАНО. ; указывает МА$$У. 
В игровых программах © большим РОР | ВС : 
количеством комнат таким путем ОУЧ7 ЗТАК$ |; 
|можно запоминать все комнаты, как ‚ВЕТ : 
комбинацию трех (или другого чис- 
йла байтов), в данном случае - ТРНАМЕ 10 НЬ,МАМЕ ; Позиция в имени указы- 
15, 90, 37. Стоит их только изне- 12 (РО5}, Н.; вается переменной Р05. 
|нить и Вы имеете опять новую ком- : 
'нату. Програнма "репюпз"  исполь- и: :Очистин 9 байтов. Я 
пзует как раз такой способ. Она СЬЕАВ 10 (НЬ), О ;Имя будет равно 8 символам. 
чем-то напоминает. "ЖИЗНЬ", но вы- а: | 
ГЛЯДИТ В Т раз красивее и эффек- ВУ? СБЕАЮ, ; 
‘тнее. Попробуйте, не пожалеете! 12 А, (001) 
10 (01), А ;Запишем координату У 
| Следующая область применения - 10 А, (02+1) 
|Формирование статичной (неменяю- 2 (03).А’ :Координата Х звезды. 
|шейся) информации. Возьмем к при- гр А, (00) :Условие, при котором 6`ой бит указывает на 
|меру игру "ЕАТЕ”. Откуда компью- АКО 64 ‚то, что в слове нет последнего слога. 
|тер с таким небольшим объемом па- РОЗН АК 
|мяти берет названия и координаты САМ, 10516 ;Три слога. 
всех 256 звезд, в каждой из вось- САЦ, 110516 
|ми галактик, да еше и неизвестно СА, 1091.6 
Исколько всего этих галактик, Где РОР АЕ 
|хранятся данные о ценах на каждой к . кноа Если нет последнего слога, то уход ва 
Гиз планет, ее техническом уровне, ‚холостой ВНП. 
[общественном строе и населении, 
Разумеется, это работа стати- 0516 10° А, (24+1); Условие отсутствия слога: 
| ческого ВНР. Если Вн наберете АНО 31 ‚НОМЕР. слога:0, т.е. слог"АТ.” - невозможен. 
|программу 2 на Бейсике или 2.1 на Е 2, вмра 
|ассемблере, то смохете получить 10 Н,, 51065 
|данные о всех названиях планет и АБР А, А ‚Номер слогах2 
|их координатах. остальная инФор- 10 Е.А 
|мация каким-то образон хранится в 10,0 
16 основных байтах и может быть Ар Н,РЕ  ;Находим позицию слова в 51.065. 
Гобразована одним из 4 КМ, вызы- 17 А, (НЫ) ‚Считываен 1-й символ слога 
|ваеных последовательно для кахдой мн. 
звезды. Может быть. удастся рас- РОЗН! НА. 
шифровать и остальные данные. - 10. НН. 105) 
Итак. статический РНо может 12, (Н.А :Записываен первый символ по адресу РоО$. 
|ХРНИТЬ В себе информацию. Можно, тис н ‚Следующий символ слога, 
йк примеру, сделать слоги русски- Ех БЕН 
ни, задействовать остальные байты РОРН. 
Идля русских имен, для пола, воз- 12 ^. ЧИ) Если символ равен "?", 
Праста, адреса и пожалуйста: у Вас ОР 63 ‚то не записывать урезанный слог. 


ритра  ЗЕНТТНЕ., в Которой все вмре Н1., {50) 
И в р БЕ, (02) 
АБР Н,, БЕ р 
Ех ПЕН | 

10 НН, (Бё) 1Сама процедура Вр 

р (20), НЫ. 
ьВ НЕ. (14) 


ландшафты имеют свой номер, а за- 
пдание их в памяти невозможно 
Ислишком  расточительно. Но в 
процессе игры Вы можете некоторым 
образом изменять эту информацию 
уже в матрице, созданной этим 
ЕМО. о 


"044 ----р20+ра+04 


Программа г. 
Печать имен планет всех 
галактик ЕЁ1ТЕ. 


10 РАРЕВ 0: ТМК 6: ВОВОЕК 0 
‚120 С1.5: РЕТНТ "ЕЫТЕ ЗРАСЕ”” 
“1-5ТАВ НАМЕЗ" *"2-РГОТ5 ОЕ 
ЗТАЕ5” 

30 ГЕТ К$-1НКЕУ$ :1е К$-"1"ТНЕН 
Со ТО 60 

` 880 ТЕ Кз-”2"ТНЕН С0 ТО г00 

50 60 ТО 30 


Подпрограмма вывода названий 


60 ТЕТ п=0: 0 598 1070: ‹ 60 58 
1010: КЕМ установка генератора 
случайных чисел в исходное по- 
ложение и установка стринга 


$ п$, содержащего слоги всех 
у названий планет. 
70 С1,5: РЕТЯТ ТК 5; "КО НАНЕ”" 


80 РОВ #=1 ТО го 
90 ТЕТ г-940-1МТ (80/256) *г56: 


Ё ВЕН г - младший байт перенмен- 
} ной 490. 
100 60 518 2000 КЕМ в строках 


190...120 и 150 содержатся че- 
тыре вызова генератора для од- 
ной звезды. 

110 60 $98 2000 

1г0 60 $5ИВ г000 

130 1Е г>127 ТНЕН ТЕТ г-г-128 

140 ТЕ г-64<0 ТНЕН 60 50В 1030: 
СО ТО 170: ВЕМ если 6-ой бит 
равен нулю, то производится 
холостой вызов ВНР и слово 
становится короче на один 
слог. 

150 60 $8 2000 

170 БЕТ п-п+1: 1Е п:256 ТНЕН ТОР 

’ КЕМ Если Число звезд равно 
256, то конец работы. 

180 НЕХТ +: ВЕЕР .1!,30: РАЦЗЕ 0: 
60 ТО ТО :ВЕМ Формируется 
следующее имя. 


Вывод позиций звезд. 


'1200 С15: РЬОТ 0,23: БВАМ 255, 0: 
ОБАМ 0, 129 

205 ОКАМ -255,0: ОКЕАМ 0, -129 

210 СО $08 1010 я 

220 РОК +=0 ТО 256 

230 ТЕТ У-1НТ (30/256): 

(у/2) +24 

240 ЪЕТ х-ГЫТ (42/256) 

250 РГОТ ОУЕЕ 1;х.175-у ВЕН вы- 
вод звезды. 

260 С0 50В 1030: 60 598 1030 

‚ ето 60 50в 1030: 60 508 1030 

1280 НЕХТ #: 5ТОР 

1000 КЕМ =„Подпрогранна инициали- 
зации статического генераторак* 

1010 БЕЗТОВЕ: ВЕАП 90, 42, 44: 
КЕТОЮН 


БЕТ У-ТНТ 


1020 ВЕН ииСтатический генератор 
случайных чиселех 
‘1030 ВЕТ 3=90+42: ТР 3>65535`ТНЕН 


ПРОФЕССИОНАЛЬНЫЙ ПОДХОД 


12 (Фа), нь 


тр н., 40000 


2 


= 
Е 
зоососо©е 


51.065 РЕЕМ "АБГЕХЕСЕ?А" 
РЕЕРН "СЕВТЗООЗЕЗАВНАТНО” 
РЕЕН "1ВЕА?ЕВАТЕНВЕВАГА”" 
РЕЕН "УБТТЕРОКО0АНТЕТЗ " 
РЕРМ "ТОН" 


ЕНОРАТ ОЕЕВ 74 | 
РЕЕВ 90 
РЕЕВ 72 
РЕЕВ 2 
ОЕРВ 83 | 
РЕЕРВ 183 


| 


т Продолжение програнмы 2. 1 


; переменные 


= 


АПР Н., РЕ 
и (04), НЫ 
ВЕТ 
ЗАУНН ГО НЕ, НАМЕ ; Записываем имя в массив. 
1) ПЕ, (НА$5У) 
г вс, 8 
Бот 
ЕР А, (0!) ;Считываен У. 


Запоминаем позицию в массиве. 


5 А ; Преобразуем в нормальный вид 
хов 12т 
то (ФЕ), А ;и записываем 
тыс Е ; в нассив. 
12 А, (03) ;Считываем Хх 
о (РЕ). А ;и записываем 
ТС БЕ ; в массив. 
го (БАЗЗУ) , ПЕ; 
ВЕТ 
ВАНО 12 Н., ЕНОРАТ ;Копируен данные о 
то РЕ, ро ; галактике 
о вС.6 ; в массив ЕН. 
ОТВ 


;Устанавливаен указатель на массив данных 
р (НАЗЗУ), Н.; с адреса 40000 - длина 256*10-2560 байтов 


61...66 байты в отгружаемом блоке 
состояния Е. ТТЕ. 


ЪЕТ 3:$-65536 

1040 ТЕТ 3=$+94; 1Е 3265535 ТНЕН 
ТЕТ $=3-65536: КЕМ 3-80+42+44 
(двукбайтное логическое: сложе- 
ние). 

1050 ГЕТ 40-42: ФЕТ 42:34 

1060 ГЕТ 44:3: ВЕТУЕН 


1065 ВЕМ и»Генерация списка воз- 
Ножных слоговик 

1070 ЕТ пз:* 

АЕХЕСЕ?АСЕВТЗООЗЕЗАЕНАТНОТКЕА?" 

1080 ТЕТ 03=1$+" 

ЕРАТЕНВЕВАТАУЕТТЕРОВОПАНТЕТ АТОН" 

1090 ВЕТОВН 


2000 ВЕМи» Выбор случайного сло- 
гаяк 


2010 ГЕТ Ь-=1МТ (94/256): ТЕТ В=В 


-ТИТ (5/32) «з2 
2020 ТЕ В-0 ТНЕН 60. 50В 1030; 
КЕТОЕН 


2030 ТЕТ В-=Биг: РЕГНТ 13$ (6+1); 
2040. ЦЕТ Б=В+1 а 


2050 ТЕ. 13 (6+1) :"2" ТНЕН 60 50В 
1030: РЕТОЕН | 
2060 РЕТНТ 03 (в+1);: 60 ЗВ 1030: | 
РЕТУЕН 


3000 ПАТА 74+90к256 

3010 ПАТА 72+2*256 

3020 ПАТА 83+183и256 

3030 ЕЕМ этот блок данных соот- 
ветствует галактике с па- 
раметрани 13, 90, Т2г, г, 83, 183 
«байты 61...66 в блоке сос- | 
тояния програнны ЕТ. ТТЕ). 


150 


В прошлон выпуске “Форуна“ на- 
"ши читатели обравшались за помошью 
по поводу програмн *5могаз & 5ог- 
|сегу” и "рул Багась". Пока никто 
не откликнулся на эти письма, ны 
на скорую руку пробежались по 
своин агхиван, выудили кое-что из 
иНпорТных хУРрНалов и составили 
нечто вроде эссе из разных источ- 
ников. Это, конечно, капая в мо- 
ре, на серьезный поиск пока не 
было времени, в дальнеишем мозет 
|быть дадим больше инфориалии. 

Ны настолько рады, что начина- 
|ет разгораться интерес к жанру 
. раздуть 


5могаз & 5огсегу. 
вот несколько подсказок по 
[прохожлению первого  квадранта 
| (бчавгате 1). 
| Когда Вы проходите тренировку, 
то проведите один день с мастером 
Уата, шесть дней с мастером Воя и 
|7 лней с Мерлоком ‹Мег1оск). Это 
даст Ван 22 пункта магии. 

Обязательно съешьте все пирохж- 
Ки (Р1ез), сколько сможете себе 
Ипозволить (до 5 штук) и во вреня 
‘своего путешествия прежде чем ис- 
следовать что-либо (Ехр1оге) 
'включаите режим А4{1аск на случай 
неожиданного нападения. 
|| В первом квадранте самым пер- 
вым делом поидите в комнату 6 ‘и 
возьмите там меч (3мог4). Комнаты 
мы нумеруем слева направо таким 
‘образом, что левая веркняя конна- 
та имеет номер 1. Меч нозволит 
Ван наносить ушары (рехим АТТАСК 
|НАСК). Все имущество, какое собе- 
рете, относите в эту коннату. 
Капкан (Воош Тгар) здесь лучше не 
Празряжать (91загю), т.к. после 
этого на Вас напалают 5...6 нонс- 
РОВ. 

НЫ приносим извинения за воз- 
можную неадекватность перевела, 
т.к. эту програмну, мы сами не 
пускали, а в аяглийском языке та- 
кие слова, как ‘воош Тгар могут 
иметь много разных значений и при 
переводе адекватное выбирается 
только по сныслу, ПРУГОГО ПУТИ 
нет. 

После комнаты 6 идите в комна- 
ту 18 и Там разрядите. (41загю} 
капкан ‹4гар). Тогда Вы сможете 
достать з1а# (‘волшебную палочку} 
из мешка ‹заск). Это даст Вам 
пкополнительно 16 пунктов магии и, 
кроме того, два новых заклятья, 
|но работают они только в ‘том. слу- 
чае, если Ваши магические. способ- 
ности. (шав1с 3511!) выше, чен 
|боевые (Е1ЕБА тя 3111). 
| владеть этой волшебной палоч- 
КОЙ ХОРОШО, НО ДОРОГО, Т.К. ПРИ 
этом быстро расходуется много 


магической энергии. Есть ориги- 
нальный выход - ее надо прогло- 
ТИТЬ (62%). Тогда и энергия не 
раскопуется, т.к. ее у Вас с со- 
бой больше нет, и магические сво- 
собности сохраняются, ведь она 
всегда при Вас. 

соберите все мечи, которые 
Ваи встретятся, и отнесите их 
в комнату 6. В комнате 15 есть 
Кольцо Прыгучести (Р1пЕ оф лиш 
Р1п), а ключ 1 (Ееу 1) Вы най- 
дете в комнате 14. Ван следует 
также взять ЗаБафой в коннате 22 
(что это такое ны не знаен, может 
быть какое-то оружие. В английс- 
кон языке с данних пор принято 
павать икена собственные орухню. 
вспоините меч Эскалибур короая 
Артура). Если у Вас к этому вре- 
мени еще нет магического меча 
{Мазас 5ч0г9). убедитесь, что Вы 
выбрали АТТАСК РОВ А ЗЕРЕНСЕ, 
иначе с монстром, который там 
обитает, Вам не справиться, его 
не берет заклятье ЕПРЕВОЕТ. не 
берет его и обычное оружие. Выход 
из этого квадранта находится в 
комнате 4, 


Теперь “Бип рагасв”. 

В этой игре полво потайных 
дверей. Их можно обнаружить тша- 
тельной проверкой стен. Обычно на 
наличие такой двери указывает Фа- 
кел на стене. 

Первым делом Вам нацо приоб- 
рести книгу (Боок) в нагазине 
{ЗВоР) на улице К1пе  54гееф. Ее 
нахо отдать леди Нгор {еду 
Нрог), а она Вам даст взамен дру- 
ГУЮ. С ее помошью откроется по- 


тайная  пверь на улице Нуге 
$4гее+. Внимательно поищите 
здесь. Если Вам удастся найти шит 
(351218), то его можно посвятить 
(0++ег) богине дану  (Содаезз 
Рави}. . > 

На Древнем Холме (019 Н111!) Вы 


найдете лиру (1уге). С ней идите 
к Деину (Фа1п), который обитает 
за потайной дверьр на улице рРагк 
ком. Он даст Вам взамен за эту 
лиру шит. посвяшенный богу 'Миди- 
ру «Н1а1г). Отнесите его богу и 
он даст Ван ключ. 

В этой игре можно неплохо за- 
рабатывать. Например так. Возьми- 
те золото у Ассэйера (Аззауег) на 
улице \е54{ \ау и прРодайте его 
брокеран на улице Сгозз 51геез. 
Существует еше очень много разных 
способов, но этот наипростейний. 
Но опасайтесь воров.. Они часто 
покишают. то, на чем находится ва- 
ва “эзвезда“. Поэтому никогда не 
понешайте ее на предмет, которым 
дорохите, например держите ее на 
деньгах {1г191), которые сравни- 
тельно легко восстанавливается. 

В игре множество головолонок. 
В частности, многие встают в ту- 


- ВОЗВРАШАЯСЬ К НАПЕЧАТАННОМУ -——- 


пик перед вопросом, 
земчухину {Реаг!}) из 
Загопа воош, что на северной сте- 
не куда потратить свои деньги. 
06е проблемы можно решить. од-| 
новременно. Набрав 10 000 1г1391,| 
отнесите деньги в гильдию воров! 
на улице 511уег 54гее%. Они  про-| 
дащут Ван ‘лицензию (лсепсе), с! 
похомью которой Вы и похитите эту| 
хенчухину.. 
А вот иринер еше более крутой! 
головолонки. Чтобы войти в замок, | 
Вам необходин свиток 156г011 о 
Зсаг) и специальный ключ (р-кеу), 
В замок Вы войдете, но первая же! 
дверь не откроется никакими ста-!| 
ранияни. вам надо иметь при себе! 
эме какой-нибудь предмет (любой} 
Я проити с ними в комнату, где! 
есть Три врашающихся колеса - это! 
систева колового замка. Ваша за-| 
дача выложить предметы на стол 
{по-одному} так. чтобы колеса ос- 
тановились в определенной конби- 
нации, Код этой комбинапии - ПРЕ, 
хотя чтобы его получить, надо бы 
решить головоломку, выцарапанвую 
на столе. После того. как колеса 
остановятся, надо взять свиток со! 
стола и идти в открывшуюся дверь. 
и после этого вас еше будет 
ожидать очень много разных зага- 
док и нелонятных подсказок. Так, | 
например, 2%*25 - означает 2 в} 
двадцать пятой степени. Если с| 
помотью калькулятора Вы найдете. 
чему равно это число, то  резуль- 
тат помозет выработать систему, с} 
помошью КОТОРОЙ НОНО будет прой- 
ти через длинные ряды дверей в 
замке. 


В общем, друзья, это серьезная 
игра. Не удивляйтесь, если Ван 
придется поблуздать по улицам 


старинного города год - полтора, | 
не меньше. 
* и й 


и, в заключение, обрашение ко! 
всен! В той части, которая каса- 
ется адвентюрных программ, у нас 
большие архивы и вознояности. Ес- 
ли Вы где-то "застряли" и Вам! 
нужна оперативная помоть, пишите, | 
не стесняйтесь. Ножет быть мы са- 
ни дадуи полезный совет, может 
быть кто-то из натих читателей, 
пройдет Вашим путем и решит проб-| 
лему, но ведь под лекачий камень! 
вода не потечет, давайте внесте! 
решать эти задачи. ] 

И предложение к тем, кто до- 
сконально разобрался с какими- 
либо адвентюрани. Если Вы можетей. 
стать внештатными консультантани, 1 
сообщайте нан, мы дадим Вам апрес 
и напишем, по каким программам к 
Вам ножно обрашаться за помошью. 
Если будет достаточное количество 
писем, этот раздел может стать и 
постоянным. 
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НЕАУУ ОН ТНЕ НАСТС 


(с) Троеглазовы @. и Г. 
Хабаровский край, 


1993 
с. Гайтер. 


Здравствуйте! 


В 16 за 199а ‘год Вы даваяи 
описание программы "НЕАУУ ОН ТНЕ 
МАСТС". `Каракашев А.Г. невлохо 
поработал с программой, но рас- 
крывая листинг’ программы, он не 
догадался раскрыть и проанализи- 
рРовать отгружаеный блок, а именно 
здесь можно было наити путь к 
завершению програниы о или, ‘по 
краиней мере, приблизиться вплот- 
ную К решению главной задачи - 
найти выход из замка. 

Сначала о неточностях в описа- 
ний. Дух в котле не АЦ, а АГ. 
магических‘ званий - 9, но о них 
позже. В программе 188 АКТИВНЫХ 
предметов. Корреспондент пишет, 
что побывал во’всех комнатая. это 
ве так. 

Составив карту, ны занетили, 
что на первой этаже угловые кон- 
нать справа не имеют входов. Яс- 
но, что одна из них КОЮНАбЕ. НЫ 
быстро выяснили, что эта “пекар- 
ня” находится в верхнем правом 
углу, под лестницей А вот в 
комнату рядом с Циклопом нохно 
попасть, видимо, только при опре- 
деленных условиях. Может, нужно 
разрушить стену или здесь поможет 
пресловутый ЕЁГЗТОНЕ? Во всяком 
случае, нан удалось побывать в 
Этой комнате не с игры, а искус- 
ствеяяо задав соответствующие 
координаты Аксилу. В комнате - 
абсолютная темнота. ке можно ос- 
ветить на’ долю секунды; исполь- 
зовав любое из заклятий и при 
вспышке можно увидеть 2 предмета 
- Прах от убитого монстра и книгу 
Гримуар. Выход из комнаты один - 
"М" и он выводит Вас на 4-й этах 
в Рамон РТ (?}. Комната полна 
странностеи, ‚например, все выз- 


вавные предметы исчезают из нее, 
как в юбой другой _коннате. 
Апекс, вызванный ранее ‚, не ухо- 


дит, сколько бы Вы ему ве говори- 
ли ”"АРЕХ. ТНАМК$". он отвечает - 
"СЬАБ ТО НЕГР" и остается в ком- 
нате. Ны ножен подвять Гринуар, у 
нас будет два Гринуара, а на том 
же месте будет стоять еше один, 
поднимен его - у нас три книги, а 
на полу еще одна, - и так без 
конца. Каждый из поднятых Гримуа- 
РОВ содержит столько же заклина- 
ний, сколько у Вас было до появ- 
ления в этой комнате. лишние 
предметы выкладываются и стоят во 
всех углах комнаты, кроме ее цен- 


` ВОЗБРАШАЯСЬ к НАПЕЧАТАННОМУ 


тра, 
жить что-либо на 
исчезает. Заклятье 
комнате не деиствует на предметы. 


где лежит прах, Если выло- 
‚прах, предмет 
ВАТ в этой 


Выйдя из этой комнаты, Аксил ухе 
не может вернуться назад - позади 
стена. 
\ 

Всего комнат 256. Счет ведется 
с первого этажа. слева направо - 
левая верхняя - №}, РУЮНАСЕ - 18 
итд. Счет комнат правого нихне- 


го угла замка сдвинут на’ этах 
вверх - 

ге этах - 64, 

3 этах - 128, 

4 этаж - 192, 

1 этах - 0; 

видимо. в нулевую коннату нох- 


но попытаться войти с помощью за- 
клинаний или каких-либо дрУГИХх 
действий из комнаты №255 (или 
№63?). 


Теперь 06 отгружаеном блоке. 
Рассказывать о каждон байте дол- 
го, а ик 1342. но вот основные: 

Первые 27 байтов - сведений об 
Аксиле, их можно отгружать и 
загружать отдельно, используя 
опции главного меню 4 'и 5, 

г-ий байт - стойкость (ЗТАНТНА) 

3-й байт - сила магии (МАСГС) 

4-й байт = удача (10ск) 

5-й байт - звание (СВАРЕ) 

В этом байте такое соответст- 
виеё цифр: Ё 

1 - НЕОРНУТЕ (новичок) 

- ТЕБАТОВ (соискатель) 

- РЕАСТТСУ$ (практикант) 

- РНИ.ОЗОРНОБ (Филосо$) 

- АБЕРТЫ МТНОВ (младлий 

эксперт) 

6 - АБЕРТО$ НАЛОР (старший 
эксперт) 

Т - АБЕРТО$ ЕХЕРТ (высший 
эксперт) 

8 - МАСТЭТВ ТЕМРЕТ (нагистр 
храма) 

9 - МАбОЗ ( маг, 


ям 


чародей} 


6-й байт - набранные очки 
{РОЗ} 


Далее идут пять блоков по 4 
байта - предметы, которые нахо- 
дятся у Аксипа. и 21-й байт - 
наличие заклинаний: 
224 - 1МУОКЕ, ЕВЕЕТЕ, ВЬАБТ 
240 - 1НУОКЕ, РЕЕЕТЕ. В.АБТ, 
СА. 

248 - 1НУОКЕ, РЕЕЕГЕ, ВГАБТ, 
САШ., ТКАНЗРОЗТОН 

94-й байт - комната, в которой 


находится Аксил. Например, 8.- 
РУЕНАСЕ, 43 - 511565, 61 - СТ.АМ5, 
108 - НТЗЕЕТ (старт) ит.д: 

Блок байтов со 188 по Р1Т - 
нонстры, Постоянно обитающие в 
30-ти коннатая. В эти комнаты не 
нохет заходить никто, кроме Акси- 


лл. Пока не будет убит монстр, в 


эту комнату нельзя вызывать нико- 


иначе Аксил по 1 
Два монстра в экране -1 


го, даже Апекса, 
гибнет. 
нгновенная смерть. Убив монстра, 1 
ножно спокойно, не боясь, что] 
кто-нибудь затопчет Аксила у вхо-! 
да, задать дальнейший нармрут или! 
обдунать ‘дальнеишие действия. В! 
комнату не заходит никто дажей 
после смерти монстра, но теперь! 
сюда можно вызвать любого из 
обитателеи занка, Пока Нонстры! 
хивы, соответствующие байты равны! 
нулю. Смерть нонстра обозначается! 
номером комнаты, в которой он| 
обитает, например: 

189-й байт - 150 (тролль) 

193-й байт - 138: (призрак) 

197-й байт - 18 (оборотень) 

200-й байт - 49 (вампир) 

205-и байт - 63 (циклоп) 

210-й байт - 82 (ленивеп) 

211-й байт - 853 (мвдуза) и 
ТА. 

С 541-го до 1292-го идут 188 
НО рн блока - эт©} 


но участвующие в игре, их, можно | 


брать, переносить, в крайнем слу- 
чае - осматривать и изучать иди 
УНоСИТЬ. ‘Пассивные -’ Фон. Все! 
активные предметы. как правило, | 
участвуют в отгрузкая. 

Из 4-х байтов, обозначающих, 
какой-либо предмет, важны 2-й и 
4-й: ‘2-й - комната, в которой! 
находится предмет, ‘4-й - его 


координаты в комнате. 


вйдино, забыл упомянуть об одном 
из них - зто голова дракона "”ВА- 
ВАК”. Она не пропустит Вас, пока 


Вы не скажете -"КАВАК, УАТЕВ". на) 
все вопросы у "дракоти” один’ от-| 


вет, но вот на Фразу - "ВАВАК, 
ОВАСОН" он ответил. нан =Кне 
горячо: ". “АХ, тебе горячо!!!" -| 


подумали мы и предложили ему во- 
дички и ВАВАК открыл нам дорогу к] 
последнему "танцевальному залу“ в 

И 


“БТСНТСАТЕ”. 

Апекс не то, чтобы “ходячая! 
энциклопедия”, но все-таки знает! 
немало. У него в запасе около "О 


вариантов ответов и. заметьте, в| 
разных местах замка он ножет от-| 
ветить по-разному на один и тот 
хе ВОПРОС. В некоторых случаях он! 
ПРЯно подсказывает, как вызвать! 
птину Феникс, как пройти воду или 
как пройти через пропасть. Подз 
сказывает, как подобрать ключи к| 
дверям, ведь над кажным ключом 
нарисован знак и на вопрос “АРЕХ, | 
5165", он’отвечает - "Это звезд-| 
ный знак”. ключей 12, знаков 3о=| 
диака тоже 1г. Остается сравнить! 
знаки, нарисованные в звездах над 
ключани с. названиями комнат ий 
станет ясно, каким ключом откры- 
вать какую дверь (смотри рис. 1). 
Про знак с двумя кольцами 


. Апекс говорит - "Это знак помли- 
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- АЯНОы5 (3) 


<4)> 


(1) - Близнецы (2) 
- Стрелеп (4) 
ит.д. 


— Телец 
— СКОРПИОН 


Рис. 1 
ны”. К этим дверям не нужны клю- 
чи, ПРОСТО НУЖНО поставить на 
стол нешочек с золотон "ВАС". Про 
знак, у дверей с односторонним 
проходом, он говорит - "Знак - 
хода нет“. 
остальных обитателей замка он 
явно недолюбливает: 


ре 


УУУЕВН и ТЕОШ, - 
убить!" 

СУСГОР5 - "Один глаз и полный 
идиот!" и т. п. { 

Апекс, даже ничего не говоря, 
подсказывает слово 50КОКОКО5. 
Обратите внимание на его живот, 
видите знак? Теперь прикиньте его 
к надписи на стене... 


"Лучше их 


| 


А самое главное - он подсказы- 
|вает. где искать выход - "АРЕХ, 
|ЕХТТ", ответ’ - "РИЕ ТОМВ$ АНКОР 
|РАВАРТЗЕ". Такие комнаты есть на 
И2-ом и 4-ом этахах - #65 и Н24г. 

| Но нам все-таки кажется, что 
|та саная странная “темница“ на 
|первом этаже должна дать ключ к 
1выходу на свободу, ведь попасть в 
|нее еше пока не удавалось никому 
| (естественным путем). 

| У неас еше осталось 10 неис- 
ипользованных предметов. Карака- 
|шев пишет о 4-я, но’кроме 3 кос- 


тей (ВОМЕ) и одной "КТВ" куда-то 
НУЖНО ПРИСТРОИТЬ "РООТ",  "СЕТМО- 
|ТВЕ” (в Нулевой клнвате), 2 ос- 


|тавшиеся сумочки с золотом 
пи 2 золотых кания, 


(ВАС) 
похожих на 


|ПЗНАКЕ - “КОСЕ”". Канни тяжелые, 
когда Аксил их поднимает, он, те- 
ряет 10 единиц энергии, но не 


] ВОЗБРАМАЯСЬ к НАПЕЧАТАННОМУ = 


вздыхает “ОН-Н-Н,...", как если бы 

он брал отравленный предмет. 
Волчья лапа “РООТ" поднимает 

на несколько единиц цифру в графе 


"Удача". (Это же происходит, ког- 
да мы берем РТАЗК). 
Может быть, какие-то из этих 


вешеи нужно принести в комнату 
РИ.Е ТОМВб и тогда ‘откроется вход 
в эту странную коннату с прахон в 
центре и бесконечным Гримуаром 
РЯДОН С прахом, а уже потом идти 


в  РАКАОТЗЕ. Но для того, чтобы 
проверить эти догадки нужно еше 
найти или хотя бы узнать, что та- 


кое КАКЕБТОМЕ, ведь он должен 
подсказать, как открыть дверь в 
Г6НТбАТЕ. Тот ПУТЬ, что  подска- 
зывает Каракашев А.Г., — видимо 
неправильный. т.к. порав в комна- 
ТУ с Рубином с помошью Астарота, 
разрушив дверь с помошью Асмодея, 
ны входим в дверь. Аксил исполня- 
ет танцевальный номер, но очки... 
убывают. Значит, недостаточно 
этого, чтобы найти вход - необхо- 
димо открыть ЭТУ ПОСЛеднюю дверь. 
У "темницы" есть еше одна осо- 
бенность - принесенные с’собой 
предметы можно множить до’ беско- 
нечности (эффект Гримуара), нужно 
только поставить на пол необкоди- 
МЫЙ предмет, затем поднять его и 
т.д. Мы только не проверили, что 
будет, если набрать этих "фанто- 
нов", войти в обычную комнату, 
выставить их, затем выйти из 
комнаты и снова войти - скорее 
всего они исчезнут - проверьте. 
Недостаточно ясна и роль РОВ- 
МАСЕ. Обычно туда забрасывают Ак- 
сила демоны, если он им надоест, 


‘отбирая у него все предметы и ма- 


гию. Но... возьмите с собой 
СЬАБР, другие необходимые предме- 
ты и попросите Астарота отправить 
Вас туда. СЬАЗР предохранит Акси- 
ла от огня. Он может ходить по 
комнате, исследовать ее, вызывать 
предметы и демонов и, если они 
будут недовольны, то дальше этой 
комнаты не бросят Аксила, Вот 
только загвоздка - как оттуда 
выбраться, ножет вызвать "Фантом" 
5%ЮЕО и снова использовать Аста- 
рота?... 

Да, кстати, нулевая комната 
приготовила для нас еше один сюр- 
приз - если мы будем брать лежа- 
ший там Гримуар и снова ставить 
его, у нас будет накапливаться 
сила МАГИИ. Таким образон, ее 
можно довести до 99 единиц. 

В предыдушем описании был 
правильно назван один из трех 
предметов, необходимых для выхова 
духа - АГ. Это - ЗКЛА,, а не 
НЕАР, Оба черепа НЕА непригодны 
к использованию. ‘Только поняв, 
что на предметах, имеющих важное 
значение. как. правило, есть ка- 
кие-то знаки или цифры, нам уда- 


не- 


Ой 


. магические предметы - 


лось наити третий  необходиный 
предмет дия вызова АГ. 

Каракашев пишет, что он набрал 
99 единиц в графе "очки" и, мол, 
странно, что Аксил не получил 
свободы - игра-то сделана! дело в 
том, что ‘очки начисляются не 
только за прохождение маршрута и 
выполнение необходимых условий. 
За каждого убитого монстра начис- 
ляются очки, например, за Тролля 
за Змея - г, за Недузу - 8 и 
т.д. Чем сильнее противник, тем 
больше очков Вы набираете. Можно 
набрать 99 очков не выходя из 
какой-либо комнаты, где часто 
появляются МОНСТРЫ. Количество 
очков важно для применения ТЕН5- 
РОЗТОМ. Если У Аксила кончается 
энергия, он может воспользовать- 
сяэтим заклинанием и десять еди- 
ниц перекочуют из графы “очки” в 
графу "стойкость". ‘Вы можете по- 
высить стойкость Аксила до 99-ти, 
но в этом случае у Вас может ока- 
заться 0 очков. Поэтому пользуй- 
тесь "ТЕНЗРОЗТОН" экономно, ведь 
для выхода на свободу  Аксилу| 
несомненно нужен полный комплект! 
и выполненных действий и очков. 

В начале игры Вы можете изме- 
нить (перетасовать) цифры в гра- 
Фах "стойкость", "магия", "уда- 
ча". Лучший вариант, когда мень- 
шая цифра в графе "стойкость", || 
больвая в “магии” и | 
"удаче". Просто после старта нуж- | 
но быстренько пробежать через. 3! 
комнаты и подкрепиться хлебом 
единиц), а затен возвратиться к 
старту и взять Гримуар. После! 
того, как Вы‘ подберете недостаю- 
шие заклинания СА, и ТЕН$РО$ ТОН, || 
Ваша сила магии повышается до 50 
единиц и Вы будете уничтожать 
слабых и средних противников с| 
первого удара. В этом случае Ваше! 
путешествие значительно облегча-| 
ется. Кроме этого, можно повысить! 
силу магии, перенося с 


| 


50, ЗНАКЕ и Т. п. | 

Мы подозреваем, что повысить! 
звание выше РНИ.ОЗОРНО$ в этой| 
программе невозножно, хотя искус- 
ственным путем (изменив 5-й байт! 
в отгрухаемом блоке) мы смогли их 
получить. Но, возможно, какин-то 
путем их можно получить в комна-| 
тах РИЕ СОлОрОН. РИ.Е ТОМВ$, 
РАВАРТЗЕ и в той же самой темнице 
на первом этаже, а уж звание Ма- 
га - только на выходе на свободу. 
Возможно. .. 


К тому же, в программе есть еше! 
масса не используемых слов 
зачем они? 

ВВОН7Е, ВТЕГР, СВУРТ, СНВОНА, | 
СОРРЕК, СОВАЕТ, РООНТАТН, | 
1Р51551Н95, МАСНАМ, НОНЗТЕК, | 
НТСКЕГ, НЕАЕВУ, ОСВЕ, РАЗЗМОЕЬ и| 
т.д. 


153. 


Г ‚Своими успехами в области 


програмирования на Бемсике 
делится с нами т. Дронов из Читы. 


ЕГО ОПЫТ ПРИГОДИТСЯ начинаюим 
програнистгам. 
У 
*“Высылаю Ван на Суд свою 
перзую программу и хочу сказать 


Вам больвое спасибо за. "7Х-РЕВЮ". 
Благодаря Вам Я, изучив за несян 
два годовых комплекта "7х-РЕВЮ",. 
Узвал очень нного хитростей и 
секретов бейсика. Подтверждением 
этого является эта программа, 
написанная за один вечер. Я знаю, 


Бейсик - легкий язык, но без 
хорошей книги его не просто 
освоить А Ваша питоратура - 
лучшая из всех, которую я видел. 
информация излагается очень 
понятно и поступно. сейчас я, с 
понощью Вашей книги, ‘ приступаю к 
изучению — Ассемблера. Надеюсь 
овладеть и этим языком, хотя он 


намного сложнее. 

Теперь несколько слов о про- 
грамме. Это аналог широко извест- 
вой настольной, игры = "Морской 
60й", В которую ны частенько иг- 
ради в детстве. Маленькое отли 
чие закаючается в тон, что в моей 
игре корабли можно располагать 
как угодно и гдё угодно в преде- 
пах своего квадрата. Также де- 
лает и конпьютер. * 

ИФЕ: Спасибо за теплые слова. 
Ют себя хотин добавить несколько 
слов. Корабли в этой игре - 
только одноклеточные. Их можно 
ставить и поодиночке, ‘и вплотную 
друг к другу - как угодно. После 
попадания корабль сразу хе 
считается потопленным. Всего их 
го У Вас и столько же.у компьюте- 
ра. Посмотрите на листинг про- 
грамиы: действительно, это заня- 
тие на один’ вечер. Если организо- 
вать в программе ограничения на 
располохение кораблей, на их кон- 
Фигурацию ‘одно- или нногоклеточ- 
вые и т.д. ), программа получилась, 
бы как минимум, раз в пять длин- 
нее. Но можен Вас уверить, что 
набрав самостоятельно эту. про- 
граннму, Вы с не меньшим азартом 
будете вести сражения с компью- 
терон. А может быть; вскоре У 
Вас появится ‘желание внести в 
программу ограничения на конфи- 


гурацию и расположение кораблей -- 


что же, ‘пробуйте смело. Лучшее 
обучение програмированию - это 
обучение "в бою”. 

Автор предлагает русифициро- 
вать программу при поноши синво- 
ЮВ графики. Однако. посколь- 
ку мы Уже привыкли к постоянно 
используенону нами методу русифи- 
кадии, мы приводим, как обычно, 
вариант для загрухаемого  русско- 
латинского символьного набора. 
Дунаем. что автор простит нам 
такое вторжение в его програмну и 
еше несколько ‹ непринципиальных 
ШТРИХОВ. итак, предлагаем 


программу всен читателям. 
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ЗАГРУЗКА ИГРЫ 
После загрузки первого блока 
Вани предложат ввести имя пилота и 
выбрать один из четырек самоле- 
тов: 


СААВ УТССЕН АУ ЗТ - самолет 
совместного производства шведских 
и британских авиаконструкторов. 
Е-4 РНАНТОН - ВВС СВА`‹ 
ТОВНАОО - Британские ВВС 
НТС-27 (”"ЕТОССЕВ“) - советс- 
кие ВВС. (Кстати, на рисунке изо- 
бражен вовсе не Н1С-27 ЕГОССЕВ, а 
Нтб-23 ЕРОССЕВ - это я проверил в 
справочнике. Инфорнация в про- 
Грамме также дана на 16-23, а не 
на м1с-27). 
Итак, на экране показан ААВ. 
клавишами л,@,0,Р можно пере- 
мешать курсор по пиктограмнам. 
Клавиша ЗРАСЕ утверхдает выбор. 

Пиктограимы "ВВЕРХ" и "ВНИЗ" - 
это просмотр. санолетов. 

30 - это самолет в трехмерном 
инфорнация об этом 
самолете. 

ЗЕТЕСТ - выбор штурмовика. 

После нажатия ЗЕГЕСТ загружа- 
ются миссии, которые Вы ночете 
выбрать. На экране’ появятся над- 
писи: 

Егее 211854 - свободный полет 
Соуег& - военная ниссия. 

Ниже размытым шрифтом написаны 
остальные военные нисии, которые 
Вы сможете выбрать только после 
выполнения предыдущей миссии. В 
кахлойи миссии по два задания. 
Сначала для ознакомления с 
аспектами полета следует выбрать 
Ргее Р1185{ - появляется новое 
меню: 

Оп випмау - на взлетной нолосе. 
А& 30000 #4 - на высоте 


30000 футов. 
АБоуе Вг1дяе - над мостом. 
Ьапеа 9рР - приземление. 


ЕНТЕЕ выход в предыдущее неню. 
Выберен Оп Кипмат и загружаен 
собственно саму игру, Внимание! 
В зависимости от типа выбранного 
санолета, после загрузки этого 
блока нужно загрузить еше два 
маленьких блочка. 

Например: 

“ТОБНАРО” - игра запускается 
сразу без подзагрузки маленьких 
блоков. 

"ЗААВ” - первые два блока. 
"НТ<” - вторые два блока. 
“РАНТОМ" - третья пара блоков. 
После этого на экране появится 
вид из кабины самолета. 


УПРАВЛЕНИЕ САМОЛЕТОМ 
Клавиши: 
@, А - тангах. 

О,Р - крен. . р 

№ - торможение с помошью шасси. 


В - воздушные тормоза. 
САРЗ ЭНТЕТ +1...0 - изменение 
тяги двигателя (1 - наименьшая, 0 
- наибольшая), при двукратном на- 
хатии САРЗ + 0 двигатели перехо- 
пят в Форсированный режим. 
ЕНТЕЕ - производит переключение 
на один из трех видов вооружения. 
САММОН - пушка; 
НАУЕЮТСК - ракеты "воздух-зем-, 
ля" с наведением по лучу радара. 
ЗТРЕМТЕРЕР - ракеты “воздух- 
воздух" с инфракрасным  наведе- 
нием. 
Клавиша С убирает и выпускает 
шасси (только в воздуке). 


ПРИБОРНАЯ ДОСКА 
В центре - радар с цифрой, 
указывающей дальность его дейст- 
вия в милях. Эта цифра изненяется 
нажатием клавиши К. 
Так как в разных санолетах 
расположение остальных приборов 


разное, то описывать их располо- 
хение не буду. а назову только 
ФУНКЦИИ. 


Квадратик с надписью 1® стано- 
вится красным, если по Вам выпус- 
тили ракету (только в боевых 
миссиях). } 

ПРИбор с буквой Н в верхней 
части - коннас. 

Прибор, показывающий тангах и 
крен выглядит характерно для всех 
инитаторсв. 

Стоябик с 
указатель тяги. 

Столбик с буквой Р - горючее. 

Также имертся окно вооружения, 
которое показывает, сколько и 
какого у Вас боезапаса осталось, 
и окно бортового компьютера, 
предупреждающего об опасности и 
других важных вевах, 

Прибор с наднисью АТ - альти- 
метр (Ваша примерная высота). 

Прибор с цифрами 0:1,2,3 - 
Ваша скорость в НАХ-ах. 

Ваши высота, скорость. ‘а также 
направление показаны в центре ос- 
новного экрана в точных цифрах. 


буквой Т рядом - 


основная прелесть этой игры, 
на ной взгляд - это` возможность 
обозревать сной самолет во время 
игры с самых различных позиций. 
Итак, . 
ЗУНВОГ, 5НТРТ+1 - обзор из кабины 
самолета 
535+2 и 55+3 - неизвестно зачен. 


55+ - посмотреть ва самолет с 
вышки, находящейся на ВИП. Ско- 
рее всего, Вы увидите просто 


точку в небе, но клавишани Ки +4 
ножно увеличить или уменьшить 
изображение. 

$35+5 - посмотреть назад. 

35+6 - поснотреть влево. 

85+7 - посмотреть вправо. 


55+8 - посмотреть сверху, работа- 
ют клавиши Ки у 
55+9 - посмотреть сзади, клавиши 


К и  ФУНКДИОНИРУЮТ. 


55+0 - посмотреть на самолет с 
южной стороны, то есть с той сто- 
Роны, в Которую он направлен в 


начале игры. Это полезно, чтобы 


тельно ВПП. Этот режин позволяет 
кроме увеличения и  уменышенияй 
изображения, прашать изображение! 
по горизонтали клавимами т и 0, 
а также по вертикали, - риЕ, 


ПОЛЕТ 
Полет в принципе ничем не от- 
личается от других имитаторов, но 
маневрирование, при взгляде со! 
Стороны, ПРОИЗВОДИТ большое  вие- 
чатление, 1 
Однако, наряду с достоинства- 
ни. есть несколько досадных недо- 


работок, которые снижают виечат-| 
ление, как об имитаторе. 
Так, вапример, даже на самой 


большой тяге ножно лететь с выйу- 
шенными шасси и ничего плохого, 
кроме снижения скорости не слу- 
чится. ` 

Самолет почему-то может са- 
циться в любон месте, а не только 
на ВИП, поэтому посадка не пред- 
ставляет никакой сложности. Нож- 
но сесть где-то в районе ВПИ, а 
потом подрулить к ней. : 

Но самый, на мой взгляд,  гру- 
бый просчет состоит в том, что 
ножно рулить хВОСТОВЫМ оперением 
(клавиши 7 и Х) не только на на- 
ленькой скорости на ВШИ, но и при 
скорости 1200 ниль/час в воздухе. 
Где это видано. Чтобы самолет 
разворачивался в воздухе без кре- 
на?! Такого не выдержит никакое 
хвостовое оперение. 


ВОЕННЫЕ МИССИИ 

Я не стану описывать все мис- 
сии - это займет слишком много 
места, а описание получилось и| ' 
так слишком длинным. 

Первая миссия, которую Вы мо- 
жете выбрать - это СОУЕЕТ. ‘После 
этого на экране появятся две под- 
миссии, ‘Вы нохжете выбрать только 
первую, так как вторая для Вас 
пока закрыта. 

Первая подииссия - З.ЕЕРЕКЮ. 

Вам покажут участок карты США, 
Обязательно надо ознакомиться с 
текстом миссии, иначе не будете 
нать полетного задания. у 

Пиктограмна ГНРО предложит Вам 
выбрать один из пунктов на карте. 
По нажатии "РТВЕ”, В окне появит- 
ся надиись, что это за объект, 

Пиктогранма "ОК" означает, что 
вы ознакомились и решили начать 
действия. 

В первой миссии ЗРЕЕРЕВ Ван 
нУзно уничтожить лагерь террорис- 
тов, а затем вернуться на базу. 

Это саная простая миссия. В 
ней нет самолетов противника, но 
если Вы пролетите слишком близко 
к цели, по Ван могут выпустить 
ракеты. 

Целей в этой ниссии две, хотя 
УНИЧТОЖИТЬ НУЖНО ТОЛЬКО — ОДНУ. 
Вторая цель во внимание не прини- 
нается. 

Итак, Вы стоите на аэродроне. 

В "окне" показаны координаты 
пели. клавишей Н можно переклю- 
чать на координаты Вашей базы. 

НОС - направление, 

ВСЕ - расстояние в нилях. 

Переключите Радар на 25 нидь. 


оценить Ваше положение относи- 


6 3ак.390 
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Справа появится точка - это цель. 
| Взлетайте и лохитесь на курс. 
Когда до цели останется неньше го 
|миль, переключайтесь на УР “Мей- 
вирик". На экране повится крест. 
|Нажмите 5 и головка наведения ра- 
кеты захватит цель. При этом на 
| экране бортового компьютера поя- 
вится надпись 1ОСКЕО, Не рекомеч- 
дую захватывать цель на расстоя- 
нии больше 20 миль - велика веро- 
Иатность промаха. После захвата 
|Ицели нажмите "ПРОБЕЛ" - ракета 
попапет в цель. Следить за ней 
Пможно по радару, Если ракета 
попала, компьютер выдаст ТАБСЕТ 
РЕБТКОУЕР - цель уничтожена, Если 
икомпьютер выдал Н!1$5 ТАКСЕТ РЕЗ- 
ТЕОУЕР - значит Вы уничтожили 
главную или одну из главных це- 


можете вер- 


взлетную полосу и выключить дви- 
гатели. 

Носле этого Вас спросят, хоти- 
те ли Вы повторить ниссию. Если 
нет, то нужно загрузить блок, 
после загрузки которого Вам снова 
покахут карту и курс, 
летали, а также скажут. сколько 
целей Вы подбили и засчитывается 
Ван эта миссия или нет. После 
этого запросят, желаете ли Вы 
ПРИНЯТЬ Следующую ниссию или на- 
чать игру с самого начала, ЕСЛИ 
вы хотите сыграть в следующую 
миссию, снова загрухжайте блок 
ниссий и выбирайте  СОУЕКТ. Вы 
увидите, Что открылась вторая 
подниссия - ВЕПСЕ ЕНО. Это уже 
нанного более сложное задание, 
так как появляются санолеты про- 
тивника, Самолеты можно сбить 
пушкой, что очень сложно. Но 


которым Вы, 


' СОВЕТЫ ЭКСПЕРТОВ | 
ножно и с помошью ракет “Сайдуин- 


дер". Если на радаре появился са- 
молет - переключайтесь ва 
уиндер", 
жения появятся расстояние до са- 
молета, 
Скорость. 
его в центральный 
появления сообщения ГОСКЕР - пус- 
кайте ракету’ и вражескому само- 
лету не миновать уничтожения. 
Ваш самолет в отличие от вра- 
хеских имеет вознолжность выпус- 
кать радиолокационные и’ тепловые! 
ловушки ПРОТИВ вражеских ракет, 
Радиолокационная - 
‘тепловая - клавиша Р. 


Если то, 
интересно, 
и пусть не отвернется от Вас 
Удача: 


"Сайд- | 
При этом в экране воору- 
его высота, направление и 
Теперь нужно поймать! 
экран. После 


клавиша С, 


что Вы прочитали, Вам 
снело стартуйте в небо 


мегсепагу 
«НОУАСЕНи 
1987 
Эксперт: Кустов Г. В. 
г. Львов 


Я хотел бы выступить в качес- 
тве неофициального эксперта ‘и 
рассказать про очень интересную, 
на мой взгляд, программу, которую 
можно было бы поставить Рядом с 
"ЕЫТТЕ". Называется она “МЕЕСЕ- 
|НАКУ”. ПРО ЭТУ программу я нигде 
ничего не слышал и в Вашен журна- 
ле она тоже не затрагивалась. ду- 
маю, мои исследования пригодятся 
любителям этой программы. 
итак, "МЕБСЕНАЕУ езсаре #гот 
|кагё” можно отнести к жанру АВ- 
САРЕ/АОУЕНТОВЕ ©. эленентами 
РОЖЕ, так как главное - это 
унение ориентироваться в повзен- 
ных лабиринтах и даже в надзен- 
ных. В этой программе использова- 
на очень необычная объемная гра- 
|фика и для простоты видиные  объ- 
екты нарисованы только из ребет, 
т,е, есть уникальная возможность 
проходить сквозь объекты и рас- 
|снатривать их с любой из шести 
|сторон света. Этот эффект нас- 
только сильно захватывает, что 
забывается отсутствие геометри- 
| ческих плоскостей у нарисованных 
|объектов. В программе возможно 
пользование несколькими видами 
‘транспортных средств. Управление 
транспортом имеет разные особен- 
ности для каждого вида транспор- 
та. 
действие начинается с того, 
что Ваш эвезиный корабль стартует 
и берет курс на систему "САМКА 
Р1\Е". После этого бортовой ком- 
|пьютер сообщает о повреждении 
системы управления и корабль сби- 
|вается с курса, который невознож- 
|но откорректировать. Вы летите 
|прямо на какую-то планету, катас- 
|грофа неминуена и... `Вы разбивае- 
‘тесь. 
| Оказавшись на поверхности, вы 
получите сообщение - о коде вой- 
ны ‹ между РАБУАК и  НЕСНАНОТО 
(РАБУАК - это люди,  МЕСНАНОТО - 
Роботы). Вы находитесь возле аэ- 
Робазы, где стоит самолет. У Вас 
с собой 9000 кредитов, а самолет 


. или ТОовВОо-автомобилен, 


стоит 5000; Все же, его желатель- 
но купить, иначе вряд ли Вы дале- 
ко ‘уйдете пешком. 

Итак, Ваша миссия: как  наем- 
ник, работая на людей (котя мож- 
но работать и на роботов) Вы дол- 
жны найти главного робота и про- 
дать его людям для предотвраше- 
ния войны, а такхе` найти и доста- 
вить различные предметы. В виде 
прении за них Вы должны получить 
более 1060000 кредитов, на кото- 
рые можно купить новый корабль и 
ПОКИНУТЬ ЭТУ негостеприимную пла- 
нету, заверщив тем самым свою 
миссию. 


. Выбор управления возможен одив 
раз, в начале игры - Вы выбираете 
один из трех возможных типов 
дхойстика.. Кроме выбранного джой- 
стика есть управляющие клавиши на 
клавиатуте: 

1, - выход из транспорта 

В - вход в транспорт 

Т - взять предмет 

р - положить прдмет 

Е - подъем/опускание лифта. 

1,2, 3,4 - перекаючение скоростей, 
соответственно 12,3 и 4 
скорости. 

ВВЕАК - Сброс Скорости до 0. 

К - плавное увеличение. скорости. 

У - плавное уменьшение скорости, 

С$+5 (САР 5НТЕТ + 5) - вывод на 

ленту игровой ситуации, 

С5*+. - ввод с ленты отгруженной 

игры. 

С5*+0 - экстренный вызов санолета. 

В случае управления героем, 
джойстик действует так: 


"ВВЕРХ" - вперед, 
"ВНИЗ" - назад, 
"ВПРАВО" - вправо, 


"ВЛЕВО" - влево, 

"ОГОНЬ" - не действует. 
Если Вы управляете автомобилем 
джойстик 
действует так: 

"ВВЕРХ" - не действует 
“ВНИЗ” - неё действует 
"ВПРАВО" - вправо, 
"ВЛЕВО” - влево, 
"ОГОНЬ" - огонь. * 

В самолетах и в. летающей та- 
релке - следующее соответствие; 

"ВВЕРХ" - ВНИЗ 
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дит так же, как и выгрузка, толь- 
ко в начале надо нажать С5+1, вме-| 
Сто С5+5. 


ВЫГРУЗКУ ИГРОВОЙ СИТУацИи ОСУ- 
шествляют нажатием С5+5. 
этого в строке для сообщений вы- 
дается запрос, 
хать 1...4. Это позволяет вывести 
на ленту четыре разных игровых 
ситуации. 
номер, 
нент загрузки. 
рузка под несколькими нонерани 
ножет, 
на рискованную операцию. Тогда Вы} 

‚ выгрухаете игровую ситуацию до| 
операпии под одним номером, а 
после операции - под другим. За- 
Грузка игровой ситуации происхо-| 


После запуска программы в них-| 
‚ней части экрана появится табли- 
ца, 
цию. 


"ВНИЗ" - вверх 
ВПРАВО" - вправо, 
"ВЛЕВО" - влево, 
“ОГОНЬ” - огонь. 


РАБОТА С ЛЕНТОЙ. | 


После! 
какой блок выгру- 
У каждого блока свой! 
КОТОРЫЙ ПРОВеряется в мо- 


Пригодиться выг- 


когда Вы идете, к примеру, | 


ЭКРАН ПРОГРАММЫ 


отражающая текушую инФорна- 


Е | 


Е 


ИИА 


10] 


бла 


Рис. 1! 
прибор, показывающий угол 
тангажа 
высотомер 
локатор 
спидометр 
компас 
строка инфорнационных сообще 
ний 
индикатор снижения высоты 
(действует, когда высота 
неньше 300 метров). 
индикатор неталлоискателя. 


ОПИСАНИЕ ТРАНСПОРТНЫХ СРЕДСТВ 
И ПРЕДНЕТОВ. 


я Итак, очутившись на поверянос- 
йти незнакомой планеты, Вы получи- 
ли предложение купить нобильный 
псамолет, что и делаете нажатием 
клавиши У. Этот мобильный санолет 
имеет Фантастические возможности. 
|Он за секунду разгоняется до 1500 
Вки/час{!) м за столько же сбрасы- 
вает скорость до нуля. Ножно 
плавным увеличениен 4-ой скорости 
празогнаться и до 4900 км/час. 
ПНожно даже зависнуть на любой вы- 
соте и, кувыркаясь во все сторо- 
ны, как внутри шара, оснатривать 
местность под любыни углами. Уп- 
правление очень простое. ЕДИН- 
(ственно, при посадке нужно выби- 
Йрать 1-7ю или 2-ую скорость с 
УГЛОМ тангажа не более 15 град. 

| Ямеется еше один самолет. он 
инакодится в ангаре с координатами 
по локатору "инк-ик". внешне он 
прокох на соврененный истребитель. 
Его отличительная особенность - 
пбольшая СКОРОСТЬ, более 7000 


на высоту до 99999, 

В квадрате 03-00 в ангаре на- 
\ходится летающая тарелка. Основ- 
Иное Отличие от самолетов - низкая 
искорость (1800 км/час), отсутст- 


В квадрате (координаты по до- 
Гкатору 09-05) в ангаре находится 
ИТОкНО-автомобиль, который разви- 
вает скорость по земле до 1800 


разгоняться до 300 кн/час. 

| Всего в игре имеется 7 ангаров 
[с лабиринтани. Шесть подземных 
|ангаРов в квадратах: 09-06, 
109-05, 03-00, 11-13, 81-35, ии-кк 


164997 метров над квадратом 08-08. 
| Нетод отыскания ангаров. Вход 
в ангар выглядит, как наленькая 
плошадка, обнесенная с' трех  сто- 
Рон забором. Если ангар в черте 
города, то находится он возле 


Примерно через две минуты ‘пос- 
ле покупки самолета Вам сообщают. 
что нужно лететь в квадрат 09-06. 
Наберите высоту примерно 100 нет- 
Ров и, маневрируя самолетом. вой- 
дите в этот квадрат. Следите за 
высотой, ножно разбиться. Попав’ в 
|нужный квадрат, погасите скорсть 
до нуля и осмотритесь, в поисках 
входа в ангар. Осторожно садитесь 
|на зенлю и подкатите на колесах 
ко входу. Можно оставить саколет 
(или другой транспорт) на поверх- 
ности в удобном месте, а ножно 
эместе с самолетом заехать ‘на 
пифтовую плошадку и опуститься в 
ангар. В ангаре и в лабиринтах 
транспорт не действует, поэтому 
нужно из него выйти и дальше идти 
пешком. 

Ангар в квадрате н*-к обнару- 
хивается так. Сначала надо доле- 


Рис. 


1 


14 з>ъ 


р т 
за #2 
Назначение 


Назначение 


-нохезоа 


Прямоугольная дверь. 
Ножно войти без ключа. 
Телёпортатор двухсто- 
роннего действия (туда 
и обратно). 
Телепортатор односто- 
роннего нействия (туда) 
При полытке в нее войти 
будет сообщение ТОСКЕВ 
(закрыто). Чтобы пройти 
нужно инеть с собой 
кристалл такой же Формы 
как и дверь. 

то же 


При входе в нее будет 
очень темно, поэтому 
нужно выйти задом. 
необходино иметь с со- 
бой РНОТОН ЕНТТЕВ ($0- 
тонный прожектор} для 
прохождения в эту дверь 


Вход в лифт, поднинаю- 
ший наверх. 

Вход в лифт, опускающий 
ВНИЗ. 

Войдя в нее Вы телепор- 
тируетесь и перепутает- 
ся структура лабиринта 
относительно компаса 
(запад на восток), вой- 
дя во 2-ой раз, ситуа- 
цию можно исправить. 
Если эта дверь находит- 
ся в лабиринте, который 
находится на высоте 
64997, то Вы вывалитесь 
и упадете на землю и 
растеряете все предметы 
которые были с вами. 
Если эта дверь находит- 
ся в подземном лабирин- 
те, тогда из этой ком- 
наты нет обратного пу- 
ти. И придется вызывать 
самолет с потерей всех 
предметов или заново 
ВВОДИТЬ ИГРУ. 


те 
з 4 


2 2 
5 & 
Рис. 
назвавие назначение 


Включает прицел для точного 
наведения на объект 


Дает возможность нобильнону 
самолету развивать скорость 
до 9500 км/час и взлетать 
на высоту 99999 н. 


АНТТСКАУ 
антигравитатор 
как 


С его помошью нохжно брать с 
собой тяжелые предметы: такие 
“нейтронное топливо” и все 
виды транспорта. 


АНТЕННА 
антенна 


Имея ее в СОНММОНТСАТТОН. ООН 
{квадрат 09-06) Вы можете ку- 
пить ракету за 999999 кредитов 
и Ван дадут информацию о ее 
местонахождении для того, 
чтобы на этой ракете завершить 
миссию. 
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|теть ло квадрата 99-99, потом, 
|Шри появлении квадрата кк-ни 
сбросить скорость и с высоты око- 
ло 4000 метров посмотреть, где 
ивяизу вход в’ ангар. 

| точка, висяшая над городом - 
это тоже ангар. Он находится на 
высоте 64997 метров, Нужно взле- 
теть на эту высоту. Вы увидите в 
Ивоздухе большую плиту, садитесь 
|на нее. В одном из УГЛОВ плиты 


несть квадратная площадка, являю- 
имаяся входом. 
Теперь о дверях, которые 


Ивстречаются в лабиринтах. В таб- 
лице (рис.2) даны краткие сведе- 
Иния о дверях: 

Все предметы, с которыми Вы 
столкнетесь по ходу игры, можно 
условно разделить на два класса. 
В одном классе предмет - товар, в 
другом классе предмет - навигаци- 
онное средство. 
| В табливу 

предметы, 
гации. 


(рис. 3} внесены 
необходимые пля вави- 


А теперь рассмотрим предметы, 
|интересующие покупателей. Их нох- 
йно использовать для продажи. В 
Иследующшей таблипе (рис.4) дана 
информация о том, где взять товар 
пи где его продать. 

| О’ преднетах нохно сообщить еше 
|йтакую особенность. Если на базе 
| (квадрат 03-00) взять МЕСНАНОТО 
| (робота), то после этого нельзя 
Издесь продавать предыеты, С собой 
можно одновременно иметь не более 


десяти предметов. В таблице, про- 
|тив некоторых предметов стоят 
знаки “?“. Пока значение этих 


|предметов невыяснено. Нохжет быть, 

кто-нибудь выяснит этот вопрос? 
В заключение прилагаю карты 

лабиринтов (рис. 5... 12). 


На картах лабиринтов есть од- 
носторонние и двусторонние теле- 
портаторы, не отмеченные куда они 
телепортируют. некоторые из них 
телепортируют каждый раз в другое 
место. а некоторые еше не изуче- 
НЫ, ЕСТЬ И другие неиссаедованные 
ВОПРОСЫ, например; почему в горо- 
де все строения можно сбивать 
выстрелами своего оружия? Что за 
самолет, постоянно летающий над 


1 СОВЕТЫ ЭКСПЕРТОВ Г 


09-05 


МЕТА!, РЕТЕСТОЕ Обнаруживает над. землей вход 
металлоискатель В любой ангар. 
РНОТОН ЕМТТЕЕ Необходим для прохождения 09-05 


Фотонный прожектор|комнат с дверями (11) 


р > 
о Е Е 
з 2 з 4 323 14 
С р 
К. Л й 
5 5 та ы ро 

х\ И 
Е: ЕТ: аа 12 ` 
Обозна-! Название й Где взять Где продать 
чение 
: ЕНЕРСУ СРУЗТА либо в 03-00, ‘либо 
энергетический 09-06 в РОМЕЕ ВООМ (08-08) 
кристалл 
2 САТЕРТНС 
РРОУТ5ТОН 09-06 в КЕТСНИН (08-08) 
провиант 
з НЕРТСМ, 
ЗОРРЕТЕЗ 09-05 в ШЕТЕМАЕТ 
недикаменты {08-08) 
4 ТАВСЕ ВОХ в 1НЕТЕМАЕТ 
большой яшик 09-06 } (08-08) 
5 НЕОТВОН ЕУЕ В ЕНСТНЕ РООМ 
нейтронное топливо 09-05 (08-08) 
5 ОЗЕР, АЮМАМЕНТ В АРМОЦЕЕУ 
бручие 11-13 (03-00) или (08-08) 
7 ЕБЗЕВТТАТ, 12939 . в СОНЕЕБЕНСЕ КООН 
ЗОРЕХ РЕРЗ1 03-00 {08-08) 
8 МЕСНАНОГР в ШТЕРУТЕХ РООН 
робот 03-00: (08-08) 
9 СОР золото 81-35 В ЕХСНЕОУЕЕ (08-08) 
РАТА ВАНЕ ь в СОНТРОГ, вООМ 
банк данных инки (08-08) 
в ГАВОВАТОВУ 
мин. (03-03) ‘или 108-08) 
12 АНТТ ТТМЕ ВОВ 08-08 ? 
антибомба с часо- 
вым неханизном 
13 СНЕЕЗЕ сыр 11-13 
14 НОУАРРТУЕ инки 
управление 
15 СОЕЕ1Н ГРОб 09-05 2 


Городом ПО ОДНОМУ М ТОМУ Же КУРСУ 
на высоте 500 метров? Можно ли 
увидеть самого себя? 


Успеха Ван! 
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ОТСЕУ 


сегодня в. рубрике "Сделайте 
сами” мы предлагаем интересную 
настольную игру в кости. это ва- 
Риация на тему известного “поке- 
ра”. Тем, кто знает, что это та- 
кое, наверное ничего объяснять не 
надо,‘ для тех же, кто с ним не 
знаком, поясним, что бросая пять 
игровых Костей, нужно стараться 
создать на них одну из комбинаций 
выпавших очков. Для того, чтобы 
это было возможно, после первого 
броска разрешается перебросить те 
кости, которые Вас не устраивают. 
О том, что это за комбинации и 
как они оцениваются, мы говорить 
не буден. в листинге программы 
эта информация есть. 

Покер требует в определенной 
степени умения мыслить конбина- 
ТорНо, принимать правильные ‘реше- 
ния. Известно, что против теории 
вероятности не пойдешь, но тем не 
ненее, есть игроки, которые игра- 
ют лучше, а есть играющие хуже. 
Очевидно. первые придерхиваются 
какой-то выигрышной стратегии а 
вторые ее еше не выработали. 
данная игра дает двойную воз- 
Ножность для реализации Вашей 
стратегии. дело в том, что за на- 
бранные комбинации Вы не просто 
получаете очки, а имеете возмох- 
ность передвигать по результатам 
броска Фишки на игровом поле. 
Надо ешё хорошо подумать, прежде 
чем добиваться той или иной ком- 
бинации, к чему Вам следует стре- 
ниться. Это зависит от конкретной 
ситуации на игровом поле. 

‚ Игра нравится даже тем, кому 
вообше игровые программы не нрРа- 
вятся, и мы надеемся, что и Вам 
она доставит много радости. 


Хочется сказать несколько слов 
© проблеме "ошибок в листингах“. 
Это бичь всех компьютерных хжурна- 
лов и У нас в "2Х-РЕБЮ" это слу- 
Залось. Трудоемкость подготовки 
статьи с игрой для Вас, увахаеные 
читатели, примерно в ‘Три раза 
выше, чем любой другой аналогич- 
ной статьи в связи с необходимос - 
тью многочисленных проверок, пе- 
репроверок и отладок и, тем не 
менее, Вы сами знаете, что ошибки 
проникали в окончательный текст. 
Это досадно, хотя и не вредно для 
тех, кто хочет не просто набрать 
програмну, но при этом еше и 
освоить програмнирование. 

Сейчас ны изменили ‘технологию 
`Вюодготовки програмн для самостоя- 
тельного набора и ошибки практи- 


аа масаеиье 1 
Т со 598 92то 


чески исключены. Можете смело 8 С1.5 : ВОБРЕВ 1: ТИК 0: РАРЕ 


набирать и запускать програнну. ВТ | 

Если что-то не сработает, прове- 9 РЕШИТ АТ 10,0; ЕТАЗН 1; ТНК 

ряйте правильность ввода. 1; РАРЕВ 6; "СЕЙЧАС Я ПОДГОТОВЛЮ| 
Наша технология такова: снача- ИГРОВОЕ ПОЛЕ" 

ла программа набирается, отлахи- 10 60 508 9900: ВЕМ Ц. Б.6. ====| 

вается, русифицируется на’ “Спек- {5 БАНРОМТЕЕ | 

труме": Когда она полностью ра- 20 1Н Т(5):01М Е(5): ТМ 2%(6) 


ботоспособна, она “сбрасывается” БЕТ Т$-СНЕ$ 132+СНЕ$ 136:1ЕТ В 
на диск (Т-005), после чего — =СНЕ® 129*+СНВЗ 130 | 
программными ‘средствами переко- 30 РТМ 0(5,г,1): РОВ Т=1 ТО 5: 
дируется “синволика” и конверти- . РОВ Н-1 ТО 2: КЕАБ Р: БЕТ Б(Т,Н 
руется Формат записи в 15005. В ‚1)=Р: НЕХТ М: НЕХТ Т 
виде Файла Н50О5 она верстается и 34 ВЕМ ПОДГОТОВКА КООРДИНАТ ИГ 
распечатывается на 1ВМ-компьюте- РОВОГО ПОЛЯ И ИЗОБРАЖЕНИЯ ФИШЕК: | 
ре. Поскольку все операции авто- 35 ПИ (9): ПМ Х(15) | 
натические, то ЛИСТИНГ, КОТОРЫЙ 40 РОВ 1=0 ТО 8: ВЕТ У(1+1) -2«]| 
Вы видите перед собой, точно со- Е: МЕХТ Г 
ответствует тону, что было в 50 РОВ 1=1 ТОТ: ТЕТ Х(т) =2иГ: 
паняти "Спектруна", когда про- НЕХТ Г: РОВ 1-8 ТО 13: ВЕТ Х(1) 
грамма была отлажена и работала, 2%1+1: НЕХТ Т 
и ошибок здесь просто не должно 60 ГЕТ Е!-0: БЕТ Её:0; ОМ Е(9| 
быть. ): РОВ 1=1 ТО 9: БЕТ Е(1)=Т: НЕХ 
тт 

Несколько слов о русификации. 65 С1,5 :; 1Е РЬАУ=е ТНЕН ТЕТ С 
Ны придерживаемся ранее принятого 0:1: РЕШТ АТ 10,6; ТЕ 1; "ПЕРВЫ! 
нами способа русификации. Если Вы И ИГРОК НАЧИНАЕТ": РАОЗЕ 75 
с ним не знакомы, Вам понадобятся 66 ТР РЬАУ:1 АНО С0-1 ТНЕН РВ 
выпуски 7х-РЕВЮ НЗ, 4 за этот год ТНТ АТ 10,1; ШК 1; "КОНПЬЮТЕР НА 
и, ножет быть, Н 1,2 тоже за этот ЧИНАЕТ": РАОЗЕ 15 | 
год. 67 ТЕ РЬАУ=1 АНО 60--1 ТНЕН Р! 
инкиинииииккиииииииииининиминииии ВЕЕТ АТ 10,4; ТК 1; "0о.К. - ВЫХ 

. ОДИТЕ ПЕРВЫМ": РАЦЗЕ 75 


1 60 10 з 

2 СЬЕАК 64599: БОАР "сьг"СОРЕ 
64600 

3 ВОЕБЕЕ 1: РАРЕК 1: С1.5 : РО 
КЕ 236586, 8: РОКЕ 23606, 88: РОКЕ 


23607, 251: НА ПОБЕДУ 
4 РЕТЕТ АТ 10,5; ТЕ 3; ВЕСН 100 РЕТ 60:60=-1. | 
Т 1; "ВАМ НУЖНА ИНСТРУКЦИЯ?“; АТ 1 200 РЕШНТ АТ 21,0; 1НК 1; РАРЕЕ 
2, 6; "НАЖМИТЕ <У> ИЛИ <Н>”: ВЕБЕР 6;” ПЕРВЫЙ БРОСОК 
.5,3: ВЕЕР. 35,0 р ы | 
5. 1Е 1НКЕУ$-"® ТНЕН 0 ТО 5 202 РОВ Н:1 ТО 10: РОБ 1=1 ТО 51 
6 1Р ТНЕЕУ$ -"У" ТНЕН 60 59В : БЕГ В(1)=1+ТЕТ (ЕКО*б): НЕХТ | 
9100: СО ТО 3 205 ВЕЕР .01, ТИТ (ЕНО*!0) 


изатгзоя 
. Посты 


ФУЯЛ: ТРИ <4> И ДВЕ «<6› 


НАЖМИТЕ ЛЮБУЮ клавишУ- 
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210 0 З0В 3500: НЕХТ м 
| 230 1Е РЕАУ-2 ОК 60-1 ТНЕН 60 
5уВ 3000 

231 ТЕ РЬАУ-1 АНО 60--1 ТНЕН 6 
Ю з0В 3600: 60 508, 5000: 60 508 


236 РОВ Н-! ТО 10 

240 0 50В 2400 

250 60 59В 3500 

255 МЕХТ НМ 

270 1Е РЬАУ-г ОВ 60:1 ТНЕН 60 
59В 3000 

271 1Е РЬАУ-1 АНО 60--1 ТНЕН 6 
О 50В 3600: 60 $508 5000: 60 $0В 
5500` у 

274 ТЕ М-0 ТНЕН С0 ТО 310 

275 РЬ1НТ АТ 21,0; 1МК.1; РАРЕВ 


5500 
234 Е М-0 ТНЕН 60 ТО 310 
|5; * ТРЕТИЙ БРОСОК 


235 РЕШНТ АТ 21.0; 1ВК 1; РАРЕВ 
| 
| 
| 
| 
| 


6; ВТОРОЙ БРОСОК 
216 ЕОК Н:1 ТО 10 

280 0 $50В 2400 

290 Со 50В 3500 

295 НЕХТ Н 

310 С0 598 3600 

315 ТЕ РЬАУ=1 АНО 60--1 ТНЕН С 
Ю 508 6300 

320 РЕТНТ АТ 21,0; $ 

330 РЕТНТ #1; К 6; " 
ТЕ ЛЮБУЮ КЛАВИШУ и 

340 РАЧЗЕ 0: 14РОТ ; 

350 1Е 60:-1 ТНЕН 60 ТО 370 


| 360 ТЕ РЬАЯ-г ТНЕН РЕТ 1 
1; АТ 21,0; 


НАЖМИ 


БРОСАЕТ ПЕРВЫЙ ИГРОК 


361 1Е РЬАУ-1 ТНЕН РЕТНТ ТВК 
1; АТ 21,0; " БРОСАЕТ КОМПЬЮ 
"ТЕР и 

365 С0 ТО 70 ; 

ЗТО 1Е РЬАУ=е ТНЕМ РЕТНТ ЕК 
2; АТ 21,0;" БРОСАЕТ ВТОРОЙ 


её; АТ 21,0; " БРОСАЕТ ЧЕЛОВ 
ЕК " 

380 с0 то 10 

2000 КЕМ 
ФИШЕК - 
2010 РОК Т то 
„Ос, 2,1): ОКАМ 15,0: РЕАМ 0, -15 
: ОБАМ -15,0: РЮАМ 0,15: РЕТИТ 


ИЗОБРАЖЕНИЕ КОСТЕЙ И 


ВЕТЕНТ 1; 
* (1-1); 1; -"; НЕЯТ Т 

2020 РОВ 1-1 ТО 9 

2025 ТЕ 1-Е! ОВ 1:Е2 ТНЕН НЕХТ 
т : 
2026°.1Е 1:10 ТНЕН со ТО 2040 
2030 РЕТНТ ОУЕВ 1; ТМК 1; РАРЕЮ 
6: АТ УГ), ХЕ); ТЗ: АТ УС) +1, 
#(2(1)); $: МЕХТ т 

2040 1Е НОТ Е! АНР НОТ Е2 ТНЕН 
ВЕТОВН 

2050 1ЕТ О15Р1=015Р1*СО: БЕТ 01$ 
р2:рт5Р2*бо у 

2060 ТЕТ Е(Е!) -Р(Е!) +2151 

2070 ТЕ Е(Е!)<1 ТНЕН ЪЕТ Р(Е!) = 
1 

2080 ТЕ Р(Е!)>13 ТНЕН ТЕТ Е(ЕЮ) 
а 

2090 РЕТНТ ОУЕЕ 1; ТМК 1; РАРЕВ 
6: АТ У(Е!), (Е(ЕР);Т®АТ У(Е) 
+1. Х(Е(Е!)); В$ 


| 
| 
| 
ИГРОК О 
371 ТЕ РЬАУ=1 ТНЕН РЕТНТ 1 


Рот 0(1, 1,1)” 


ТНК 0; РАРЕВ 4;АТ 19,6` 


СДЕЛАЙТЕ САНИ | 


2100 ТЕ НОТ Её ТНЕН ВЕТОВН 

2110 ТЕТ Р(Е2)} =Р(Е2) +2Т5РО 

2120 1Е Р(Её)<1 ТНЕМ ТЕТ Е(Её): 

1 

2130 ТЕ Р(Е2) >13 ТНЕН ЁЕТ Е(Её) 

#13 

2140 РЕТМЫТ ОУЕВ 1; 14К 1; РАРЕЮ 
6: АТ У(Е2), Х(К(Е2г) ); ТФ; АТ У‹Е2) 

+1, Х(Е (Её) ); В$ 

2150 ВЕТОЕН 

2400 РЕМ СБРОС ЗНАЧЕНИЙ КОСТЕИ-- 

2410 РОЕ 1-1 ТО М: БЕТ В%(Т(ТГ))=1 

*1ТНТ (ЕМО»б): МЕХТ Г 

2420 ВЕЕР. 01, 1ЫТ. (ЕНО*10) 

2430 ВЕТОЕН 

2999 КЕМ ПОВТОРНЫЙ БРОСОК = ====: 

3000 ГЕТ ®$="": ТЫРОТ АТ 0,0; "ВВ 

ЕДИ У ЕСЛИ О.К. ИЛИ Н ЕСЛИ НЕТ"; 
ГЛНЕ $ 

3010 12 В$<>"У" АНО Е$<>"М" ТНЕН 
20 то 3000 

3020 1Е ®$=-"У" ТНЕН СО ТО 310 

3030 ТНРУТ "СКОЛЬКО КОСТЕЙ ПЕРЕБ 

РОСИТЕ? ";Н 

3080 ЬЕТ Н= ТНТ М: 

ТНЕМ 60 ТО 3030 

3045 РЕТИТ #1; РЬАЗН 1; Ка; Р 

АРЕБ 1; "БУДУТ ПЕРЕБРАСЫВАТЬСЯ КО 

СТИ... ”: РАШБЕ 50 

3050 РОБ Г:1 ТОН: 

НОМЕР : ”;Т(1): 

) 

3055 1Е Т(Г)<1 ОБ Т(1)>5 ТНЕН © 

о то 3050 

3060 НЕХТ Г: ВЕТОЮН 

3499 КЕМ ПЕЧАТЬ ЗНАЧЕНИИ КОСТЕИ- 

3500 РОЕ 1-1 ТО 5: РЕЕТ АТ 19,6 


ТЕ М<!1 ОВ Н>5 


ТНРОТ "КОСТЬ 
ГЕТ Т(1) =ТТ ТЕ 


«1-3; ЧНК Т; РАРЕВ О;Ю4Т): МЕХТ 
т 

3510 ВЕТУЕН 

3599 КЕМ СОРТИРОВКА ЗНАЧЕНИИ 
КОСТЕЙ ===": - Ё 


3500 РОВ Н-! ТО то $ 
я 


3610 1Р В(Т) < (1+1) ТНЕМ ТЕТ А= 


Е(1): ТЕТ В(Т) = (1+1): БЕТ В (1+1 
}-А 
3620 НЕХТ 1: МЕХТ М 


3629 КЕМ НОГр НО№ МАНУ ОЕ ЕАСН-- 
3630 ПЛН \(5,2): 1ЕТ СОУНТ:1: Е 
ТА:0 

3640 РОВ Н-1 ТО 5 } 

3650 1Е Н-5 ТНЕН 60 ТО 3700 
3660 РОВ 1-К ТО 4 

3670 1Р В(1)-В(1+1) ТНЕН ТЕТ С0 
ОНТ-СОУНТ+1: 60 ТО 3690 

3680 0 ТО 3700 

3690 НЕХТ 1 

3100 ТЕТ А=А+1: ТЕТ У(А, 2) =СОУНТ 
: [ЕТ УСА, 1) 800 
3710 ШЕТ Н:Н+СООНТ-1: 
: 

3720 НЕХТ Н 

3789 ВЕМ НАЗНАЧАЕМ ПЕРЕМЕННОЙ Х$ 
КОМБИНАЦИЮ КОСТЕЙ И УСТАНАВЛИВА- 
ЕН СЧЕТЧИКИ ПЕРЕМЕЩЕНИЯ ФИШЕК -- 
3790 отм Х$(32): БЕТ Е!=0: ГЕТЕ 
2=0: ЕТ 015Р1=0: 1ЕТ 01$Р2=0 
3800 1Р.У(1,2)<>5 ТНЕН 60 ТО 38 
го 

3801 ЮЕМ ПЯТЕРКИ 


ТЕТ СОУНТ= 


‹ 3802 ВЕТ к "ПЯТЕРКА <"+5ТЕ$ \(! 


14". 483 
3804 ГЕТ р15Р1=\(1,2)-1: 
У(1, 1): СО ТО 3930 


БЕТ Е! = 


3820 ТЕ (1,2) <>4 АН (2,2) <>4 
ТНЕН 60 ТО 3830 

3821 КЕН ЧЕТВЕРКИ ---- | 
3822 ТЕТ 015Р1=3: 1Е \(1,2):4 тн | 
ЕН ТЕТ Е1-У(1,1) 

3823 1Р У(2,2)=4 ТНЕН ТЕТ Е! =У( 
г. 1) 

3824 ВЕТ. Х$="ЧЕТВЕРКА `<"+(5ТЮЗ У | 
(1,1) АК У(1, 2) =4)+(5ТЕ$ У(2,1) 
АКП У(2,2)-=4)+">": 60 ТО 3930 
3830 ТЕ \(1,2)<>3 АНО \(1, 2) <>2 
ОВ У(2,г)‹>3 АМ У(а,г)<>2 ов УЕ 
1,2) -\(2,г) ТНЕН 60 ТО 3850 
3834 ВЕМ ФУЛЛ = 
3835 ТЕТ Хз-"ФУЛЛ: ТРИ <" + (5ТЕЗ 
У(1,1) АБО У(1.2)=3)+ (5ТЕ$ У(2, 1 
} АК У(2,2)=3)+"> И ДВЕ <"+(5ТВ 
$ \(1,1) АН Уст, 2) =2)+ (578$ У(2 
„7 АНО У(2, 2) =а)+">" 

3838 РОВ 1:1 Та 

3840 ТЕ У(1,2г) =3 ТНЕН ТЕТ 215Р1 
=У(1, 2) -1: БЕТ ЕЁ-У(Т, 1) 

3843 г У(Т,2)=2 ТНЕН ТЕТ Р15Рё 
=У(Е,2)-1: ВЕТ Е2-УЧ, 1) 

3845 НЕХТ Г: 60 ТО 3930 

3849 ВЕМ ТРОЙКИ: =-=== | 
3850 РОВ 1-1 ТО 3; ТЕ М. 2)-3Т 
НЕМ ТЕТ ОТЗР1-У(Т.2)-1: ВЕТ Е! = | 


У(1, 1): ГЕТ Х$-"ТРОИКА <"+5ТЕ$ У 
ревом 

3851 МЕХТ 1 

3854 РЕМ ПАРА ИЛИ ДВЕ ПАРЫ =-==-== 
3855 ТЕТ А=0: КОВ 1-1 ТО 5: У 
{Т,2)=2 ТНЕН ТЕТ. А-А+1: 


БЕТ В-Т 
3856 МЕХТ 1 } 
3860 1Р А-0 ТНЕН, 60 ТО 3930 
3870 ТЕ А:-ё ТНЕН 60 ТО 3900 


3880 ТЕТ Е1=У{В, 1): ТЕТ р1$Р1 -У( 
В,2) -1 

3895 ТЕТ Х$-"ПАРА <"+5ТЕ$ У(В, 1) 
+">": 60 ТО 3930 


3900 ТЕТ А=0: РОВ 1:1 ТО 5 

3905 ТЕ У(1,2)=2 АНГ НОТ А ТНЕН 
БЕТ А-1 я 

3910 ТР У(1,2)=2 АМО А ТНЕК ТЕТ 
В-Т 

3915 НЕХТ 1 

3920 БЕТ Х$-"ДВЕ ПАРЫ, <"+5Т0$ У 
(А, 1) +"> И <"+6ТЫ$ (В, 1) +" >" 
3925 ТЕТ ОТ5Р1-У(А,2)-1: ВЕТ Е1= 
У(А, 1): ТЕТ ОТ5РА-У(В,2) -1: БЕТ 
Е2-У(В, 1) | 
3929 ВЕМ  ИНИЦИАЛИЗАЦИЯ СУММЫ И 
НАРКЕРОВ БОЛЬШОЙ И МАЛОЙ СУМНЫ- - 
3930 ТЕТ ТОТА!.=О: БЕТ НТЕН-0: ВЕ 
Т 10-0: РОВ 1-1 ТО 5 
3940 ТЕТ ТОТАТ.=ТОТАТ.+В (Г): 
т 

3950 1Р ТОТА!.>12 АМР ТОТА!<23 тн | 
ЕН 60 ТО 3995 | 
3955 1Е ТОТАЕ.>25 ТНЕН ТЕТ НТСН- 
3 

3960 ТЕ ТОТАЕ>22 АМО ТОТАЕ‹26 ТН | 
ЕН ТЕТ НтбН-2 

3965 ТЕ ТОТА!.<10 ТНЕН ТЕТ 104=3 
3970 ТЕ ТОТА..>9 АНР ТОТА!.<13 ТНЕ 
ТЕТ 10м:2 

3975 ТЕ СОБЕ х$(1)<>32 ТНЕМ 60 
ТО 3985 

3979 ВЕМ БОЛЬШАЯ ИЛИ МАЛАЯ СУММА 


НЕХТ 


3980 60 50В 4010: ВЕТОЕН 

3984 КЕМ ВЫБОР КОМБИНАЦИИ =-=:== 
3985 1Р РЬАУ-1 АНО 60--1 ТНЕН © 
О ТО.3994 


3986 РЕТНТ АТ 21,0; "ВЫБИРАИТЕ, Н || 
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А ЧТО ВЫ ИДЕТЕ..... ”: РАОЗЕ 100 
{ РЫТЕТ АТ 21,0: "СУМНА / *;х$ (1 
РО 22); “?" 


3990 ТИРОТ “*5° ЕСЛЕ СУНИА, ИНАЧ 
Е °Х’; ®; ИЕ №8 
3991 1 5$<>"5" АНО 3<>"Х" ТНЕН 
60 то 3990 
3993 17 8$:"5" ТНЕН С0 59В ВИ 
3994 ВЕМ СТРИТ = 
13995 РОБ 1-1 ТО 4: Е ея 
1›+1 ТНЕЯ 560 ТО 3998 
3996 НЕХТ Г 
З99Т ВЕТ 1015Р1=(3 АНО ®(1}=6)+(2 
АВР В(1›-5): БЕТ Е!1-Т: БЕТ %$-{ 
®БОЛЬОЯ” АНО В {1-6} + { “МАЛЫЙ” А 
Ир @(1}-5}+” СТРИТ” 
3998 1Е СОШЕ Х$(1}=52 ТНЕН БЕТ 
х$-” НИЧЕГО :" 
4000 ВЕТОКИ 
010 ГЕТ Х$- ("БОЛЬШАЯ СУММА -° А 
МФ НТСН} + ("МАЛАЯ СУММА =” АНМО 10 
№) +5ТЕ$® ТОТАЕ. 
4020 ЦЕТ 015Р1: (ВЕН АНО НЕСН) + ( 
т.0м АНР 1,0}: ВЕТ 015Рё:0 
4030 ШЕТ Е! = (8 АНО НТСН) + (9 АЕО 
0%); БЕТ Е?-0 
4030 ВЕТОЕЫ 
$500 
4510 
4520 РОБ 1-1 ТО 9 
4530 1Р Р(1)<4 ТНЕН ЦЕТ А:А+1 
4540. 1Р Р(1)>1С ТНЕВ |ЕТ В-В+1 
4550 НЕХТ 1 
4560 1Р А>2 ОБ В>2 ТНЕН 60 ТО 4 
575 
$570 ВЕТУЕН 
4575 РОБ 1-1 ТО го 
14580 1Р РЬАУ=2 ТНЕН РЕШИТ АТ 21 
„5; РЪАЗИ 1; ВЕТЕНТ 1; ТК 1; РА 
РЕВ 5; "ПОБЕДИЛ "+ (“ПЕРВЫЙ АИО А 
>2) + ("ВТОРОН" АБО В>2)+" ИГРОК” 
4581 ТЕ РЬАУ=1 ТНЕН РРТИТ АТ 21 
„5; РЪАЗН 1; ВЕТЕНТ 1; ТЫХ 1; РА 
РЕВ 6; ("ПОБЕДИЛ КОНПЬЮТЕР!!!" АН 
Ш А>2)+(“ВЫ ВЫИГРАЛИ! ПОЗДРАВЛЯЮ 
„” АН В>2) 
4585 . 01,1: НЕХТ т 
4590 ГЕТ Е$=”": ТЕРОТ "СЫГРАЕМ Е 
ЩЕ? (°У’ ИЛИ °Н’) ”; БЕ 8$ 
4600 1Е в$-“” ТНЕН 60 ТО 4590 
4610 ЕР &$-="У” ТНЕН С0 ТО 4650 
4620 ЦЕТ Е$=””: 1НРОГ "КОНЕЦ? (* 
У ИЛИ 'Н*) ®; ГЕ 8% . 
$630 ТР 5$-"" ТНЕН 60 ТО 4620 
4640 ТЕ Е3-"У" ТНЕН С0 ТО 9998 
4650 60 ТО 4590 
4660 С1.5 : РЕТИТ *^“ВЫ НОЖЕТЕ ИЗ 
|НЕНИТЬ РЕЖИМ ИГРЫ, "*^"СНАЧАЛА ВВ 
ЕДИТЕ *"“1"* БЛИ "*2"" "ПО ЧИСЛ 
У ИГРАЮЩИХ; ЗАТЕН”” *” {ЕСЛИ ВЫ ИГ 
РАЕТЕ С КОМПЬЮТЕРОН) * * * "ВВЕДИТЕ 
*"-1"* ЕСЛИ ХОТИТЕ ХОДИТЬ" * * "ПЕР 
ВЫМ, ИНАЧЕ ВВЕДИТЕ “"1""” 
46ТО ТЫРУТ "ОДИН ИЛИ ДВА _ИГРОКА? 
*; РЬАУ 
4680 ЦЕТ РЬАУ-ТИТ РЪАУ: 1Р РЬАУ< 
1 ОБ Р.АТ>2 ТНЕНЯ 60 ТО 46570 
590 1ЕР РЕАУ-г ТНЕВ 60 ТО 60 
4700 ТЕРОТ ы 
-1. ЕСЛИ ХОДИТЕ ПЕРВЫМ, ИНАЧЕ 1: 
ат10 ЕТ СО=1ЕТ 60: ТР 60-0 086 
0>1 ОБ 60<-1 ТНЕН 60 ТО 4тТ00` 
щтго со то 60 


4999 КЕН ит НАРБЕРОВ ПРИ- 
ОРИТЕТОВ з 
5000 РТН Р{9 

о 

5010 РОК 1-1 ТО 9: БЕ и 
ФЯШКИ В КРАСНОЙ ЗОНЕ? === 
5020 1Р Р(1)<4 ТНЕН 1ЕТ А 1+1 
5030 1Р Е(11}>10 ТНЕН ТЕТ Аг-Аг+ 
: 

5040 МЕХТ 1 

5050 ЕР А1<>2 ОВ Аг‹>е ТНЕН 60 
то 5210 


. 5060 [ЕТ В1-Т 


5070 РОВ 1-1 ТО $ 

5080 17 Р(1)<В1 АНО Е(Т}>3 ТНЕН 
ТЕТ В1-Е(1Т): БЕТ Ва=Е 

5090 НЕХТ т 

5100 ТЕ В!-Т ТНЕН с0 ТО 5130 

5110 ТЕ В2<Т ТНЕН ЁЕТ Р(Вг) -1: 

ВЕТОВН 

5120 БЕТ Р(В2г)=Б2: КЕТЧЕН 

5130 БЕТ В1-13 

5140 РОК Т1=1 ТО б 

5150 ТЕ Р(1}<В1 АНО Р(1) >10 ТНЕЧ 
ЪЕТ В1-=Р{1): ТЕТ Ве! 

5160 ШЕХТ 1: ТЕ В1-14 ТНЕН СОТ 

О 5180 

5170 БЕТ Р(В2)-=1: 

5180 РОК 1-7 109 

5190 ТЕ Е(1}<В1 АНО Р(1}>10 ТНЕЯ 
БЕТ В1-Р{1): ЕТ В2=1 

5200 МЕХТ Г: ЪЕТ Р{В2):В2: ВЕТОВ 

= 

5240 12 А1<‹>2 ТНЕН 60 ТО 5280 

52г0 ВЕТ В!-14 

5230 РОБ 1:1 ТО 9 

5280 ТЕ Р(Г}<В1 АЮО Р(Т)>3 ТНЕН 
ЪЕТ В1=Р(И): ТЕТ Ва-1 

5250 НЕХТ 1 

5260 ТЕ В2>=Т ТНЕН ых ве Вг. 

: ВЕТОЕН 

52710 ШЕТ Р(Вг)-=1: ВЕТОБН 

5280 ТЕ Аг<‹>г2 ТНЕН 0 ТО 5380 

5290 ТЕТ Аё=0: РОБ. 1-Т ТО 9 

5300 1Е Р(1)>10 ТНЕН ТЕТ Аё-А2+ 

1 

5310 НЕХТ Г: 
5350 

5320 РОВ Т-Т ТО 9 

5330 17 Р(1)>40 ТНЕН ТЕТ РО) =} 

5340 НЕХТ Г: КЕТОЕН 

5350 ВЕТ В1-14: РОК 1-1 ТО 6 

5360 ТЕ Р(1)>10 АКО Р(Т)<В1 ТНЕН 
БЕТ В1-Е (1): ТЕТ Б2:1 

5370 НМЕХТ 1: ТЕТ Р(Вг)=1: 


ТР Аг‹г ТНЕН 60 ТО 


БЕТУХН 


5380 РОК 1:1 ТО 9 

5390 ТЕ РИ)-1 ТНЕН ТЕТ Р(1):3 
5400 1Е Р(1)=2 ОВ Р(1)=3 ТНЕН 1, 
ЕТ Р(1)=2 
5410 НЕХТ 1: 


5510 ЛЕ Р(1)=1 ТНЕЯ ТЕТ А-Т 
5520 НЕХТ 1: 12 А-0 ТНЕК 60 ТО 


5530 РОВ 1-1 ТО 5 
5540 1Р В(1)<>А ТНЕН . 60 553 621 


5550 НЕХТ Г: 1Р №:0 ТНЕН 60 ТО 


5560 БЕТОЕН 
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5570 ТЕ Р(1)>1 ТНЕН 60 то 5640: 
КЕН НЕТ СНЫСЛА ДЕЛАТЬ СТРИТ -=- 


5580 ТР Е!-Т ТНЕН 60 ТО 310 
5590 ТЕ Е!-0 АНР Е2-0 ТНЕН ЕТ 
Н-1: 1ЕТ ТС) =5: ВЕТОВИ 

5600 ТР Р(7)<>7 ТНЕН 60 ТО 5640 
: ВЕВ СТРИТ НЕРЕАЛЕН =========:= 


5610 ЕОБ 1-1 ТО 4 
5620 12 К(Т)}=Е1 ТНЕН ВЕТ И-1: 6 | 
ЕТ Т(1)-1: 
5630 НЕХТ 1 
5640 1 Р(8) <>8 ОБ ТОТАЬ<20 ТНЕН 
КЕН БОЛЬЩАЯ СУННА 


ВЕТУЕН 


60 ТО 5720: 
СОННИТЕЛЬНА Е 
5650 1ЕР ТОТАЕ.>23 ТНЕН 60 ТО 569 
о 
5660 РОК 1-3 ТО 5 


5670 1Е В(1)<4 ТНЕН СО 508 6210 | 


5680 ВЕТОВН 

5590 РОВ 1:4 ТО 5 : 

5700 1Е Е()<3 ТНЕН б0 ты 6210 
5710 ВЕТУЕЯ 


5720 1Е Р(9)<>9 ОБ ТОТА.>15 ТНЕН | 


60 ТО 5800: РЕМ МАЛАЯ СУММА СО- 


5730 ТЕ ТОТАЕ.‹12 ТНЕН 60 ТО 57т | 


о 
5740 РОВ 1-1 ТО З 


5750 ТЕ В(1)>3 ТНЕН 60 598 6210 | 


5760 НЕХТ 1: ВЕТОЕН 

5770 РОВ 1-1 ТО2 

5780 1Р 8(Т)>2 ТНЕК 60 508 6210 

5790 ЕЕТОЕН 

5800 1 р15Р!-1 АНО От5Р2-1 ТНЕН 
60 ТО 5860 

5810 1Е 015Р1<>1 ТНЕН 60 ТО 5980 

: ВЕМ ВЕТ ПАР Е ЕЕЕЕЕЕЕЕЕНЕЕЕЕЕЕ 

5820 РОВ 1:1 ТО 5 


5830 1Р В(1)<>Е1 АНО Р(Е1)-0 ТНЕ 


Н 60 50в 6210 

5830 1Р Р(Е1}>1 ТНЕН ТЕТ Н-4: Г 
Е 1>1 ТНЕМ ЁЕТ Т(1)-1 

5850 НЕХТ 1: БЕТОН 


5860 1Р Р(Е!} >1 АНО Р(Ег)}>1 ТНЕН | 
С0 ТО 5910: КЕМ ДВУХ ПАР НЕТ -= 
5870 Е Р(Е!) =0 АШО Р(Е?}-0 ТНЕН 
С0 ТО 5940: КЕМ ПРИНИМАЕТСЯ ДВЕ 


5879 ВЕМ 2 ПАРЫ, ПЕРЕБРАСЫВАЕТСЯ 
1 ПАРА И НЕПАРНАЯ КОСТЬ =::==:== 
5880 РОК 1-1 105 

5890 1Р В(1)<>Е2 АМО Р(Е2)-0 ОВ 
Е (1) <>Е1 АНО Р(Е!):0 ТНЕН 60 50 
В 6210 

5900 НЕХТ 1: ВЕТЛЕН 

5910 РОБ 1:1: ТО 5 

5920 1Е В(1)=Е1 ОВ Е(1}-Е2 ТНЕМ 
60 508 6210 

5930 НЕХТ 1: ВЕТОЕН 

5940 РОВ 1:1 ТО 5 

5950 ТР В(1)}<>61 АНО Е(1)<>Е2 ТИ 
ЕН 60 $8 6210 

5910 НЕХТ Г: РЕТОЮН 

5980 ТЕ 015Р1<>2 АНБ 015Р2<>2 ТН 
60 ТО `6110: БЕМ НЕ ТРОЙКА ==: 
5990 ТЕ 01$Р1:1 ОБ 015Р2-1 ТНЕН 
60 то 6050 

6000 РОБ 1:1 ТО 5 ] 

6005 ТР Е1=0 ТНЕН 60 ТО 6025 
6010 ТЕ 015Р1-2 АКО Е(Е!) >5- АН 
В (1) <>Е1 ТНЕН 60 598 6210 


65015 ТЕ Р(Е!}:3 АНД В(1)-Е! ТНЕН 
с0 59в 6210 й 

6020 1Р Р(Е!) <6 АНО Р(Е!) <3 АН 
в{1)<>Е1 ТНЕН ЕТ Н:1: ТЕТ Ти) 


6035 ЕР Р(Ег)-3 АНО я ТНЕН 
с0 ув 6210 

6040 1Р Р(Е2) ‹6 АБО Р(Еа) <3 АНО 
В (1) <>Е2 ТНЕН ЁЕТ Н:!: [ЕТ Т() 


6070 ТР Р(Е!)>1 АШО Р(Е2)>1 ТНЕН 
60 508 6210 

6080 ТЕ Р(Е!)>1 АКО Р(Её}=0 АНО 
(1) <>Е2 ТНЕН СО 598 6210 

6090 1Р Р(Е!)-0 АБР Р(Её)>1 АНБ 
® (Т}<>Е!1 ТНЕЫ С0 $08 6210 

6100 НЕХТ Г: БЕТУЕН 

6110 ТЕР 015Р1<>3 АНО 015Р2<>3 ОВ 


6120 РОВ Т-1 ТО 5 

6130 ТЕ В(1) <>Е!1 АБО 015Р1-3 ОВ 
В(1)<>Е2 АМО 01$Р2-3 ТНЕМН 60 $4 
В 5210 

6140 НЕХТ 1: БЕТОРН 

6150 ТЕ НТСН-3 ОВ 10:3 ОБ ОТ5Р1 
:4 ОВ Е! { ВИО РТ) = оао 
310: ВЕН ПЕРЕБРОСКИ 
5150 1 нисн: г АО Р{8)-О ТНЕН 
ЦЕТ И:1: ВЕТ Т()›:5: ВЕТОЕН 


ЕТ М-1: ВЕТ Т(1)=1: ВЕТОЕН 
6180 ТЕТ К-5: РОВ 1-1 ТО 5 
6190 ГЕТ Т{Т)=1: НЕХТ Г: ВЕТОРН 
6210 БЕТ Н-НМ+1: ТЕТ Т(М) =1 


(218) -НТСН) >3 АНО НТСН ТНЕН ВЕТ 
ВЯ 

6321} 1Р 01$Р1=2 АНО 015Р2=! АНО 
(Р(9) -104)>3 АНО 104 ТНЕЯ ВЕТОЕ 
я 

6322 ТЕ 01$Р1:1 АНЮ О15Ра-г АБО 
(Е(8)-НТСН)>3 АН ИТСН ТНЕЯ БЕТ 
ТОРН 

6323 1Е 015Р1=1 АНО 015Р2-2 АН 
{Р {9} -10%)>3 АНО ОМ ТНЕН ВЕТОЯ 
н : 

6330 ТЕ Р$РА>НТСН АКО НТСН ОЕ р 
15Р1>10% АНО ТОМ ТИЕН КЕТОЮН 
6340 ТР (Р(Е!)-015Р1) <4 ТНЕН КЕ 
"ГОРН 

6344 ТР Е?2-0 ТНЕН 60 ТО 6350 
6545 ТР (Р(Ег}-015Р2)<‹4 ТНЕН БЕ 
ТОВИ 

6350 1Р Р{Е!1) >10 АНО Е(8)<10 АБО 


6355 1 Р{Е2) >10 АНО Р(8) <10. АБО 
НЕСН ТНЕЯ  БЕТОРН` 
6360 ГР Р{Е!1) >10 АБО Р(9) <10 АБО 


10ы ТНЕН ЕЕТОЕН 

6364 1Р Её=0 ТНЕН 60 ТО 6370 
6365 ТР Р(Её) >10 АНО Е(9)‹10 АНБ 
0м ТНЕН ВЕТУЕН 

6570 60 50В 4010: БЕТОЕН 

8999 БЕМ ГРАФИКА 
9000 РОК 1=0 ТО 17: РЕАШТ РАРЕЯ 
б; АТ т, 14; " ": НЕХТ Г 

9005 РОБ Т=0 ТО 1Т: РЕТШТ РАРЕЮ 
б;АТ Г, 16; СНЕ$ (144*Г): НЕХТ Г 
9010 РОВ 1-0 ТО 1Т: РЕПНТ РАРЕВ 
г: АТ 1.2;2%; АТ 1.23;2%: НЕХТ Г 
9020 РОЕ 1=0 ТО 17: РЕТНТ РАРЕЮ 
4; АТ 1, 8; 2%; АТ 1,11;2%: НЕХТ Т 
9040 РЕОТ 15, 31: РОК 1:1 ТО $: В 
РАМ 216,0: РКА 0,16: ПВАМ -216, 
0: ОРАМ 0,16: НЕХТ 1: ОРАМ 216,0 
: БРАМ 0,16: ПВАМ -216,0 

9050 РОЕ 1-2 ТО 14 $ТЕР г: РОТ 
1*8-1, 175; ОКАМ 0, -143: МЕХТ Г; 
РОБ 1-17 ТО 29 5ТЕР 2: РЬОТ 1*8- 
1,115; ОБАМ 0, -143: МЕХТ 1 

9055 ТЕ РЬАУ:1 ТНЕН 60 ТО 90170 
9060 РЕТИТ ТЫЕ 1; АТ 2,0; "п"; АТ 
3.0; "Е"; АТ 4,0; "Р";АТ 5, 0; "В"; АТ 
6, 0; "Ы";АТ Т,0; "И"; АТ 8,0; ® ";А 
Т 9,0; “И”; АТ 10,0; "Г";АТ 11.0; "Р 
“АТ 12,0; "О"; АТ 13,0; "К” 

9065 РЕТНТ ШИК 2; АТ г, 30; "В": АТ 
3, 30; “Т”;АТ 4, 30; "О"; АТ 5, 30; "Р 
*;АТ 6, 30; "О*; АТ Т, 30; "И"; АТ 8,3 
0; * ";АТ 9, 30; "И"; АТ 10, 30; "Г"; А 
Т 11.30; "Р";АТ 12. 30; *О"; АТ 13,3 
0; К”: 60 ТО 9080 

9070 РЕТЫТ ТИК 1: АТ 4,0; "К"; АТ 
5, 0; "О"; АТ 6, 0; "М"; АТ Т, 0; "Ш"; АТ 
8, 0; "Б*; АТ 9, 0; "Ю"; АТ 10,0; *Т*; 
АТ 11,0; "Е; АТ 12.0; "р" 

9075 РЕТЫТ ТЕ 2; АТ 5, 30; "Ч"; АТ 
6, 30; "Е"; АТ Т, 30; "Л; АТ 8, 30; "О 
";АТ 9, 30; "В"; АТ 10, 30; "Е"; АТ 11 
‚ 30; "К" 

9080 1Е 60-1 ТНЕН РЕТНТ АТ 15,0 
; ТЫК Т; РАРЕЮ 0; ЕЪАЗН 1; ХК"; АТ 
15, 30; РАРЕВ Т;“ * 

9085 1 С0:-1 ТНЕН РЕШЕТ АТ 15, 
0; РАРЕВ Т;" ";АТ 15, 30; ЧЕК Т; 
РАРЕК 0; РЛ.А5Н 1; “Х" 

9090 БЕТОН 

9100 ВЕМ ИНСТРУКПИЯ 
9110 ВОБОЕЕ 1: ТЕ 
КТТ : (1$ 

9120 РЕТЕТ АТ 3,0: К 

ЦЕЛЬ ЭТОЙ ИГРЫ СОСТОИТ В ТОМ, 


ЧТОБЫ ПРОВЕСТИ ТРИ ФИШКИ В КРАС-` 


НУЮ ЗОНУ НА СВОЕЙ ПОЛОВИНЕ ПОЛЯ 
ДО ТОГО КАК ЭТО СДЕЛАЕТ ВАН СО- 
ПЕРНИК. ® 

9130 РЕТЕТ * ья 

ИГРА ВЕДЕТСЯ ДЕВЯТЬЮ ФИШКАНИ. 
СНАЧАЛА ОНИ РАСПОЛОЖЕНЫ В ЦЕНТРЕ 
ПОЛЯ НА ДОРОЖКАХ, ОБОЗНАЧЕННЫХ 
ит», этана, иебти, яние, = 
НН", мт... 

ЗА ОДИН ХОД ВЫ НОЖЕТЕ ПЕРЕ- 
ДВИГАТЬ ДО ДВУХ ФИШЕК. ВЕЛИЧИНА 
ХОДА ОПРЕДЕЛЯЕТСЯ РЕЗУЛЬТАТОМ 
БРОСАНИЯ ПЯТИ КОСТЕЙ. ® 
9140 60 508 9300 
9150 РЬТЕТ АТ 5,0; и 

ПОСЛЕ ПЕРВОГО БРОСКА ВЫ НОЖЕ- 
ТЕ ДВАХДЫ ПЕРЕБРОСИТЬ СТОЛЬКО 


КОСТЕЙ, СКОЛЬКО ХОТИТЕ. ПРИ ВТО- 
РОН И ТРЕТЬЕН БРОСКАХ РАЗРЕМАЕТ- 
СЯ ИСПОЛЬЗОВАТЬ ЛЮБЫЕ КОСТИ. " ! 
916 РАТЕТ * 7. 
ВАША ЦЕЛЬ ПРИ ПЕРЕБРОСКЕ КОС- 
ТЕЙ - СОСТАВИТЬ ТАКУЮ КОМБИНА- 
ЦИЮ, КОТОРАЯ ДАСТ ВАН ВОЗНОЯ- 
НОСТЬ ЛУЧШЕГО ХОДА ФИШКАНИ. " 
9170 60 5%В 9300 
9180 РЕТЯТ АТ 1,0; т 
ПРАВО. НА ХОД ДАЮТ СЛЕДУЮЖИЕ 
КОНБИНАЦИИ: “ * * * 
- АВЕ ИЛИ БОЛЬШЕ КОСТЕЙ ОДИНАКО- 
ВОГО ЗНАЧЕНИЯ 1...6 (ПЕРЕДВИ- 
ГАЮТСЯ ФИШКИ НА ДОРОЖКЕ С С0- 
ОТВЕТСТВУЮЩИН НОНЕРОМ); "^* р. 
*"СТРИТ*" - ПОСЛЕДОВАТЕЛЬНОС 
ть ИЗ ПЯТИ ИДУЩИХ ПОДРЯД ЗНАЧЕН 
ИИ КОСТЕЙ (ПЕРЕДВИГАЕТСЯ ФИИКА 
ПО ДОРОЖКЕ "р" - “"ВОН"");:" 
9190 РРЛЕТ * й 
- БОЛЬШАЯ СУМКА КОСТЕЙ - БОЛЬШЕ 
2г (ПЕРЕДВИГАЕТСЯ ФИШКА ПО ДО- 
РОЖКЕ “"Н** -. "*Н1СН""); *°°,° 
- НАЛАЯ СУННА - СУММА ВСЕХ КОС- 
ТЕЯ МЕНЬШЕ 13 (ПЕРЕДВИГАЕТСЯ 
ФИШКА ПО ДОРОЖКЕ *"1."" - "10 
„"). = 
$200 СО 50В 9300 
9205 РЕТНТ АТ г, 0; м 
КОНБИНАЦИИ ПОЗВОЛЯЮТ СДЕЛАТЬ 
ХОД НА ОПРЕДЕЛЕННУЮ ВЕЛИЧИНУ: ”. | 
9210 РЕТЯТ °ТАВ 17; "ПАРА - 1 ШАГ 
*°ТАВ 15; "ТРОИКА - 2 ШАГА” 'ТАВ 1 
3; “ЧЕТВЕРКА - 3 ШАГА*”ТАВ 14; "ПЯ 
ТЕРКА -. А ШАГА”'ТАВ 2; "БОЛЬШОЙ С 
ТРИТ (2-6) - 3 ШАГА” ” 
9220 РЕЗИТ ТАВ 48; "МАЛЫЙ СТРИТ (1 
-5} - 2 ВАГА”*ТАВ 2; "БОЛЬШАЯ СУН 
МА (>25) - 3 ШАГА" ' "БОЛЬШАЯ СУНИ 
А (23-25) - г ШАГА" 'ТАВ 4; “НАЛАЯ 
СУННА {<‹10} - 3 ЖАГА" *ТАВ 2; "МА 
ЛАЯ СУНМНА (10-12) - 2 МАГА" ” 
ЗАМЕТЬТЕ, ЧТО ЕСЛИ У ВАС ЕСТЬ 
ДВЕ ПАРЫ, ИЛИ ФУЛЛ (ПАРА+ТРОЙКА) 
ТО ВЫ ИМЕЕТЕ НРАВО  ПЕРЕДВИНУТЬ 
ДВЕ ФИБКИ. 
9230 60 508 9300 
9240 РЕТЫТ *°°ТАВ 11; "ЗАМЕЧАНИЯ" 
ЗАТ а. 1: ОЕ Ц т 
1) ВЫ НЕ ИМЕЕТЕ ПРАВА ХОДИТЬ ОД- 
НОВРЕМЕННО ПО ДОРОЖКАН ““"Н 
.. ее") М уме, бин, ге 


2) ФИШКА НЕ НОЖЕТ ВЫХОДИТЬ ЗА 


9245 РЕЛИТ * 7 
3) ИГРОК, ДЕЛАЮЩИЙ ХОД,  ОТНЕЧА- 
ЕТСЯ КУРСОРОМ *; РЪАЗН 1; ТИК 
7; РАРЕВ 0; "Х”; РЫАЗН 0; ТНК 6; 
РАРЕВ 1;°." 
9250 РЕТЕТ * | : 
4) НОМЕРА КОСТЕЙ — ИЗОБРАЖАЮТСЯ 
ЧЕРНЫМ ПО ЗЕЛЕНОМУ, НАПРИМЕР: 
”’'ТАВ 16; ТНК 0; РАРЕВ 4; "5-"; 
60 ЗВ 9300 
9255 ©15 : РЕШИТ АТ 5,0; й 
В НАЧАЛЕ ИГРЫ. ФИШКИ УСТАНОВ- 
ЛЕНЫ НА ЦЕНТРАЛЬНЫХ ОТМЕТКАХ. 
ОНИ ИЗОБРАЖАЮТСЯ ТАК: *’^ТАВ 15; 
ТЫЕ 0; РАРЕР 6;СНЕ® 132; СНЕ$ 13 


15393 


8; РАРЕЮ 1 ° ТАВ 15; РАРЕР в; СНЫ 


$ 129; СНВ$ 130 
9260 РЕТНТ * м 


ЕСЛИ ВЫ ХОТИТЕ ПРОЧИТАТЬ ЭТУ 
ИНСТРУКЦИЮ ЕЩЕ РАЗ, НАЖМИТЕ ‹1>, 
ИНАЧЕ НАЖНИТЕ ЛЮБУЮ КЛАВИЯУ. ..”: 

60 50В 9300: ПР ТНКЕУ®=*1" ТНЕН 
60 то 9110 

9270 ВОББЕЮ 1: РАРЕВ 1: 

15$ : РЕТНТ АТ 10,0; 


кб: с 


ЕСЛИ ВЫ ИГРАЕТЕ С КОМПЬЮТЕРОМ, 
ВВЕДИТЕ *"1””, А ЕСЛИ С ПАРТНЕРО 
М, ТО ВВЕДИТЕ ""2"". " 

9211 1НРОТ "ВВЕДИТЕ 1 илиг : "; 
РЬАУ 
9212 ЬЕТ. РЬАУ=ТЫТ РЬАУ: ТЕ РЬАЯ> 
2 ОВ РЕАУ‹1 ТНЕН 0 ТО 9271 
9215 1Е РЬАУ=г ТНЕН 60 ТО 9290 
9280 С1.5 : РЕЛНТ АТ 7,0; й 
` ПОЩАЛУЙСТА ИНЕЙТЕ ВВИДУ, ЧТО 
[КОГДА КОМПЬЮТЕР ПРИНИМАЕТ РЕВЕ- 
НИЕ О ТОН, КАКУЮ КОСТЬ ЕМУ ПЕРЕ- 
БРОСИТЬ, ОН РАСПОЛАГАЕТ КОСТИ В 
ПОРЯДКЕ ИХ ЗНАЧЕНИИ. "’’› 
9285 РЕТНТ ^* й 
ЕСЛИ ВЫ ХОТИТЕ ХОДИТЬ ПЕРВЫМ, 
ТО ВЕДИТЕ “”-1““ ИНАЧЕ ВЕДИТЕ “" 


1." 


9286 1НРОТ “ВВЕДИТЕ 1 ИЛИ -1 : " 
; са 

Э2в7Т ТЕТ СО=1ЫТ 60: ТР 60-0 ОВ 6 
0>1 ОК 60<-1 ТНЕН 60 ТО 9285 
19290 ВЕЕР . 25,3: ВЕЕР .15,0: ВЕЕ 


Р .15,0: ВЕЕР .25,3: (1.5 : ВЕТОЕ - 
м 
9300 РЕТЫТ #1; й 


НАШНИТЕ ЛЮБУЮ КЛАВИШУ...": Р 
ОЕ 0: ВЕЕР .25, 3: ВЕЕР . 15,0: 
1.5 : ВЕТУЕН 
9900 РОКЕ 23675, 88: РОКЕ 23676.2 
55: КЕЗТОВЕ 9900 
19901 РОК.1Т-0 ТО (18*8-1}: ВЕАБ А 
9902 РОКЕ И5В "А"+1, А: НЕХТ 1 
990 БЕТОЕН 
9905 БАТА 0, 8; 24, 56, 120, 88, 88, 24 
‚24,24, 24, 24, 24, 126, 126,0: РЕМ А 
&В:1 - , 
9910 РАТА 0,0, 60, 126, 70, 2,6, 12, 1 
2, 24, 24, 48. 48, 126, 126,0: КЕМ Сар 
2 
9915 РАТА 0, 126. 125, 6, 12, 24, 48, 9 
Б, 124, 126, 6,6, 102, 124, 120,0: ВЕН 
ЕР: 3 , 
9920 БРАТА 0, 6, 14. 30, 54, 102, 102, 1 
Юг, 102, 127, 127,6,5.6,6,0: ЮЕМ 6% 
|Н=4 
19925 РАТА 0, 126, 126, 96, 96, 96, 125 
|, 126,6, 6, 6, 12, 24, 112, 96.0: ВЕМ т 
#/-5 
9930 БАТА 0, 6. 12, 24, 24, 48, 48, 120 
‚ 108, 108, 102, 102, 54, 60, 24,0: ВЕМ 
Км,-6 
9935 БАТА 0, 56, 124, 102, 102, 108, 1 


08, 120, 112, 120, 108, 108, 102, 102,1 - 


02,0; ВЕМ М&Н-К - 

9940 РАТА 0, 102, 102, 102, 102, 102, 
02.126, 126, 102, 102, 102, 102, 102, 

102,0: ВЕМ О&Р-Н 

9945 БАТА 0, 96, 96, 96, 96, 96, 96, 95 

‚ 96, 96, 96, 96, 96, 126, 126,0: ВЕН © 

&Е-Ё 

9950 РАТА 20, 21, 68, 27, 116, ет, 164 

ь 2т, 212,27: КЕМ РТСЕ РОТ С0-ОВО 

5 


ЕЕ 


9980 ЗАУЕ "ОТСЕУ" МНЕ 2: 5АУЕ * 
свг" СОрЕ 64600, 768: УЕБТЕУ "ОТС 
БУ”: УЕРТЕУ “сьг” СОБЕ: 60 ТО 99 
98 

9990 ВАНРОМТЕЕ 95Е 15619: РЕМ : 
ЕВАЗЕ "Р1СЕУ" 

9992 КАМПОНТРЕ 05 15619: ВЕМ : 
ЗАУЕ “ОТСЕУ" НЕ 2 

9994 БЕТ ЕЕЕ-05Е 15619: КЕМ : УЕ 
ЖТРУ "РТСЕУ" 

9996 ТЕ ЕЕВ<>0 ТНЕН РЕ1НТ РЪАЗ 
Н 1; “ЕККОЕ!”: ВЕЕР 1,0: 5ТОР 
9998 ВЕЕР . 1,26: „1,20 

9999 ВОКРЕЕ Т: РАРЕВ Т: 11К 0: В 
втент о 


Автостарт програнны происходит 
со СТРОКИ 2. в которой загружа- 
ется символьный набор. 

В СТРОКе 3 пройскодит переклю- 
чение курсора с (11 на [С] для 
Упрошения опроса клавишей, а так- 
хе переключение на загруженный 
русско-латинский символьный — на- 
бор: 

В строках 4...6 организован 
ВЫВОД ИНСТРУКЦИИ ПРИ нажатии кла- 
виши “У”. (— Инструкция выводится 
ПРИ ПОМОШИ ПОДПРОГРАаНМЫ В СТРОКах 
с 9100. Прочитайте ее, Ван понят- 
нее будут многие моменты при от- 
ладке програнмы. 

После этого при поноши поди- 
рограммы 9210 происходит задание 
числа играющих. Возмозна игра 
"ЧЕЛОВЕК -КОМПЬЮТЕР” или "ИГРОК 1- 
-ИГРОК г”. Это определяет пере- 
ненная РЬАУ, соответственно имею- 
вая значение 1 или г. В том слу- 
чае, если Вы играете с конпьюте- 
ром, можно предоставить право 
первого хода Вам или компьютеру. 
Это определяется переменной 60 в 
строке 9286. В том случае, если 
играют два партнера, первым всег- 
да ходит ИГРОК 1. 

‚ В строках 84...10 Происходит 
задание 6-графики. Это выполня- 
ет подпрограима со строк 9100. 

Со СТРОКИ 15 начинается иници- 
ализация переменных, участвуютих 
в программе. Переменные Т$ и 8% в 
СТРОКе 20 определяют изображение 
фишек На игровом поле. 

Основной цикл ИГРЫ представлен 
в строкая 70... 380. Остальные 
СТРОКИ ПРОГРАММЫ (С 2000) явля- 
ются различными фрагментами и 
подпрограннаии, необходимыми для 
ИГРЫ. 

После ПРОРИСОБКи ИГРОВОГО ПОЛЯ 
в строках 170 и 80 и проверки 
условия победы в игре (строка 90) 
ПРОИСколиТ передача хола противо- 
ДРУГОМУ ИГРОКУ В СТРОК 100. 

В строках 260...210 организо- 
ван первый бросок. Значение 
костей изображается при помоши 
подпрограммы со строки 3500. да- 
лее (строка 230), если бросок вы- 
полнил человек, выполняется поди- 
рограима со строки 3000 - это па- 
уза для оценки результата и при- 
нятия решения о том, нужна ли пе- 
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реброска. Если не нужна, то прог- 
ранма делает скачок на строку 
310. А еслв нужна, то следует 
запрос о перебрасываемых костях: 
сколько их и какие будут переб- 
расываться. далее - возврат из 


подпрогранкмы, 
В строке 231 если был ход 
компьютера, им выполняются 


действия по оценке хода и опреде- 
лению приоритетного варианта при 
поноши подпрограмм со строк 3600, 
5000, 5500. Если в результате вы- 
полнения этих проверок опреде- 
лится. Что переброска не нужна, 
то произойдет скачок со строки 
234 на строку 310. Иначе програн- 
му  прополлает группа СТРОК 
235...255 это - выполнение второ- 
го броска для тех костей, которые 
требуют переброски. 

Строки 270...214 - это копия 
СТРОК 230...234 - здесь выполня- 
ются те же действия по оценке ре- 
зультатов броска. Е 

Аналогично выполняется и тре- 
тий бросок при помощи строк 
215...295, после чего програмна 
прододзается со строки 310. При 
поноши подпрОогРаННыЫ со СТРОКИ 
3600 происходит выявление резуль- 
тативной комбинации костей. то 
есть той, которая приводит к вы- 
полнению хода игроком. 

В строке 320 выяваенная ре- 
зультативная комбинация выводится 
на экран. После нажатия любой 
клавиши (строки 330, 340) пПРО- 
исходит передача хода противопо- 
ложной играющей стороне (строки 
350... 380), после чего программа 
зацикливается на ‘строку 70, то 
есть на повторение всех игровых 
действий. 

СТРОКИ 9980 и 9990 служат для 
санозаписи программы соот- 
ветственно для магнитофонной и 
дисковой версии. Не забудьте так- 
хе о строке 2, которая в случае 
дисковой версии должна быть сле- 
дующей: 

2 СЪЕАВ 64599: КАНБОНТТЕ 958 


`15619: ВЕМ : 1ОАР "сьг”СОРЕ` 645001 


На этом мы прощаемся с Вани, 
хелаен с пользой и  интересок 
провести вреня за этой игрой, а) 
мы пока ГоТоВИН КРУШНЫЙ СсЮрариз 
для блихайших выпусков - програм- 
нный комплекс для самостоятельно- 
го создания адвентюрнык игровых 
программ - Аачемиге Ва 4118 
ЗузАеш, сокрашенно - АВ$. 

Вы увидите, что с его поношью 
ножно разрабатывать и увлекатель- 
ные обучающие программы  дая 
детей. 

Инет длительная процесс по 
алаптации и отладке этого пакета. 
Ны надеемся, что к следующему 
выпуску все работы будут законче- 
ны и мы вынесем его для’ широкого 
применения. ‘ 

Искренне Ват, “ИНФОРКОМ”. 


|(с› Матвеев Ю.А.. 1993 


Стратегия капитана Кренона, 
(По мотивам программы 
веье! 54аг) 


Часть 1. 
Лунная база "Дельта”, 


| Скоростной космический лайнер 
“викинг”, следующий рейсом зенля- 
(Венера, вышел на основную трассу 
в 0.15 по ГРИНВИЧУ, Когда пасса- 
жиры ухе готовились ко сну В 
двухнестной каюте номер 29 при 
тусклом свете ночника возле о6- 
|зорного экрана, занвнявшего ил- 
|люминатор, в креслах сидели двое: 
седой крупный мужчина лег шести- 
|десяти, одетый в серый строгий 
костюм, И светловолосый юноша в 
|Форне курсанта Высшей Космической 
школы. Оба молча смотрели на жел- 
|го-серую  горбушку  удаляющейся 
| Луны. \ 
- Дед, а дед, - тихо прошептал 
юноша, не отрывая глаз от экрана, 
|- ты помнишь свою первую высадку 
на луну? 

| - Конечно. Это было еше в кон- 
це прошлого века. . 

| —- Интересно было 
правда? Н 

| ‹ Бывший командир группы косми- 
ческих десантников Элмер кренон 
|медленно перевел вэгляд на внука: 


наверное, 


| - Интересно? Вряд ли... - и, 
Чуть помолчав, добавил: - Скорее 
страшно. 


Юноша внинательно посмотрел на 
деда и легонько тронул его за 
рукав: 
- Ты обешал рассказать. 
Кренон ничего не ответил, а 
только поднялся с крёсла ‘и, не- 
спеша расстегивая пуговицы на 
пиджаке, тяжело вздохнул. 
ушербная Луна сместила в ле- 
вую Часть экрана и постепенно 
пряталась за его краем. Кренон 
снял пиджак и аккуратно повесил 
на спинку кресла. Потон подошел к 
|внуКУ и положил тяжелые теплые 
ладони ему на плечи. 
- Ну, пожалуйста, дед, - про- 
тянул юноша. - Я давно хотел 
услышать эту историю. 
|  Кренон посмотрел на 
тихо сказал: 
| - ХОороШю, только потом сразу 
спать. 


экран и 


Юноша встал, потянулся, разни- 
Гная мышцы, и с легкостью начал 
|стаскивать с себя курсантскую 


|форму. Тен врененем Кренон  плес- 
|нул в стакан вижнвого сока из 
| прозрачной пластиковой бутылки и 


вспоминать ИСТОРИЮ = высадки 
спасательной бригады было тяжело. 
тогда он только принял командова- 
ние десантной группой патрульного 
корабля "Радий" и, конечно, не 
подозревал, что судьба Уготовит 
пему такую зестокую проверку на 
| зрелость. Потон многие его хва- 
лили за удачно проведенную опера- 
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цию, но он-то знал, что, будь в 
его распоряжении хотя бы два часа 
яишнего вррыени, все могло ока- 
заться по-другому. Не пришлось бы 
хертвовать людьми. Нногие из под- 
чиненных были его друзьяни. они 
заканчивали одну учебку, все вме- 
сте пошли служить в одно десант- 
ное подразделение, и район им 
достался, казалось бы, Тихий - 
Луна. Экваториальная зона. Сектор 
А-З. Некоторые были даже недо- 
вольны и пытались перевестись в 
другие десантные ГРУППЫ. да и 
сан, молодой тогда еше, Кренон 
хоть и убеждал инык остаться, по- 
нимал, что Луна - это не огнеды- 
шаший Меркурий и не коварный 
Нарс. 

Служба шла размеренно и спо- 
койно, пока серьезно не заболел 
командир десантников Петр Коваль- 
ски. В срочном порядке его отпра- 
вили' на Землю, а командиром пат- 
рульного корабля был назначен 
Элмер Кренон. Неприятности нача- 
лись на следующий день, ., 

х и " 


Он разминался в спортивном за- 
ле, когда неожиданно по внутрен- 
нему телеселектору ‘его вызвал 
радист Билли Брэг. освободив 
кисти рук от ремней тренажера, 
Кренон поднялся и неспеша подошел 
К ПУЛЬТУ. 

- Ну, что там у тебя? 

- Только что получили сигнал 
$05, - КРИНло ОТОоЗВался БРЭГ. 

- Сейчас буду. - Кренон шлеп- 
нул ладонью по выключателю и тихо 
выругался. Без Ковальски он чув- 
ствовал себя достаточио беспомош- 
но и неуютно, словно цыпленок 6ез 
натери курицы. 

Накинув поверх Спортивного 
костюма китель, Кренон направился 
в командный отсек. Билли Брэга он 
застал возле дисплея бортового 
конпьютера. На экране светилась 
карта-сетка района бедствия, Кра- 
ем глаза Кренон заметил в верхнем 
правом углу экрана название лун- 


ной базы, С КОТОРОЙ пришел СИГ- 
нал, 

- "Дельта?" - удивленно ‘спро- 
сил он. 


Брэг молча кивнул, 
насштаб изображения. 

- Что могло случиться у селе- 
нологов? - вслух подунал Кренон. 

Брэг оторвался от экрана и 
повернулся к командиру: 

- Они не отвечают. Передатчик 
постоянно посылает сигнал 505$ и 
больше ничего. 

Кренон почувствовал, 
покрывается испариной: 

- Объявляй общую тревогу. Да, 
и еше:. свяжись с "Селеной" и до- 
ложи по Форме. 

В то время. как Билли Брэг вы- 
полнял поручения командира, Креё- 
нон опустился в кресло перед ком- 
пьютером и запросил Файл данных 
на лунную базу "дельта". 

Изучая колонки цифр, 


переключая 


как лоб 


он дунал 
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© тон, что могло стать причиной 
бедствия на эти тихой, забытой 
Богом базе, Построенная во време- 
на второй волны колонизации ис 
самого начала отданная селеноло- 
гам, база имела мошную буровую 
установку, небольшую, по нынешним 
врененам, исследовательскую лабо- 
раторию, атонный реактор, сад с 
Фонтанон под прозрачным централь- 
НЫМ КУПОЛОМ и МНОГО ВСЯКОГО рода 
мелочей, необкодимых для работы и 
отдыха персонала. Конструкция ба- 
зы и ев основные элементы были 
сделаны на совесть. Налейшее от- 
клонение от нормы в работе вахж- 
нейших агрегатов четко отслехи- 
валось центральным компьютером. 
Автоматизированная система кон- 
троля во главе с огромным  вычис- 
лительным комплексом “Исаак”, 
заслужившая самые высокие оценки 
на всек базах подобного типа, на 
этот раз, видино, не сумела пре- 
потвратить бедствие. Вероятно, 
все произошло внезаяно и послед- 
ствия оказались необратимыни, 

командный отсек быстро запол- 
нили созванные по тревоге десант- 
ники. Весь экипаж патрульного ко- 
рабля "Радий" собрался у цен- 
трального пульта управления, `что- 
бн послушать указания орбитально- 
го комплекса “Селена”. Выслушав 
сообщение Билли Брэга, оператор 
"Селены" некоторое время не вы- 
ходил на связь. 

- Как всегда, 
пер Прюн. 
ИЕ 
- Симпозиум соберут, - согла- 
сился с ними Леон Троцкий, кото“ 
рый еше в школе космодесантников 
получил пРОоЗвИиШе “революционер” 
из-за своей известной Фамилии. 

Однако ответ с "Селены” пришел 
быстро, Уверенный голос оператора 
внутал оптимизм: 

- Это Ваш район, так что дей- 
СТВУЙТе ПО ИНСТРУКЦИИ. 
к каналу связи 

кренон: 
- Специальных указаний нет? 
-,Нет, - ответил оператор. 
- Понял, - задумчиво отозвался 
командир "Радия”. - Отбой. 
Он медленно встал с кресла: 
Все в ожидании повернулись к не- 


- заметил дДжас- 
- Теперь дебаты устро- 


подключился 


- Готовность номер один. и по 
полной Форме, - выдохнул Кренон. 

десантники удивленно перегля- 
нулись. Все слышали, что "Селена" 
не дала специальных указания. 
Следовательно, можно было бы не 
брать с собой боевых роботов, 
полный боекомплект вооружений и 
не надевать военные скафандры. В 
таких случаях обычно ограничива- 
лись медицинской аппаратурой и 
легкими скаФандрами. 

- Береженого Бог бережет, так 
что ли? - нарушил молчание Леон 
ТРОЦКИЙ. | 

- Особенно революционеров, - 
ИРОНИЧНО ОТОЗВался Джин Дигриз. 

- Выполняйте приказ, - отрезайд 
Кренов. 
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Десантники стали молча расхо- 
диться. Курт Левин, - заместитель 


Фкомандира патрульного корабля, 
пилот первого класса, - располо- 
жился за пультом управления. 


голько сейчас Кренон посмотрел на 
главный экран. Лунное Норе Дож- 
дей без единой капельки воды нед- 
ленно выплывало навстречу, откры- 
вая бесконечные пространства за- 
стывшей ниллионы лет назад магмы. 
до лунной базы ”Дельта” остава- 
мось около двухсот километров. 

- Включаю орбитальные двига- 
тели, - доложил Курт Левин. 
Патрульный корабль лег на пра- 
вый борт и медленно стал прибли- 
жаться к поверхности Луны, ‘удер- 
живая курс на "Дельту”. 


Корабль они посадили недалеко 
от базы селенологов. Прозрачный’ 
центральный купол переливался в 
юслепительных лучах не по-зениому 
яркого солнца. Служебные построй- 
ки, примыкавшие к куполу,  выгля- 
дели обыкновенно. Никаких следов 
разрушений занечено не было. На 
связь по-прежнему никто не выхо- 
|дил. ° 
Кренон постройл отряд в шлюзо- 
вом отсеке “Радия". ‘двенадцать 
вооруженных дёсантников в скафан- 
драх со снятыми герношлемани в 
ожидании стояли напротив него. 

: - Разбиваемся на’ четыре‘ груп- 
Зпы, - начал Кренон. - Первая 
Нельсон Смит и Джаспер 
Прюн. Ваша задача осмотреть цех 
переработки. 060 всех обнаружен- 
ных неисправностях сразу доклады- 
вать. } 

Неханик Джаспер Прюн утверди- 
льно кивнул, но тут же, сняв с 
плеча лазерное ружье, продемон- 
стрировал его на всеобщее обо- 
зрение: 

- А это тогда для чего? Гвозди 
забивать? 

Все засмеялись, лишь один Кре- 
нон с каменным лицом. молча посмо- 
‘трел на Прюна. 

” - Вторая группа, - 
Кренон, - Билли Брэг, Леон Троц- 
кий и Илэйн Фрейх. Вы осмотрите 
центральный вход, ангар и приле- 
гГающие помещения. Третья группа - 
Дон Кейлони. Сларти БартФаст и 
Рита Ранпол. Ваша задача прове- 
рить жилые отсеки. Пойдлете через 
служебный вход. Старший ГРУППЫ 
дон Кейлони. 

Непалец Рита Рампол хотел что- 
то сказать, но Кренон` жестом ос- 
'тановил его. 

- Четвертая группа 


продолжил 


и Джой, Проверьте запасной выход 
и присоединяйтесь ко второй груп- 
пе. Старший - Курт Левин. Задача 
ясна? - спросил Кренон. придирчи- 
во осматривая кажлого десантника. 
ВОПРОСОВ НИ У кого не было. 
Кренон посмотрел на Нельсона Сни- 
та: 
- Боевые дроиды готовы? 
- да. 
“-  Приступайте к разгрузке. ‚ 
Каждой групие - по дроиду. 


= КОМПЬЮТЕРНАЯ НОВЕЛЛА |— = т г 
ножен светосаблю, `В этот номент 


Смит подошел к автоматической 
двери, ведущей в дроидный отсек и 
нахал на панели электронного зан- 
ка несколько кнопок. С мягким гу- 
цениен, дверь отъехала в’ сторону, 
освободив проход. Из глубины по- 
метения бесшумно вышли один за 
другим четыре боевых дроида. де- 
савтникам пришлось потесниться: 
боевые машины цилиндрической 
Формы на массивных стальных но- 
гах-шарнирах заняли почти все 
свободное пространство — Кренон 
ободряюще кивнуя на вопроситель- 
ный взгляд Нельсона Снита и нах- 
БУЛ РУКОЙ. 

- Выходим, - сказал он и заки- 
нул на плечо Фотонный излучатель. 

Застегивая колпак гермошлема, 
Кренон ПРОКРУТИЛ в голове все 
параграфы инструкций для спаса- 
тельных отрядов и остался дово- 
лен. 

Они оставили корабль на дне 
небольлого древнего кратера и, 
разделившись на четыре грУППЫ, 
быстро добрались по базы. 

Первые опасения появились, ко- 
гда они остановились напротив на- 
глухо запертых шлюзовых ворот. 
Автоматика полностью блокировала 
вход и открыть двери не было ни- 
какой возможности. Командиры 
ГРУПП ДОоЛлОЖИиПИи по общей связи о 
том. что и у них ничего не  полу- 
чается. База молчала. Сигнал $05 
больше не поступал. В эфире воца- 
рилась тишина, , 

-' походе, нас здесь совсем ине 
хлУТ, - прозвучал в шлемофонах 
голос Курта Левина. ‘- ‘Командир, 
придется применить дроидов, 

- Возможно, - задумчиво ото- 
звался Кренон, - но пучше не тра- 
тить их заряды. У нас есть све- 
тосабли, давайте их и попробуем. 

Светосабля взрывного контакт- 
ного действия позволяла прорубать 
проходы в любых завалах и поэтому 
давно была на вооружении спаса- 
тельных отрядов. Практически лю- 
бой, даже саный прочный, металл 
сдаванся под натиском  можных 
электро-лазерных разрядов. 

- А что нам прикажете делать? 
- прозвучал недовольный голос 
Джаспера Прюна. - У нас нет с со- 
бой ни одной светосабли. 

- Я иду к Ван, _ ответил Кре- 
нон. Он ‘посмотрел на 'отливающий 
солицем стеклянный колпак герно- 


шлема Леона Троцкого. - За стар- 
шего - Тропкий. ь 
- Есть, - откликнулся Леон. * 


Билли, где будем рубить? 

- Революция, не засоряй эфир, 
- ПОШУТИЛ КТО-ТО из десантников. 

кренон легко преодолел нес- 
колько метров до входа в цех пе- 
реработки, где его хдали Нельсон 
Смит и Дласпер Ирюн. 

- А что, если у них отключена 
герметизационная защита? - увидев 
приближающегося Кренона спросил 
Смит. Нас же сдует, как пылинки: 

Кренон ничего не ответил. он 
вплотную ПРИбЛИЗИЛСЯ К ШЛЮЗУ и, 
отметив середину двери, достал из 


на связь вышел Дон Кейлони, стар-| 
Ший ГРУППЫ, которая шла через 
служебный вход: 

-` Командир, у нас ничего не! 
выходит. Прошу разрешить ‘исполь- 
зовать дроида. 

- Разремаю. | 

В шлемофоне что-то затрешало, 
затем рзнался звук, напоминающий! 
взрыв хлопушки, а следом прогре-!| 
мел бас Курта Левина: 

- У неня получилось, я в там- 
буре. Гернозашита работает. Нож- 
но смёло входить. | 

кренону хватило четырех уда-| 
РОВ, ЧТОбЫ пРрорубить внешнюю 
илюзовую дверь, ведушую в цех| 
переработки. Он вошел в довольно 
ПРОСТОРНОое помешение  шлюзового| 
тамбура. Сработала систена герме- 
тизации и прорубленный вход за- 
КРЫЛСЯ ПРОЗРачнеой световой плен-| 
кой, временно замитавшей базу от 
вакуума, Следон вошли Прюн. и 
Смит. Затем медленно вошел дроил. 
Кренон остановился перед внутрен- 
ней шлюзовой дверью, чтобы  отды- 
паться. Надо сказать, что рабо- 
тать светосаблей было нелегко и| 
приходилось прилагать большие 
усилия для хорошего контакта’ саб- 
ли с металлон. 

- Старшие групи, - сказал Кре-| 
вон, - положите обстановку, 

Первым откликнулся Леон: 

- Вошли в предбанник: 

- Аналогично, - отозвался Курт! 
Левин. | 

Дон Кейлони после недолгого 
молчания повелал всем о том, что 
его дроид разрезал вторую перего- 
РОодКУ и они вошли в гардеробную. 

- Что-нибудь наблюдаете? 
поинтересовался Кренон, | 

- Ничего подозрительного, - 
ответил Кейлони, - хотя... Черт!!! | 

Послывался ‘треск и на время 
все стихло. Потом все услышали 
дрохаший голос Рампола, перекры- 
ваемый шуном: 

- Внимание! Нападение на груп- 
пу... - опять треск и шум. 

-`Что там у Вас? 

- дон, ответь! 

- Говорит Дон Кейлони. Нас об- 
стреляли какие-то кроиды. Мы от-| 
ступаем. 

- Говорит Кренон. сколько их? | 

- Не знаю. Много. очень много! 

- Дон, без паники... - Кренон, | 
замахнувшись саблей, рубанул тве- 
Рный металл перегородки, — Ничего 
не получилось. Перегородка устоя- 
ла. | 

- Говорит Леон. Мы вскрыли! 
центральный вход. Я вижу с деся-| 
ток дроидов. которые движутся к! 
служебному входу. Меня пока не! 


замечают. Впрочен, подождите, .. 
Они открыли о... - речь Тронкого 
оборвалась на полуслове. Эфир 


наполнился непрекратаютинся тре- 
скон. 

- Всен назад! - кричал в мик- 
РОФон Кренон, нанося светосаблей 
сильнеймие удары упряной перего- 
родке. Наконец. она подалась. 

В образовавшемся проходе он| 
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КОМПЬЮТЕРНАЯ НОВЕЛЛА = 


пувидел высокого дроида с круглой 
пголовой и оСтРОоНОСой лазерной 
пушкой, который очень быстро дви- 
гался в сторону служебного. входа. 
ИЗатаив дыхание, Кренон снотрел на 
удаляющегося робота. 
- Ого! - выгаядывая из-за пле- 
ча командира. воскликнул Нельсон 
Смит. - Откуда они здесь? 

Кренон отступил назад: 


.7 Дон. отзовись! 
| - На связи, - тяжело дыша  ска- 
заа Кейлони. 
| = Я надеюсь, все обошлось? 


| - Сларти ранен, а у нас нет 
даже недицинского зонда. 

| - Дод. они. все движутся к вам. 
| - Мы отошли, - успокоиа всех 
|кейлони. - Прячемся за своим же- 


лезным бояваном. Командир, какие 
будут указания? 
Кренон на секунду  замешкался. 


|такого поворота событий он, ко- 
|зечно, не ожидал. Хорошо. что 
внутреннее чутье его не подвело и 
Пон Полностью ВОооРУЖИЛ ОТРЯД Но 
кто мог знать, что безобидная 
захолустная база селенологов бук- 
|вально кишит военными дроидами, 
конечно, на базах подобного ‘типа 
|всегда есть пять или шесть прои- 
дов. Это, как правило, механичес- 
кие роботы, которые занимаются 
ПОГРУЗКОЙ И рРазгрузкой кораблей, 
|а также добычей полезных ископае- 
мых. Что здесь делают военные ма- 
шины? Сомнительно, что их при- 
везли с Земли. Зачем? да и кон- 
|трольную проверку ни один корабль 
с подобным грузом не смог бы про- 
ити. А если бы это произошло, то 
|на эсех постах стало бы известно 
|© существовании такой странной 
базы селенологов. С "Селены" ни- 
|каких специальных указаний не 
было. Ясно, что тан ничего не 
знали. Правда. военные дроиды 
это не их профиль. Вопросы НУХНО 
задавать Комитету Обороны. Тогда, 
какого дьявола нас не предупреди- 
ли? остается одно: дроидов со- 
бирали на этой базе. Причем, 
быстро и в тайне от всех. Види- 
мо, выполняли заказ какой-нибудь 
могушественной военной корпора- 
| ции. 
| И вдруг он почувствовал. что 
знает, гле лелит ключ к разгадке 
тайны лунной базы “Дельта”. 

| - Смит, - позвал Кренон. - а 
|как управляются эти дроиды? 

| Из тени развороченной шлюзовой 
двери появился роботекник Нельсон 
Смит: 

- Обычно по радиосвязи. Но, в 
принципе, программа может быть 
|занесена и в оперативную панять. 
Смита слышали все, но слово 
|снова взял Кренон: 

| - Дело в ТОМ, ЧТо ЭТИХ ДРОИДОВ 
|собирали здесь. Дия каких целей - 
не важно. Но я хочу сказать, что 
выполняя спепзаказ какой-то кор- 
|порации, селенологи вряд пи были 
|посвяшены в детали и не знали, 
как и где дроиды будут! применять- 
|ся. Так? Поэтому готовый продукт, 
скорее всего, был 6ез рабочей 
ПРОГРанмы. 


- Возможно. - протянул Смит, 

- Кто может управлять роботами 
< базы? 

- Что? - Нельсон вЗярОГНУл и 
посмотрея сквозь стекло гермошае- 
ма на Кренона. - Хочешь сказать, 
сани селенологи? 

- Допустим. .. 

- А кто тогда посылал сигнал 
бедствия? 

- ‘Вот именно, 
нон, - я думаю, 
дДРОИДЫ и убрали. 

- Выходит, бунт? 

7 да. 

- Кто же во главе? 


- ВЫдДОкнУЛ Кре- 
этих селенлогов 


- Тебе видней... Мне. напри- 
мер, кахется, что зто “”ясаак”. - 
компьютер. Бодьше некому. 


У Нельсона округлились глаза: 

- Похоже. очень похоже на пра- 
вду. В комплексе “Исаак” есть пе- 
редающие и прининаютие  уСстрОЙСТ- 
ва. Ему вполне под силу управлять 
сотней таких проилов. 

- Хорошю, - Кренон снял с пле- 
ча Фотониый излучатель. - эту 
догадку мы можем проверить? 

-Конечно, нужно только настро- 
иться на их частоту. 

- Займись этин, Смит. Билли 
Брэг, ты меня слышивь? 

- Я на связи. 

- Что с Леоном? 

- Легкое ранение, 
сейчас занимается. 

- Хоролю. дон Кейлони! 

- Слышу тебя. 

- Пока ничего не предпринимай- 
те. Ждите указаний. 

- Мы за границей шлюза. 
трогают. 

- Обрашение к старшим групп! 
до ноего особого указания всем 
находиться за пределами базы. 

- Я поймал сигвал “Исаака”! - 
закричал Смит. работавший с лич- 
ным передатчиком. - Все сигналы 
закодированы, ничего понять не- 
возможно. Но это точно он! 

Кревон доверял Нельсону Смиту 
как самому себе. ( 

- Судя по карте, - сказал он, 
через цех переработки но тоннелю 
мы сможем попасть в операторскую, 
а там и компьютерный центр  неда- 
леко. у 

- Верно, - подтвердил Смит. 

- Так он вас туда и пустит, - 
вмешался Дхаспер Прюн, поглаживая 
блестящую поверкность военного 


Илэйн ми 


Нас не 


дроида. - У него там наверняка 
охрана. 

- Мы их отвлечем, - уверенно 
сказал Кренон. -‘ Ты видел, как 


они все помчались к служебному 
входу? 

Джаспер Прюн пожал плечами. 

Кренон свова вышел на связь: 

- Дон, ты меня саышить? 

- Я все понял. Берем огонь на 
себя, - вздохнул он. 

- Дон, Прошу, держитесь как 
можно дольше. Успеха! - заключил 
Кренон. а для остальных добавил: 
- Группы Курта Левина и Леона 
Троцкого хдите указаний. Я с Прю- 
ном и Смитом попробую пробраться 


„защиту, 


к “Исааку". 

- М вылвигаемся. - доложил 
Дон Кейлони. 

Кренон выглянул в проем и уви- 
дел, как ‚ еше несколько дроидов» 
словно по приказу, направились к 
служебному входу. 

- Какое у них нохет быть ору- 
хие? - шепотон поинтересовался 
Кренон у Смита. 

- Какое угодно’. от. слабеньких 
зикеров до мошных лазерных уста- 
новок. 

В эфире опять что-то затрешало 
и послышались пегкие хлопки. ста- 
ло ясно, что у служебного входа 
началась схватка. Кренон внина- 
тельно осмотрел пех переработки, 
который предстояло пересечь, что- 
бы войти в тоннель. Но центру це- 
ка располагался огромный  коивей- 
ер, который непрерывно работал. 
дальше он видел мошную буровую 
установку. а за ней - вход в за- 
ветный тоннель. ведущий к цели. 
Вдоль конвейера располагались 
процессоры, которые перерабаты- 
вали ‚поступающий ‚с конвейерной 
линии грунт. Повсюду были раз- 
бросаны груды щебня и остатки 
обработанных ископаемых. 

Кренон махнул рукой и, пробе- 
хжав вперед несколько шагов, оста- 
повияся под прикрытием конвейера. 
Следом  примчались Прюн и смит. 
Военный дроид немного поотстал, 
зато надежно зашимал их с тыпа. 
Шум в эфире прекратился и десан- 
тники отчетливо услышали чей-то 
стон. 

- Докладывает Сларти БартФаст. 
Первая атака отбита. Кейлони ра- 
нен. Рита Рампол убит. 

- ГРУППЫ Троцкого и Левина 
вперед! - срывающимся ` голосом 
сконандовал Кренон. - 

- Осторожней, конандир! 

Кто это сказал. Кренон так и 
не понял: ослепительный яркий, 
ЧУТЬ Голубоватого цвета луч про- 
несся сдева и ударился в процес- 
сор, рассыпавшись Фонтаном искр. 
Стреляли из тоннеля. Конечно, не 
все дроиды противника ушли к сну- 
жебному входу. Прюн был прав, 
"Исаак" › обеспечнл ‘себе надежную 


Совсем рядом прошипел еще один 
луч. Кренон рванулся вперед и, 
преодолев несколько метров сво- 
бодного пространства, спрятался 
за’грудой шебня. 

В эфире все трешало, 
и взрывалось. Были слышны чьи-то 
Кренон заметил, 
что- справа от. него в коридоре, 
ведушем к центральному входу. гле 
находилась группа Леона Троцкого, 
скопилось.с десяток неприятельс- 
ких дроидов. Часть роботов отде- 
лилась от остальных и двигалась 
теперь к буровой установке. 

- По-моему. это к нам, - заме- 
тил Джаспер Прюн, ‘который взо- 
брался на ленту конвейерной 
линии. чтобы оценить обстановку. 

Кренон не видел, что произовло 
у конвейера - ему мешала гора 
щебня, за которой он прятался, но 
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он отчетливо услышал крик Смита: 

- НУ. иди сюда, гад! 

Яркие вспышки озарили весь 
цех. Металл и камни плавились под 
натиском смертоносных лучей. Этот 
кошмар продолжался несколько се- 
кунд, но Кренбну показалось, что 
прошла целая вечность. Когда все 
Стихло, он увидел андроида двух- 
метрового роста с лазерным писто- 
летом в железной руке. “Здесь 
еше и андроиды есть”, - только и 
успел полумать Кренон, когда луч 
лазера расплавил добрую половину 
ГРУДЫ шебня в полунетре от него. 
Он несколько раз выстрелил в сто- 
Рону андроида, но, похоже,  про- 
махнулся. Необходимо было сменить 
укрытие, иначе в следующий раз, 
вместо этой бурой корки оплавлен- 
ного камня, будет лежать он сан. 
Кренон бросился к тоннелю, кото- 
рый казался таким близким и ему 
было уже все равно, что совсем 
недавно оттуда стреляли. В глазах 
черным пятном стояла вспышка лу- 
ча, бъющего в шебень. Кто-то уже 
бехал за ним. Креноно обернулся. 
Это был Джаспер Прюн. В эфирной 
ниогоголосице было невозмоло ра- 
зобрать, что кричал ему механик. 
Из глубины тоннеля под ноги уда- 
рил луч, но на этот раз Кренон 
успел выстрелить ответной оче- 
редью. Где-то в глубине коридора 
вспыхнул голубым пламенем пат- 
РУЛЬНЫЙ ДРОИД И С ГРОХОТОМ раз- 
летелся на куски. 

В мимолетном затишье Кренон 
вдруг разобрал слова Прюна: 
| - Смита убили. Но он положил 
‘трех дроидов. ' 

комок подкатил к горлу. Пыта- 
ясь спрвиться с неприятным  ошу- 
Кренон прокричал в микро- 


- Все ГРУППЫ к 

тоннелю! : 
отозвался, почему-то, 

один Леон Троцкий: 

- Яу входа в цех переработки. 

- А остальные? 

- Билли Брэг убит, а Илэйн 

Фрейх тяжело ранен и уже не ножет 

идти. Он отстреливается У входа в 

ангар. 

- Где Курт Левин? - спросил 

Кренон. 

- Я его не видел, - 

Леон. 

Сквозь шун и свист в шлемофоне 
отчетливо прозвучал голос Курта: 

- Я не ногу пересечь ангар. 
Веду КРУГОВУЮ оборону. 

- Где твои люди? 

- Курсанты у соседнего лунохо- 
да, А Джим Дигриз с военным дро- 
идом направился к вам. 

- Посмотри, там где-то Илэйн 
Фрейх. Он ранен. Помоги ему, - 
подключился к разговору Леон 
ТРодКкИй. . 
- Ладно. А, черт! Ах ты, элек- 
ТРОННЫЙ ВЫРОДОК!... 

Курт Левин больше не отвечал. 


служебному 


только 


ответил 


принимая на себя основной 
двигался военный дроид. 


| КОМПЬЮТЕРНАЯ НОВЕЛЛА |+ 


сквозь перекрестный огонь в тон- 
нель проник Леон Троцкий, неиз- 
вестно как сумевший  предолеть 
этот страшный путь. 

Кренон понимал, что основной 
удар приняли на себя группы Курта 
Левина и Дона Кейлони и ин 
удалось оттянуть часть дроидов. 

дверь операторской была запер- 
та изнутри. Кренон решил исполь- 
зовать один из четырех мошнеиших 
зарядов своего боевого робота. 
вспышка, Фейерверк огня и ивери 
как не бывало, 

Дроид въехал в образовавшийся 
ПРОХОД. Следом вошел Кренон, а 
Джаспер Прюн не успел. С противо- 
положной Стороны раздался выст- 
рел. Шипяший луч ударил в грудь 
Прюну и тот успел ЛИШЬ ВСкинУТЬ 
лазерное ружье, когда прозвучал 
еше один выстрел. Джаспер Прюн 
упал ` ‘навзничь с прожженой 
насквозь грудью. 

Кренон едва успел отскочить в 
сторону, как из бокового коридо- 
ра, ведушего в компьютерный 
центр, ударил встречный луч. За- 
ряд лазера приняла на себя броня 
боевого дроида десантников. Узкий 
КОРИДОР наполнился дыном. 


В этой сумасшедшей свалке тТрУ- 


дно. было разобраться. Их зажали 
со всех сторон. Сразу три огром- 
ных дроида вели непрерывный огонь 
и Кренону пришлось прятаться в 
операторской. Улучив момент, он 
попытался связаться с остальными, 
но ему никто не ответил. Лишь 
один раз, откуда-то, словно с 
далекой Земли, до него донесся 
слабый голос Дона Кейлони, кото- 
рого он уже давно мысленно похо- 
РОНИЛ: 

- Командир, мертвые не прос- 
тят, если мы не победим. 

Послышалось ему это или ‘нет, 
но он почувствовал второе дыха- 
ние. Потратив всю обойму на’ дрои- 
да, охранявшего вход в комньютер- 
ный центр,  Кренон ворвался 
ВНУТРЬ. Посередийе зала, нигая 
липочкани и переливаясь всеми 
цветами радуги, мирно гудел кон- 
пьютер "Исаак“. Кто бы мог поду- 
мать, что эта машина сумеет при- 
нести столько бед. Кренон переза- 
рРядил фотонный излучатель и начал 
методично расстреливать управляю- 
шие консоли компьютера. С ПРОТИ- 
воположного конца зала к нему 
приближался дроид с лазерной го- 
ловой. Кренону показалось, что 
“Исаак” буквально — раскалился, 
предчувствуя свой близкий конец. 
И теперь конандир десантников по- 
нимал, что этот единстенный дроид 
последняя надежда компьютера. он 
представил себе, как электронная 
душа "Исаака" переселяется в во- 
енного дроида. И вот уже компью- 
тер - не беспомошная железяка, 
набитая микросхемани, а ГРОЗНЫЙ И 
опасный противник. Да вот же он! 
Совсен рядом! 

“О чем это я? - одернуя себя 
Кренон, уворачиваясь от лазерного 


по-моему, начинаю сходить! 


луча, 
с ума". Он с удивлением отметил, | 
что вот уже несколько нинУТ его! 


не покидает желание прекратить 
стрельбу, да и вообше бросить $о- 
тонный излучатель на пол. ЕмУ| 
стало страшно. Дроид был совсем! 
близко. Но прятаться за “Исааком" | 
Кренону почену-то совсем не хо-| 
телось. Он Хорошо видел, как ша- 
рообразная Голова дроида повора-| 
чивается в его сторону, лазерная! 
пушка смотрела прямо в лицо. 

- Не-е-т! - закричал Кренон и 
в последнее мгновение успел от- 
ПРЫГНУТЬ В СТОРОНУ. 

Дроид дернулся 


вились электронные мозги агрес- | 
сора и как тут же застыл 6ез дви- 
жений вражеский дроид. Это | 
победа! Раб сам убил своего хо-\ 
зяина. Мгновение спустя в зал! 
ворвался Леон Троцкий: \ | 
- Неужели конец? 
- Конец, - выдохнул Кренон. | 
В гермошленах затрешало ‘и на! 
связь вышел Куцрт Левин: | 
- Леон, ты еще спрашиваешь? | 
Иди и ПОСМОТРИ, СКОЛЬКО ВОКРУГ! 
меня собралось застывших истука-| 
нов. 


У Кренона не было сил даже! 
улыбнуться. 
х х х 


Когда Элмер Кренон 


и молчал. Потом он спросил: 
- Дед, а сколько человек вас! 
осталось тогда в живых? | 
- Пять человек: я, Леон Троц- 
кий, Курт Левин, Джим Дигриз и 
Дон кейлони, ‚ | 
- А вы узнали, почему компью- 
тер "Исаак" взбунтовался? 
— Когда вскрыли черный явик, | 
то выяснилось. что переполненный! 
военной информацией, — конпьютер| 
ПРОСТО не выдержал эксперинентов 
этия, так называемых, "селеноло-| 
гов". Почему это произошло, мы! 
так‘и не узнали, потому что дроиду 
очень сильно повредил даже черный) 
яшик. Мы можем лить догадываться, | 
какая ката заварилась в недрах! 
базы перед нашин прибытием, толь-!| 
ко с той поры компьютеры "Исаак" 
были сняты с производства. 
-`А вы еше летали вместе? | 
- Со времен "дельты" мы стали| 


| 


в таких передрягах, что события! 
на лунной базе покажутся детской! 
забавой, 

- Это когда? - у внука загоре- 
лись глаза. 

- Ну-у, - протянул Кренон, - 
напринер, в системе Альфа Центав- 
ра, когда ны наткнулись на посе-| 
ление совершенно чуждых нам су- 
ществ. 

- Дед, расскажи! 

- В следующий раз, - уснех-| 
нулся Кренон. - Давай спать... 
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развивая инициативу, объявленную 
|8 ПРОШЛОМ вЫПУСКе “РЕВЮ”, 


" АВТОРСКАЯ — ПРОГРАИНА 


“ИНФОРКОН" гассчитывает, что 
кроне чисто °заявочного" характе- 
ра этот раздел будет служить еще 
и справочным пля тех, кто хочет и 
ножет сам. что-то создать. здесь 
Вы ножете. увидеть над чем работа- 
рт ваши коллеги, может быть. най- 


дете полезные идеи ий дая себя, 

Ни надеенся, ‘что публикация 
этого раздела явятся своеобразным 
генераторон. новых идей. 


Разцел открыт для Вас, 
мые авторы. 


увахае- 


ПЗАЯВКА: 
ПРОГРАММА : ТНУТА! Л, (инстадлятор). 
ПАВТОР: В. Кутин.. г. Екатеринбург. 
ПДАТА РАЗРАБОТКИ: март 1993 г. 


- Не указаво. 
|КРАТКОЕ ОПИСАНИЕ: 
| Программа позволяет создать 
дисассемблер под тот адрес, кото- 
Ирый Нужен, при необходимости 
встроит в дисассемблер и монитор. 
Полученным дисассемблерон можно 
ппользоваться независимо от ин- 
1сталлятора. Он обладает следующи- 
ми особенностями: 

- особая компактность; 

= дветность; 

- озвученность; 


- многооконность (4 окна для 


- наличие ОТЗРЬАСЕ-систены для 
написанных 


- 16 Функций монитора; 

- 16 Функций дисассемблера; 
| - имеются процедуры, написан- 
| ные специально для хаккеров. 


Цимиикиииикииниихиииниихикиникиииии 
ЗАЯВКА: У0О2. 
|ПРОГРАМНА: ТУЕВО-СОРУ (копирОвШиКк) 


Внешне выглядит, 


|СОМР, 2К-СОРУ, ТЕ-СОРУ, но имеет 
ряд преимуществ: { 
| _- работа с двуня скоростями - 
стандартной и аналогичной пзу-90. 

- в отличие от  ТУРВО-СОНР 
имеет Функцию УЕРТЕУ; 

- выдает информацию о конпрес- 
йсни блоков в процентах; 

- ‘имеет соврененное оформление 
| (стилизованный шриФит); 
‚  - работает на тех машинах. на 
которых ТОРВО СОМР не работает; 
} - 0с0бо подезна для мащин с 
|п3у-90. 


У кикииицимининя иниииикининиииниыкик 


ДОКУНЕНТАЦИЯ 
КРАТКОЕ ОПИСАНИЕ: 
Предназначена для создания 


‚спрайтов любого размера (по вер- 


тикали - в пикселах, по горизон- 
тали - в знакоместах). Имеет раз- 
витую систену меню, удобна в ра- 
боте, возножно управление джой- 
стикани` (51пс1а1г и Кешре{оп), 
работает с группой спрайтов, ре- 
зультаты сводит в Файл, Удобный 
для использования в пользоватёль- 
ской программе (“подиивает” Ффайл- 
указатель размещения спрайтов): 


ининиииниииниинииунииикимиииниикяи 
ЗАЯВКА: У004. 
ПРОГРАННА: СЕМЯВАТОК (генератор/ре- 
дактор спрайтов) 
АВТОР: Д. Падтусов, г. Екатеринбург. 
ДАТА РАЗРАБОТКИ: март 1992 г. 
ЯЗЫК ПРОГРАНМИРОВАНИЯ; Ассемблер, 
БЕЙСИК 
НАЛИЧИЕ ЗАЩИТЫ: есть. 
ДОКУМЕНТАЦИЯ: - не указано. 
КРАТКОЕ ОПИСАНИЕ: . 
Рассчитам ‘на начинающих про- 
граммистов, позволяет создавать 
спрайты 16 Х 16. Готовые спрайты 
можно использовать. как из мащин- 
ного кода, так и из БЕИСИКа (”за- 
шиваются" в область У0б), Возмох- 
но управление лхойстиком (51- 
с1алг). 


- ннинииичиииниинииникаикимициинчин 


ЗАЯВКА: У005. 

ПАКЕТ: СОНЗТВУСТОЕ 

АВТОР: Д. Палтусов, г. Екатеринбург. 
ДАТА РАЗРАБОТКИ: сентябрь 1992 г. 
ЯЗЫК ПРОГРАММИРОВАНИЯ: `Ассенблер, 
НАЛИЧИЕ ЗАЖИТЫ: нет. 
ДОКУНЕНТАЦИЯ: - не указано. 


- КРАТКОЕ. ОПИСАНИЕ: 


Пакет процедур, достаточных 
пря создания игровой программы - 
карточной игры. 

Состав пакета: 

ОРЕНОАОМ  - демонстрационная 
карточная угра, написанная с 
помощью. "конструктора". 

СОНЗТКОСТОЕ - блок подпрограмм 
в машиннон коде. 

ТЕТ.РИ, - текстовый Файл прог- 
Раимы ОРЕНРАИИ, написанный под 
ассемблер "72205". Позволяет изу- 
чать логику работы игры и техно- 
логию применения "конструктора". 


иникининкиииниюниюнииимииникиииин 
ЗАЯВКА: У006. 
ПАКЕТ: МОЕТ УТИ ТУ 
АВТОРЫ: Д. Паятусов, В. Кутия, 

г. Екатеринбург. 
ДАТА РАЗРАБОТКИ: апрель 1992г г, 
ЯЗЫК ПРОГРАНИИРОВАНИЯ: Ассемблер, 
НАЛИЧИЕ ЗАЩИТЫ: есть. 
ДОКУНЕНТАЦИЯ: - ве указано. 
КРАТКОЕ ОПИСАНИЕ: 

Аналог аниматора РАНТА У15тОН 
(для 1ТВИ-совнестимых машин). Слу- 
хит для создания нультФильнов в 
четыре этана: 

- определение Формата кадра; 


- создание Фаз авимации; 

- моделирование экранного 
изображения; 

- компиляция иультфильма. 

В. пакет входит номный компиля- 
тор, позволяющий сгенерировать 
Файл, нпезависиный от материнской 
програнмны под любой адрес загруз- 
ки и програниа ИТТЬТТУ1 для “вы- 
резания” исходного ‘спрайта из 
заставок, созданных в других гра- и 
Фических редакторах. 
пининвинкнии иювиикнининииниминии 


г. ПРИКЛАДНЫЕ ПРОГРАНИЫ 
Заявок нет. 
3. ИГРОВЫЕ ПРОГРАННЫ 


ЗАЯВКА: И001. 
ПРОГРАННА: ЗНАКЕНОСРЕЕ 
ЖАНЪ: ТЕАБТТТОНА! /НАНАСЕНЕНТ 
АВТОРЫ: Д. Палтусов, В. КУТИН, 
г. Екатеризбург. 

ДАТА РАЗРАБОТКИ: август 1992 г. 
ЯЗЫК ПРОГРАММИРОВАНИЯ: ‘Ассемблер. 
НАЛИЧИЕ ЗАЩИТЫ: есть. 
КРАТКОЕ ОПИСАНИЕ: 

компьютерный аналог известной 
за рубежон. настольной игры (осве- 
малась в журнале “Наука и 
жизнь"). | 

Количество играюних - до 4-я 
человек, за них может играть ком- 
пьютер по одному из двух вознол- 
ных алгоритнов. 

цель игры - пормшение  состоя- 
ния за ‘счет рациональной игры с 
акциями на бирхе. 


Управление: клавиатура, ‘С0%- 
508, З1ТЕСЬАТЕ, КЕМРЗТОН. 
Экранный мнзервенс: : типа 
ЗАЕТТООТО". 


Зонени ни иициниении ухи иикииихинии 


ЗАЯВКА: ИООг. 
ПРОГРАНМА: ВАЗЕ 
ЖАНР: РО27ЛЕ/СТКАТЕСУ 
АВТОРЫ: Д. Палтусов, ' В, Кутин, 
Р. МельникоЕ, } 
г. Екатеринбург. 
ДАТА РАЗРАБОТКИ: июнь 1992 г. 
ЯЗЫК ПРОГРАМНИРОВАНИЯ; ай 
НАЛИЧИЕ ЗАЩИТЫ: есть. 
КРАТКОЕ ОПИСАНИЕ: й 
Тена мгры: освобождение косми- 
ческой базы, захваченной пришель- 
кани. 
логика работы: противник  уви- 
чтохается, будучи запертым в без- 
выходном пространстве, 
Экранный интерфейс  - 
“БОЛЕЕ РАЗН” и “ВОСЕРОЕО”. 
‘игра многоуровневая и имеет 
встроенный  родактор уровней, 
позволяющий развивать ее далее. 
Управление: клавиатура,  СИВ- 
508, ЗУНЫСЬАТЕ, КЕМРЗТОН. 


кининкиниининииннининти 


тина 


нового журнаша, 


Папой этого издания будет “ИНФОРКОМ”, 


а наной 
акционерное общество закрытого типа “ИНФОРКОМ - ПРЕСС”. 


внимание,  СИНХЛЕРИСТЫ! 


То. © чем многие месяцы просят некоторые ваши читатели, наконец свершилось! Мы объявляен о дие рождения 
посвященного играм для ГВИ-совместимых компьютеров, а также всему, что с ними связано. 


1 января 1994 года выйдет в свет 
первый номер журнала "РС-РЕВЮ” 


зовая Фирма, которую мы сейчас регистрируем 


Наших старых, добрых и верных читателей и почитателей просим не беспокоиться. день рождения "РС-РЕВЮ” 
не станет похоронным для "2Х-РЕВЮ". Мы работали и будем работать над улучиевиен его содержания и не 
только не собираемся сворачивать это дело. но и буден развивать его дальше. Более того, мы рассчитываем 
на то, что и многие из Вас подключатся к созданию и распространению этого журнала. 


ЧТО ТАКОЕ  “РС-РЕВЮ"? 


СОСТАВ "РС-РЕВЮ" 


1. "РС-РЕВЮ” будет выпускаться и расиро- 
страняться электронным способом. Уход от полигра- 
Фии снимет массу преград с его свободного раснро- 
странения. 

2. Планируется выпускать по одному номеру 
ежемесячно. объем каждого выпуска - 2,0...2.5 Ме- 
габайта. В зааркивированном виде объем выпуска 
составит 1080 К в расчете на то, что он будет по- 
ставаяться на одиой дискете НО (1,2М} или на трех 
дискетах Оо (3Х360Е) по выбору заказчика. 

3. "РС-РЕВЮ" будет поставляться без замиты 
от копирования. Мировая практика показала, что 
самая лучшая "зашита” - это отсутствие зашиты, но 
при оперативном обновлении информации. При таком 
подходе вынгрывает и издатель и потребитель, 

4. уурнал готовится так, чтобы с ним можно 
было работать на ИЗМ-совиестимих машинах любого 
класса. Единственное ограничение - графические 
иллюстрации рассчитаны на мониторы УСА. Пользо- 
ватели, не инеющие их, смогут работать с хурна- 
лом, но не смогут просматривать сопровожлаюаие 
картинки. 

5. У читателя будет возможность распечатать 
любые понравившиеся ему статьи журнала на имею- 
щемся у него оборудовании. 

6. “"РС-РЕБЮ" будет распространяться через 
сети дистрибуторов. Порядок распространения сле- 
дУЮшиЯ: 
“ИНФОРКОМ-ПРЕСС" направляет ограниченное ко- 
личество мастердисков свомм дистрибуторан по ре- 
гионам с лицензией на неограниченное копирование 
и распространение. 

локальные дистрибуторы ногут сани продавать 
выпуски "РС-РЕВЮ" на своих дискетах или копиро- 
взть хурнал на дискету заказчика, а ногут создать 
свою диСтрибуТорскУю сеть, в этом случае они 
станут Генеральными дистрибуторани. 


® 1. 06зоры новейших ИГРОВЫХ ПРОГРАММ © НАЛЮС- 
трациями. 

2. Исследование и анализ известных и мироко- 
распространенных игровых программ. 

3. Переписка с читателяни. казлый, кто дюбит 
игровые программы. сможет написать о своих откры- 
тиях и проблемах. Любое грамотно и интересно на- 
писанное письмо будет опубликовано для обсужде- 
ния. 

4. Обзоры зарубежной прессы: интервью с вы- 
пающимнися программистами и издателями, обзоры 
новых аппаратных средств, расширяющих возможности 
стандартной машины, рассказы об известных фирмах. 

5. Раздел “Компьютерная новелла”. | 

6. Игровые этюды. К каждому номеру журнала 
мы буден прилагать отгруженные модули состояния 
тех или иных известных игр, представляющие собой 
некий этюд (по тилу шахматного). решение которо- 
го доставит читателю удовольствие. Лучшие решения 
будут поошряться ценными призани. 

Т. Рекламный блок. Этот блок не займет более 
10% объема хурнала и, если получит достойное раз- 
витие, позволит значительно снизить Ваши затраты 
ва получение отдельных выпусков. 

8. Справочный блок. В него войлут: 

- указатель наших дистрибуторов (люди во 
всех уголках страны должны знать. к кому им надо 
обращаться для приобретения очередного выпуска); 

- указатель игр (для быстрого поиска, где и 
когда освешалась та или иная игра); 

- указатель авторов (для фиксации авторских 
прав наших внештатных корреспондентов, статьи 
Которых будут публиковаться в журнале); 

- указатель самых низких цен по Фирмам 
г. Носквы на радиоэлектронную продукцию на текущий 
несяц. 


ОТКРЫТЫЙ аукцион провести невозмохно. 


1. ТЕНДЕР завершится к 45.42.85 


Обрамаем Ваше внимание на то, 


ПРИНЕЧАНИЕ: 


©6 изменении порядка распространения "РС-РЕВЮ", 
2. Всех церхателей "Зеленых пакетов”, 


предоставлены некоторые льготы. 


Итак. для создания собственной первичной сети Генеральных дистрибуторов ны объявляем ТЕНДЕР на 
распространение "РС-РЕБЮ". Тендер - это как бы закрытый аукцион и он применяется в тех случаях, 


когда 


2 Подать заявку каждый хелающий может уже сейчас. заявка подается в произвольной Форме. В заявке 
Вы должны указать МАКСИМАЛЬНО ВОЗНОЖНУЮ ДЛЯ ВАС цену, 
выпуска хурнала для лицензированвого копирования и распространения, а также Форму оплаты (нал. . б/нал. }. 
При определении экономически обоснованной максимальной пены ориентируйтесь на свои возножности по 
распространению копий, а также на возможность организации Вами региональной листрибуторской сети. 
что указание Вами предельно допустиной цены НИ К ЧЕМУ ВАС НЕ 
ОБЯЗЫВАЕТ. В.99 случаях из 100 Ван придется платить 
явится только свидетельством серьезности нанерений и наличия потенциальных возножностей как будущего 
дистрибутора, что нам и необходимо знать при создании нервичной сети. 

3. 15. 12.93 мы отберем 100 наиболее весомых заявок и установим единую цену настердиска. Она будет 
равна размеру самой слабой из ста отобранных заявок, ‚ 

4. Все победители ТЕНДЕРА получат извещение с указанием установленной цены и дальнейшие указания. 

5. Итоги ТЕНДЕРА будут объявлены в последнем выпуске "Хх-РЕВЮ" этого года. 


ПО КОТОРОЙ Вы ГОТОВЫ ПРИНИМАать мастерлиск одного 


значительно неньше. В данном случае Ваша цифра 


1. Если на ТЕНДЕР поступит ненее 100 заявок. ТЕНДЕР считается несостоявшинся и ны примем решение 


заинтересованных в распространении ”РС-РЕВЮ". просим 
обратиться к нан по телефону или письном. Им. 


как уже’ зарегистрированным дистрибуторам, будут 
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НКО “ИНФОРКОН” 


Носква, 


121019, Г-19, а/я 16 


СПЕКТРУМ 
В ШКОЛЕ 


Зиравствуйте, дорогие 
` ДРУЗЬЯ! 


Так ух повелось в последиее 
время на наших страницах,  пред- 
назначенных для школьников, что. 
ны играючи осваиваем интересные 
численные методы решения матема- 
тических уравнения. И сегодня ны 
хотели бы предложить Вам еше одну 
игру, из КОТОРОЙ вытекают совсем 
не игровые последствия. 

Скахите, 
|Человеке, который предожит Вам 
решить ОДНО уравнение с ДВУМЯ 
неизвестными? Наверное, что У 
него. как сейчас говорят, “крыша 
поехала”. А если это будет одно 
уравнение с пятью неизвествыми? 
Это невозможно, скажете Вы? А 
если он Ван скажет, что его не 
интересует абсолютно точное реше- 
ние и его устроит решение с ка- 
кой-то допуСТИМОЙ погрешностью? 
10. это совсем другое дело - тогда 
нохжно как-то попробовать УГАДАТЬ 
более-менее приличное ` решение, 
1особенно если это игра. 


Итак, возьмем для игры следую- 
шие значения: 
Хх: 5 та; 
| Составим из них уравненне, 
пример такое: 


на- 


Х + Жну + ХЕХ + ЧУ - 44 - О 


И предлохим его решить кому- 


пибо из’ знакомых, ие отирывая 
истинных значений Ки У. Емиист- 
венное, что можно подсказать - 
так это то. что Х находится в 
пределах от 0 до 20, ау - ото 
до 10, И пусть он теперь попро- 
бует решить такое уравнение. 


Что будет делать Ваш партяер? 
Во-первых, он попробует взять в 
качестве первого приближения сре- 
дние значения Хи У из их ноз- 
ножного интервала и посмотреть, 
что из этого получится: 

Е © 9 т -5 

10 + 50 + 100 + 25 - 44 = 

Ны получили "невязку”, 
139, 


139 
равную 
поскольку не угадали Хи У. 


что Вы подунаете о. 


Надо их корректировать. Поскольку 
”невязка” больше нуля, значит ны 
где-то перебрали. Ударим опять 
посередине: 
Х=5 ; = 

ПОЛУЧИМ: 
5 + 12,5 + 25 + 6.25 - #4 - 4.75 

"невязка” стала значительно 
меньше. значит, мы на верном пу- 
ти. Попробуен еше раз уменьшить Х 
и У. 


г, 5. 


Хе ух 23 
2. 5+3. 1346, 25+1. 56-44 : -30. 56 
На сей раз мы ушли не в ту 


Сторону. Попробуем еше раз и 
опять посередине: 
т Х=3. 15; У: 1.85 


3. 15+6. 98+14. 06+6. 98-44 - - 12.23 

Снова "недолет”. Стрельнем еше 
последний разок и пока хватит. 

Х=4. 38; у = 2.18 

4. 38+9. 55+19. 18+4. 75-44 - - 6.14 

Итак, мы получили результат: 

Х - 4.38, а У - г. 18 

Истинный же результат, как. ны 

' помним, был: 
Хх -5, ау =г. 

Выходит, мы решили задачу с 
точностью до принерно 12 процен- 
тов. Хорошо это или плохо? НУ, 
во-первых, это еше не предельная 
вама точность, ведь считали-то мы 
ва бунажке, а если применить кон- 
пьютер, то ее можно бы и повысить 
и как это сделать, мы еше пока- 
жен, Л во-вторых, надо подумать, 
где такие расчеты ногут использо- 
ваться? 

сказывается, они ногут приме- 
няться. как пранило, в двух слу- 
чаяя. Во-первых, в технике, когда 
какие-то параметры ° КОНСТРУКЦИИ 
неизвестны или известны плохо. 
их, конечно, можно устанавливать 
с помошью ислытаний,  эксперинен- 
тов и т.п. и так и делают, но это 
КОВОЛЬНО ДОРОГО, ТРУДОЕНКО и ДОл- 
го. Такой расчет позволяет во 
иного Раз снизить затраты на ис- 
пытания и сэкопонить месяды и го- 
ды. К тону зе, как правило, все 
технические устройства имерт не 
менее, чен 100-процентный запас 
задежности и точность наших рас- 
четов вовсе ие так уж и плоха, 

Вторая область, когда прико- 
длится решать уравнения, в которых 
неизвестных . больше, чем самих 
уравнений - экономические расче- 
ты. Типа того, как организовать 
транспортировку пива, нефти и 
подсолнечного масла мезду десятью 
регионами, спрос в которых на эти 
продукты точно не мзвестен, го 


472 


‘затратить при этом 'НИНИМУМ 


средств на перевозку, кранение и 
обсдухивание цистерн. В этих рас- 
четах точность порядка 12 процен- 
тов - просто блестящая. В рРыноч- 


Аной экономике надо уметь прогно- 


зировать результаты своих дейст- 
Вий. 


Итак, мы умеем теперь решать 


| уравнения с большин количеством 


неизвестных, хотя вопросов ‘еше 
осталось немало. Во-первых, как 
приспособить к этому делу комнью- 
тер, а во-вторых. надо ему дать 
четкий алгориты, потому что мы с 
Вами "стреляли" по собственному 
разумению» - чуть ближе, ЧУТЬ 
дальше, а компьютеру надо точно 
объяснить, куда "стрелять" 
поисках нужного решения. 


давайте посмотрим на графике 
(Рис. 1), как мы двигались к ре- 
шению, начиная от Х=10, У=5, 


5 19 15 х 
как видите, мы все время ”бе- 
гали" по одной прямой, пока не 
нашли на ней точку, близко лежа-| 
шую к истинному решению. да это 
не удивительно, ведь мы все вреня 
делили отрезок пополам. Но так 
дело не пойдет. Это хорошо. что У 
нас только два неизвестных и наш 
график имеет две координаты Хи У 
(его можно изобразить на даже на 
плоскости), А если бы неизвестных 
было штук пять? вы не представля- 
ете, что такое апятимерное про- 
СТРАНСТВо? Мы тоже не представ- 
пяем. и как попасть прямой линией 
в таком пространстве в нНУЖНУЮ 


точку? Это действительно трудно 
представить. 
Даля того, чтобы “освободить” 


себя от блуждания по одной прямой 
и выйти за ее пределы (например 
так. как показано на рис. г), 
вадо "отпустить" Хи У от необхо- 
диности делить отрезок пополам 
при поиске нового приблихения и 
разрешить компьютеру самому выби- 
рать, какое прирашение нахи 1 
они будет ‘делать на каядом шагу. 
Нохно даже разрешить ему это де- 
лать случайным образом. Пусть 6е- 
гает где хочет, все равно мы прИ- 
мем только те его шаги, которые 
ведут к уменьшению “невязки”, а 
все прочие отбросим. 

Так наш компьютер "выйдет” за 
препелы роковой пряной. ЕСЛИ У 
нас пять неизвестных, то он вач- 
нет “блуждать” в пятинерном про- 
страистве, медленно но верно 
подходя к приенденому (хоть и ней 
точному) решению. 


Такой метод расчета известен в 


математике под названием ”случай- 

ного“ поиска, 

Наметим алгорити;: 

}. Ввод уравиения. 

г. ввод предельных значений 
неизвестных. 

3. Выбираен первую точку в 

качестве средней между предельны- 

ми значениями неизвестных. 

4. Расчет “невязки”. 

5. С помошью генератора слу- 

чайных чисел определяем "прираше- 

ние” для кахдой из координат, 

6. Получаен новую точку, 

Т. Проверяен, не выходит ли 

она за пределы допустимых значе- 

ний по координатам. Если да, то 

возвращаемся на н. 5. 

8. Рассчитываен “невязку” и 

сравниваем ее с предыдущей "“не- 

вязкой”. Есаи она по абсолютной 

величине больше, чем предыдущая, 

то такой шаг нам не нужен, воз- 

вратаенся на п. 5. 

9. Делаем новый шаг в тон же 
“направлении”, что и предыдущий 
случайный шаг. Теперь нам генера- 
тор случайных чисел не нужен, не 
стоит тратить зреня на случайный 
поиск направления, раз мы его уже 
нажли. 

10. Проверяек не вышли ли мы 
за пределы допустимой области. 
Если да. то возврат на п.5 (снова 
включаем свучайный поиск). 

11. Проверяем значение “невяз- 
ки". Если она возросла, то шаг 
отменяется и возвраваенся на п.5 
для поиска нового направления, а 
если уменьшилась, то возвращаемся 
на л.9 и шагаея в тон хе направ- 
деним. еще раз, ки 
Ножно сделать кое-что еще. Во- 
первых, мы инеем здесь бесконеч- 
ный дикл, поэтому надо предусмо- 
треть окончание расчетов и выход 
из него по достижении какого-то 
звачения "невязки". 

Во-вторых. можно ускорить ра- 
если после удачного шага 


направлении напринер_ в два раза 
длиннее. А после неудачного шага 
не бехать сразу к случайному 
определению нового направления, а 
попробовать шагнуть еше раз туда 
ше, но в десять раз короче. 

Ножно повысить надежность на- 
ших расчетов, запуская одну и ту 
хе программу несколько раз. По- 
скольку у нас неизвестных больше, 
Чен количество уравнений, то но- 
жет быть получено много разных 
пар Хи У, которые удовлетворяют 
решению задачи. Опрецелив случай- 
ным образом несколько таких пар, 


нетод 
помска для решения своей задачи 
‚усножет. доработать его. так, как 
ему надо. 

От себя ле добавим, что у ме- 
‘тода случайного поиска, хоть он и 
работает довольно медленно, есть 


СПЕКТРУН В ШКОЛЕ 


одна интересная особенность. дело 
в том, что при применении других 
численных методов расчет хоть 
происходит и быстрее, но, встре- 
чаются ситуации, когда ой заходит 
в ТУПИК. Натенатики говорят, что 
расчет "попал в яму" или "в ов- 
раг”. И обычными способани из та- 
кого оврага не выбраться. АС 
поношью случайного поиска - пожа- 
луйста. Поэтону применяют иные, 
быстроработающие методы, но когда 
сказывается, что "невязка” начи- 
нает уменызаться слишком медлен- 
но, то подключают случайный поиск 
и он выводит из тупика. 
Представьте себе, что ва не- 
РОВНУЮ ХОДМИСТУЮ ЛУНАЙКУ бросили 
мяч. ваша задача - закатить его в 
самую низкую точку этой лужайки 
(нинимальнаая иевязка}. Если он 
попал на холи, то он бодро пока- 
тится туда, куца надо (работает. 
быстрый численный метод), но если 
по пути он закатится в какую-либо. 
янку, рытвину или овраг - дело 
плохо. Сам он оттуда не выкатит- 
ся. Его надо “встрякнуть”, еше 
раз подкинуть, чтобы он ног ка- 
титься дальше - это и сделает 
вовремя подключенная процедура 
случайного поиска. 
10 БЕМ «ки Метод случайного 
поисканки у 
20 ПЕР РН А{х; 7) = Жькну+хих+унУ 
4 44: ВЕМ Ваше уравнение. 
ВЕТ хшах = 20: ТЕТ жази:0: 
БЕТ ушах = 10: ВЕТ ут!0=0; 
КЕН въод граничных условий. 
ЦЕТ х-=(квак+жюо) Иа; 
ЦЕТ у: (увак+ ут) /г: 
ВЕН исходная точка поиска 
0 $08 400: РЕМ расчет 
невязки. 
ТЕТ 9141 = 
невязку. 
С0 508 300: БЕМ печать. 
ЪЕТ язфер = (нюах-яи)/10: 
ТЕТ уздер = (ушах-уш!т)/10: 
ВЕН стандартный шаг поиска. 
60 508 500: ВЕН определение 
случайного направления. 
БЕТ х1-+@х: БЕТ У1:У+4У; 
ВЕМ поиск новой точки, 
ТЕ к! > кмах ОВ =! ‹ мма 
ОЕ у1 › увах ОВ 71 ‹ Ума 
ТНЕН 60 ТО 60: ВЕМ при выходе 
за границы зоны надо повто- 
рить поиск новой точки. 
ГЕТ х=к1: ТЕТ 7:71: КЕН пере- 
ход к новой точке. 
60 ЗВ 400: БЕН расчет новой 
невязки. 
ТР АВЗ (41) 
со то 130 
ЦЕТ Х-Х-9Х: БЕТ у-у-4у: 
60 ТО 60: ВЕН если невязка 
оказалась больше, чем была, 
то эта точка иан не нужна. 
ЪЕТ 4141 - 41#: ВЕМ запомнили 
новую невязку. 
60 508 300: ВЕН печать 
ТР АВЗ(41#1) < 1.0 ТНЕН $ТОР: 
РЕМ если достигнута заданная 
точность, то конен работы. 
60 ТО 10: ВЕМ Возврат дая 
слещуюшего шага. 


30 


40 


45 
38 91+: ВЕМ запомнили 
29 
50 
60 
то 


80 


90 
100 
110 < АБ5 (4141) ТНЕН 


120 


130 


140 
150 


160 
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300 РЕТИТ “Х: *;х; ТАВ 10; 
"У- "; у; ТАВ 20; "ОТЕР= 
91#1 

310 ВЕТОЕН 

400 ЪЕТ 41+ = ЕН А(х, У} 

410 ВЕТОЕЯ ° 

500 ВЕТ ах-хзфер" (28-1): 


ТЕТ ау: узферх (2=юНр-1) 

КЕТОЕН 

Принечание. Здесь мы исподь- 
зуен не функцию ЕН, а 2=Юо-1. 
Это сделано потому, что ВНР дает 
результат в диапазоне 0...1!, а 
нам нухно в диапазоне -1... 
иначе нам поиск будет не слу- 
чайным. а все вреня будет уводить. 
нас вправо и вверх. 

В стРоке 50 ны задали паранет- 
ры хз1ер и узфер - это как бы си- 
ла того толчка, со которой за- 
Стрявший мяч выбрасывается из ям- 
ки. Мы взяли эту величину, равной 
одной десятой размеров “игрового 
поля". Если взять мало, 
нохжет и не хватить и мячик не 
найдет более удачного продолжения 
своену пути, а если взять слишком 
много, то он будет слишком долго 
метаться по игровому полю, а то и 
вообше выходить за его пределы. 
Ножао подобрать эту величину экс- 
периментально, а можно и сделать 
ее плаваюаей, в зависиности от 
того, как близко к финалу ны по- 
доли. 

Проведя расчеты по приведенной 
выше программе мы получили следу- 
юшую тректорию поиска. 


510 


7.5 х 


25 


Результат очень близок к за- 


как видите, здесь результаты 
уже не столь близки к задуманным, 
но зато мы ножем сузить диапазон 
"возножных“ значений для Х и 7. 
Найример так: 


ХНАХ - 6: ХНЫ - 0: 
УНАХ : 6: УМ - О 
И теперь "прогон" программы 


еше восемь раз дал другую серию 
результатов: 


Хх У 
4.55 2. 61 
'4, 25 г. 98 
4. 56 г. 50 
5. 21 1. 69 
4. 54 2. 61 
$. 57 2,97 
4. 58 г. 5т 
#. 69 2, 43 
Среднее 4.65 2, 51 
точность Ти 25% 


А теперь. в заключение этой 
статьи, мы предлагаем Вам пару 
легенд, ИЗ КОТОРЫХ Вы поймете, 
что такие “детские игры” могут в 
реальной жизни ПРИВОДИТЬ к 
экономии тысяч рублей личных и 
миллиардов рублей государственных 
денег. 


'. й 

Дело было почти 20 лет. назад. 
СССР произвел запуск очередной 
межпланетной станции в дальний 
коснос. Как на грех, сразу после 
пуска выясняется, что одна из от- 
ветственнейших систем вообще не 
работает. Причен, пока она и не 
нужна, а вот когда через несколь- 
ко месяцев станция дойдет до 
конечной пели своего путешествия, 
то без вее не обойтись. Но меры 
ножно предпринимать только сей- 
час, потом будет поздно. Надо 
что-то срочно делать. 

Было несколько путей выхода из 
создавшегося подозения и оконча- 


принятое 
решение необходимыми расчетами. 

Уже через пол-дня Грубых рас- 
четов оказалось, что предсказать, 
Что даст то или иное решение мох- 
но только решив пару уравнений 
размером в пол-страницы, в кото- 
РОН к ТОМУ Же было пять неизвест- 
ных параметров. Конечно, эти па- 
раметры ножно было “вытаскивать” 


такая работа оказалась бы на уро- 
вне десятка кандидатских диссер- 
‘таций. 

Беглый поиск в технической 
библиотеке показал, что можно 
попробовать воевать с таким урав- 
нениен. Еще пол-дяя ушло на изу- 
чение основ вариационного исчис- 


настолько далеки ст того, что 


ления и теорий оптинального уп- 
равления. а еше через два дня 
после отсева всего лишнего,  по- 
чеРпнУТОГО иЗ научных трудов, ро- 
дился алгориты, немного похожий 
на предложенный Ван. Решение было 
найдено и подтверядено расчетани, 


- благо ЭВ ЕС-102е в те годы уже 


сушествовала. 

дело оставалось за малым - за- 
шитить это решение перед Государ- 
ственной комиссией и убедить ее в 
правильности предложенных неро- 
ПРИЯТИЙ. 

Начальника отдела чуть не ква- 
тив удар, Когда он увидел, что 
решение получено из ивух урав- 
нения с кучей неизвестных. Его 
реаклию словами не передать, и 
вот тогда и началась игра, кото- 
рую ны Вам описали в самом нача- 
ле. Задунывались числа, состав- 
лялись уравнения, а молодой спе- 
циалист “угадывал" то, что заду- 
мал начальник. Пришло еше более 
высокое руководство и увлеченно 
ВКлЮЧИлЛоСЬ В ИГРУ, Одиии словон, 
вдоволь наигравщись, они вынухде- 
ны были перекреститься и согла- 
ситься на рискованное с их точки 
зрения решение. Их поддеряка на 
заседании  Госкомиссии решила 
лело. Конечно,. вопрос о том, ка- 
ким путем решалось уравнение ‘тан 


не поднимался. Военные - люди 
серьезные, им не до таких мело- 
чей. Им важно знать что будет 


и как будет и кто будет отве- 
чать, если всё будет не так, а 
иначе. 

Можно ли использовать положи- 
тельные результаты кабинетной иг- 
Ры в обоснование сложных расчетов 
для ответственной техники? Во 
всяком случае, акты и протоколы 
были подписаны и ответственность 
легла на плечи отважных начальни- 
ков - ик убедила иненно игра! 

Через четыре месяца чосие это- 


го станция подностью выполнила ` 


поставаенную перед ней задачу, а 
поведение всех систем по данным 
‘теленетрической информации совпа- 


‘вос ‚ расчетным с точностью до 


полутора процентов, ‘так были спа- 
сены миллиарды государственных 
рублей, затраченных на  програмну 
полета. Восторги молодого специа- 
листа по этому поводу нозно ве 
описывать, а отважные начальники 
лукаво уснехались. прининая п03- 
дравдения на самон высококом уро- 
вне. 


История получила, кстати, нео- 
хиданное продолжение. Мы ведь 
сказали, что в уравнение входило 
иного неизвестных параметров, для 
определения которых требовались 
длительные и дорогие испытания 
техники. Но раз ух приближенное 
решение было найдено, то интерес- 
но стадо поглядеть и на то, чему 
эти параметры оказались равны. 
Так вот, два из них оказались 
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предсказывала теория, что это 
вызвало массу соннений. Раз’за 
разом случайным понскон искались 
„новые решения, во эти два пара- 
нетра все равно отлизались от 
теории раза в два. впоследствии, 
когда  экспеликия закончилась 
успешно и подтвердила расчет, 
стали проверять теорию и ныясни- 
ли, что в ее основу была положена 
модель начала 60-х годов, которая 
успела устареть. Скорректировав 
модель и пострив новую теорию, с 
удиваениен обнарухиди, что эти 
параметры оказались почти такиия, 
как показало решение уравнения со 
нногини неизвестныни. 


г. 

Год 1990-ый. только что поя- 
вился на свет "ИНФОРКОМ" и сразу 
предлохил свойн клиентан первый 
десяток нетодических разработок, 

Встал шепетильный вопрос опрё- 
деления цены на каждую. Бодьшую 
цену назначить нельзя. Деньги, 
затраченные на их подготовку и 
печать не вернутся и Фирму ждет 
игновенная смерть. Малую цену на- 
значить нельзя, ибо если спрос 
превысит очень ограпиченные Физи- 
ческие возможности коллектива, то 
не хватит подготовленного тиража, 
не хватит сил и времени на транс- 
порТИирОвВКУ И ОТПРавку, не хватит 
места для хранения, сорвется под- 
готовка новых работ, пойдут срывы 
заказов, потеря доверия клиентов 
и в итоге тоже сиерть. я 

два десятка неизвесхных (цена 
ца каждую из разравоток и ик ти- 
Рахи) вошли в несколько уравнё- 
ний, увязывающих Физические Фоз- 
кожности коллектива, полиграфи- 
ческие мошности дружественного 
предприятия, почтовые возможнос 
дружественного отделения связи и 
потенциальные Финансовые вознож- 
ности неизвествых будуших канен- 
тов. 

Расчет проводился на этот раз 
уже не на Ес-10га, а на "Спектру- 
не”. что намного удобнее, по той 
ле известной теперь Вам методике 
и в результате его были получены 
цены, которые надо назначить на 
ту или иную разработку и принер- 
ный ожидаемый тирал (для каждой - 
свой). По прошествии года искдю- 
чительно ради интереса было про- 
ведево сравнение того. что пал 
компьютер с тем. что оказалось на 
самом деле. Саная грубая ошибка 
составила всего 35 процентов. Так 
еще раз удачно сработала эта 
увлекательная, но очень полезная 
игра. 


В заключение хочется еше раз 
напомнить тем, кто нас читает - 
игра дело серьезное! играйте на 
здоровье, но старайтесь при этом 
одновременно и обогашаться знани- 
ями - кто знает, когда это приго- 
дится! й 


=——=—=—==—щ=—=ыщ=ыщы=ы5=ы5=ы5="=—_—_——_—_ 


в 


фхотим создать процедуру, 


{Прододжение) 


Начало см. на с. 69-74, 
178 - 182. 


90-95, 


7. И снова об’ обрабстке 
списков. 

Мы уже видели с Вами некоторые 
процедуры, выдающие какой-то ре- 
зУльтат и назвали их операциями. 

поношью команды ОТТРОТ Вы може- 
1 сами создавать такие операции. 
В этом случае команда ООТРУТ оп- 
редедяет то значение, которое 
доджно быть возврашено в качестве 
результата. Например, если мы 
КОТОРОЙ 
нам не хватает в стандартной вер- 
сии ЛОГО, такую, которая будет 
вычислять разность двух чисел 
аналогично тому, как процедура 
50М вычисляет их сумиу, то мы де- 
даен так: 


ТО РТЕРЕВЕНСЕ: НОМ: НОНа 
ООТРИТ НОМ! - : нома 
ЕНЮ 


и тогда: 

РЕТИТ ОТЕРЕВЕЕСЕ 7 5 
даст результат: . 

г 


когда ЛОГО встречает команду 
УТРОТ, он передает то значение, 
которое находится справа от слова 


ДОСТРОТ и останавливает процедуру. 


поэтому РТЕРЕБЕНСЕ Т 5 
значение 7-5. 

вы можете в одной процедуре 
иметь несколько команд ОХТРУТ, но 


инеет 


18 этом случае они должны стоять в 


разных ветвях 1. поскольку пер- 
вая хе встреченная комавла ОУТРОТ 
шрервет исполнение процедуры. 
действительно, вам ведь нужен 
только один результат ее работы, 
например, Вы можете сделать 
так, чтобы процедура вычисления 
разности двух чисел всегда выда- 
вала положительный результат. 
этого надо, чтобы оба числа 
сравнивались между собой и из 
большего вычиталось меньшее. 


О ОТЕРЕВЕНСЕ И! : НоМ2 й 
1Р :НОМ1> :НОНаТООТРОТ : ВМ - 
: ВОН2) 

ОЮТРОТ :ВОМ2- : НОМ 

ЕН 

РЕТИТ ОТЕРЕБЕНСЕ 10 3 

т 

РЕТИТ ОТЕРЕРЕНСЕ 2 6 


Ножно, конечно, 
м так: 


было записать 


ТЕР :НОМ1> с НОН2ГООтРОТ :ВОН1- 


{ОНР} ГОЧТРИТ : КОНЕ-: НОМ 


ЯЗЫКИ — ПРОГРАММИРОВАНИЯ 


но В этом нет особой необходинос- 
ти. Если исподняется первая ко- 
нанда ОСТРОТ, то и процедура за- 
кончится. а до второй команды 
ОЧТРУТ дело и не дойдет. 

точио так хе можно скойструи- 
ровать и процедуру, выдающую по 
конанде ОУТРУТ слово или список. 
Например, мы хотим узнать, вачи- 
вается ли слово с гласной буквы 
или нет. Если да, то в кафестве 
артикая перед ним надо ставить по 
пранзлам английской гранатики не 
=А". а “АН”. 

поскольку нас интересует толь- 
ко первая буква в слове, то не- 
плохо проверить, ве является ли 
саово пустым списком. 

Вот пример, который выдает 
значение ”Ам“, если слово начина- 
ется с гласной, или выдает “А*, 
если слово начинается с ивой 
буквы ияи выдает пустой символ, 
если слово - пустое. 


ТО. АЕТЕСЬЕ : АЗЮРО 
ТР ЕЗРТУР :АМОРО ГООТРОТ *} 
ТР МЕМВЕВР РТЕЗТ : АМОЕОГА Е Т 
О 91 (ООТРОТ “АН 
ОСОТРОТ “А 

ЕКО 


Попробуйте сами изменить про- 
цедуру АЕТТСЬЕ так. чтобы она 
могда работать не только с про- 
висными, но и со строчными буква- 
ми тоже. 

Бывают случаи, когда операци- 
ями нало пользоваться очень осто- 
рожно. Прежде всего, некоторые 
операщии могут иметь побочные э$- 
Фекты, т.е. они могут вести себя 
как команды. Например, мы можен 
создать операнию, которая запро- 
сит имя пользователя и выдаст 
первое из введенных в нее слов в 
качестве результата. 


ТО СЕТНАМЕ 
РИТЕТ ГУНАТ 1$ УО0Е ВАМЕЛ 
ОПТРОТ РТЕЗТ ВЕЛИТ 
ЕО 


поэтому: 
НАКЕ ”УбУ СЕТИАНЕ 
даст сообщение 
УНАТ 1$ УСОВ НАНЕ 
и будет алать ввода с клавиатуры, 
презке чем передаст первое прочи- 
танное слово в качестве результа- 
та опералим. Все это выглядит. до- 
статочно просто, но что будет, 
если Вы попробуете: 
РЕТЕТ СЕТВАМЕ 

Обратите знимание на то, что 
ВНУТРИ процедуры СЕТШАНЕ тоже 
имеется команца печате  РЕ1Т. 
ЛОГО вычисаяет результат работы 
пропедуры справа налево и потому 
сначала исполнит СЕТЕАМЕ, а затем 
передаст результат команде РИТИТ, 

То же самое произойдет ив 
команяе: 

РЕТЕТ ЗЕНТЕНСЕ “НЕМО СЕТБАНЕ 


Здесь и СЕТНАМЕ и "НЕМО обес- 
печивают входные данные для ко- 
нанды ЗЕНТЕНСЕ, которая передает 
свой результат команде  РВТИТ. 


180 


* Когда же 


Попробуйте: 


РЕТИТ (ЗЕЕТЕЯСЕ СЕТКАМЕ “АШТА$ 
СЕТНАНЕ» 


и посмотрите, получится ли в ито- 
ге именно тот результат, которого 
вы ждете. 

ВТОРОЙ номент, о КОТОРОМ НУЖНО 
всегда помнить, заключается в 
том, что всякий раз, когда вызы- 
вается исполнение оперании, она 
работает, как в первый раз. 


РЕТИТ РТЕРЕВЕНСЕ 7 5 
2 
РЕТИТ Р1УРЕЗЕЖСЕ 7 5 
2 


Так все и полжно быть и ничего 
иного мы и не хдем (но при иного- 
кратных повторных вычислениях на 
это уходит много’ времени). 

Сколько бы раз Вы не вызывали 
СЕТЕАНЕ, эта процедура всегда 67- 
дет дедать запрос и ждать ввода` с 
клавматуры. Если хе Ван надо за- 
помнить то имя, которое было вве- 
дено в саный первый раз, то Вам 
надо присвоить его символьной пе- 
ременной м обращаться к ней вся- 
Кий раз, когда Вам будет необхо- 
димо: 

НАКЕ "УОУ СЕТНАМЕ 

РЕТНТ ЗЕНТЕНСЕ “НЕМО : 3005 

РЕШЕТ ЗЕНТЕНСЕ (1 АН СЬАР ТО 

ВЕЕТ 7001: У09 


Уровни процедур. 

Когда одна процедура вызывает 
ДРУГУЮ, КыЫ ГОВОРИИ, ЧТО мы пере- 
шли на ВТОРОЙ уровень процедуры. 
Если и эта процедура, в свою оче- 
редь, вызывает еше одну, то это 
ухе третий уровень ит.д. Вот, 
например. три иропелуры: 


ТО РВОС\1 
РЕТЕТ 
РЕОСР 

ЕО 

ТО РВОС2 
РЕТИТ 
Р70С3 

Ем 

ТО Р&ОСЗ 
РЕТЯТ И.БУЯ 3) 

ЕКО 


(ЦЕУЕЬ {1 


ТЫЕУЕЬ 2] 


Здесь РЕОС1 - это первый уро- 
вень. Когда она вызывает РЫОСг, 
ны перохомин. на второй уровень. 
она вызывает Р8ОСЗ, то 
это уже третий уровень, после че- 
го нам надо выпоянить три команхы 
ЕКО, ЗТОР или ООТРОТ, преяде чем 


мы вновь вернемся на вер УРО- 
вень (нулевой уровень). 
Нулевой уровень в ЮГО - это 


командный уровень, именно на нен 
Вы находитесь, когда перед Вами 
на экране изображено приглашение 
®?". Есть и срециальная конанла 
ТОРЬЕЧЕТ, которая позволяет сразу 
вернуться ва верхний уровень, не- 
зависимо от того. где Вы находи- 
тесь. Вирочен, этой  конандой 
пользоваться не рекомевдуется, 
разве что в случае крайней необ- 


ходимости. 
Уровень. на котором Вы находи- 
викак ие зависит от содер- 
тех процедур, которые Вы 
нсполняете, а зависит только от 
того, сколько процедур, вложенных 
ДРУГ В дрУГа, Вы исполнили. Пред- 
ставьте себе. что каждая встре- 
ченная на Вашем пути процедура - 
это ступенька ввиз, а каждая 
встреченная команда ЕНО, ТОР или 
ОБТРУТ - это ступенька вверх. По- 
ЭтонУ, если находясь ва саисм 
верхнем (комананон) уровне Вы вы- 
зовете РКОСЗ, то перейдете на 
шервый уровень. хотя по своему 
содержанию РЕОСЗ устроена’ так, 
что выласт сообщение <ВЕМЕ.3>. 
Интересы реккурентные  проце- 
дурЫ. Они ногуУТ УХОДИТЬ В ГЛУбИНУ 
на очень много уровней. 


ТО РОБЕУЕЕ :И 
РРТИТ ЗЕНТЕНСЕ "ГЕУЕГ :Н 
ТР :Н<1ОГРОБЕМЕГ :Н+11 
ЕК 


Тогда команда ВОГЕМЕ.1 даст 
следующую печать: 


ТЕУЕГ9 ь 
Когда же, в ковще концов, Н 
станет равно 10, мы выполнин ко- 
манду ЕНЮ на 9-ом уровне, потон 
на 8-ом и так дадее до верхнего 
УРОВНЯ. В этом можно и убедиться 
самому, если изменить  БОГЕУМ. 
‘так: 
ТО БОБЕУЕЕ :Н 
РЕТНТ ЗЕНТЕНСЕ “ГЕУЕ. :Н 
ТЕ :Н<10 [ООЦЕУЕЕ:; Н+1} 
РЕТЕТ "ЕТНЕЗН 


Глобальные и локальные 
переменные. 
Когда слово используется в ка- 
честве входного параметра в про- 
цедуру (при определении пропеду- 
ры), тогда при вызове процедуры 
это слово должно принимать то 
значение, которое было задано при 


| ЯЗЫКИ  ПРОГРАННИРОВАНИЯ | 


вводе. Простой поинер: 


ТО БАУНИН :Н 
РЕТНТ ЗЕНТЕНСЕ {Я 15} ;Н 
ЕН 


И тогда: 

ЗАУНИМ 5 
дает ожидаеный результат: 

Е 155 
Теперь попробуйте так: 

НАКЕ "НТ 

ЗАУНИМ 5 

Н 155 
А теперь попробуйте: 

РЕТЧТ Н 

На этот раз результат будет 
неожиданяым - Т. ЛОГО запомнит то 
значение, которое имела перемен- 
ная Н до вызова процедуры и отло- 
жит его до тех пор, пока процеду- 
ра не закончится. 

Итак. мы можем считать, что 
переменная Н в процедуре ЗАУКОМ 
яваяется локальной дая данной 
процедуры, т.е ЗАТНОН имеет свое 
собственное значение Н, которое 
может. быть использовано только 
ВНУТРИ ТОЙ процедуры. те же 
слова. которые не указаны при 
определении процедуры в качестве 
ее параметров, являются ГЛОБАЛЬ- 
НЫМИ (т.е. значения этих перемен- 
ных одинаковы во всех частях про- 
Граниы). Отсюда вытекает одно 
важное следствие для того случая, 
когда используем несколько УРОВ- 
ней вложения процедур. Мы покахем 


его на примере трех процедур 
РЕОС!1, РЕОСг, РКОСЗ. 
ТО РВОС1 : 
РЕТНТ ЗЕКТЕНСЕ “РКОС1 : НИИ 
РвОСг 5 


[РЖОС1 АСАН} 


РЕТНТ ЗЕНТЕНСЕ “РРОС2 : НОМ 


ГРРОСг АСАТМ] 


РЕТУТ ЗЕЮТЕНСЕ "РЕОСЗ :КОН 


Здесь процедуры 1 и 2 печатают 
значевие своего параметра прежде, 
чем вызывать следующую процедуру, 
поэтому: 

РКОС! 3 

РВОС2 5 

РЕОСЗ Т 

РРОСг АСАТН 5 

РЕОС1 АСАТН 3 

Итак, ЛОГО “помнит”, какону 
УРОВНЮ процедур, какое значение 
ЮЛ соответствует. Проше всего, 
по-видимому, представлять себе 
ЛОКАЛЬНЫЕ переменные, как совер- 
шенно новые переменные, когда Вы 
находитесь внутри процедуры, 
Смотря На то, что они могут иметь 
то же имя. что и переменные, 
встречающиеся вне этой процедуры. 

Если локальвая переменная из- 


` меняется внутри процедуры, то это 


не инеет ниаких эффектов на все 
одинаковые переменные вне этой 
процедуры. Если же изменяется 


ме 


глобальная переменная, то это из- 
менение действует всюду, напри- 


Это имеет важное звачение для 
рекурсии. Вы мохлете положиться на 
ЛОГО, когда он закончит рекур- 
рентную процедуру в том смысле, 
что ЛОГО "помнит", где он бый ‘и 
каковы были там звачения локаль- 
ных переменных. 


Конана ОСУТРОТ для 
реккурентных процедур. 


Вы можете использовать проце- 


процедуры, но если Вам надо, что- 
бы эта пронедура все-таки закон- 
чилась и при этом выдала бы ка- 
кой-то результат, Вам надо иметь 
еше хотя бы один ОПТРОТ, в кото- 
Ром не происходит реккурентного 
вызова этой процедуры еще раз. 
Чтобы все это стало ясным. ны 
изкеним ранее использованную про- 
цедуру СЕТНАМЕ так. чтобы она за- 
прашивада имя пользователя и вы- 
давала бы первое слово введенного 
имени, если это возможно. а если 
нет, то печатала бы соответствую- 
щее сообщение и вызывала 6ы саму 
себя для повторения попытки. Пра- 
вда, имейте в виду, что это при- 
ведет и к повторной печати запро- 
са. Мы не будем здесь пользовать- 
ся конструкдией Р1ЮЗТ ВЕЛШ.ТЗТ, 
поскольку оператор ЕТЕЗТ не любит! 
пустые списки (и это естественно) 
и потому сначала проверим. не 
является ли введенный 
пустын. 
нему применять оператор РИ$Т. 


ТО СЕТНАНЕ 

РЕТЕТ (ПОЖАЛУЙСТА НАЗОВИТЕ 
ВАШЕ ИМЯ} 

НАКЕ “УСО РЕАШ.ТЗТ 
ТЕ ЕМРТУР :УОП(РЕТИТ (ХОТЯ БЫ 
ОДНО ИНЯ`У ВАС ДОЛЕНО БЫТЬ] 
НАКЕ ”УОЦ ЕТЕЗТ :У0% 
ТР КОНВЕЕР: УОЧ (НОМЕР ВМЕСТО 
ИНЕНИ БЫВАЕТ ТОЛЬКО У 
ЗАКЛЮЧЕННЫХ} О\УТРОТ СЕТНАМЕ? 
ОПТРИТ :909 

ЕНО 


Это хе можно проиллюстрировать 
на примере процедуры, входными 
параметрами которой будут число и 
слово, а в качестве результата 
будет слово, в которое будут вво- 
дить столько символов, сколько 
указано входным числом. Итак: 

ЗТАЕТ 5 “ВЕСУЕЗТУЕ 
выдаст 


ВЕСОВ. 
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Если :Н - это число, а : МОРО 
- входное слово, то мы хотим по- 
лУчить ОТ него :Н первых симво- 


можно рекуррентно вызывать проце- 
дуру ТАКТ до тех пор, пока еше 
не будут выданы :Н-! символов от 
оставшейся части входного слова 
:ТЕМЮЕО, т.е. 

СТАЕВТ :Н-1 ВОТЕТЕЗТ : ТНМОЕР, 
а затем поместить первый символ в 
новое слово: 
МОР РТЕЗТ : НОР 
БТАЕТ :Н-1 ВОТЕТЕЗТ : 1ЫМОВр, 


Пока все идет хорошо, но вста- 
ет традиционный вопрос: "Где зе 
остановить рекурсию?" ПОСКОЛЬКУ 


сколько еше символов 
ны хотим получить, то остановить- 
когда :Н равно ну- 
“пустое слово” для 
обеспечения перехода ТАКТ вверх 
на предыдущий уровень. 


ТО ЗТАБТ :Н :ТЕМЮЕО 

ТЕ :Н= [0 ООТРОТ") 

ОПТРОТ МОЕР ЕТЕЗТ : 1МЮЕО 
ЗТАВТ :Н-1 ВОТЕТЮ$Т : 15МОЕР 
ЕО 

РЕТНТ ТАКТ 5 "ВЕСОЕ5ТУЕ 
ВЕСУ 


давайте проследимн ход работы 
процедуры с помошью следующей 
‘таблицы (табл. 1): 


Вложенные списки. 

В качестве элементов списков в 
ЛОГО тоже могут быть списки. В 
этом нет ничего удивительного. 
Если ны составим список того, что 
то ножен 


[НОНЕТА КАРАНДАШ ЛАСТИК СПИСОК 
ПОКУПОК} ь у 


Обратите внинание на то, ‘что 
объекты, входящие в список поку- 
пок вовсе не являются элементами 
списка того, что лежит ‘у нас в 
кармане. Таким образом, список 
содержимого карнана имеет 4 эле- 
мента, несмотря на то, что список 
покупок сам является списком: 


{ХЛЕБ МОЛОКО НЯСО НАРКИ] 
а ХЛЕБ не является вешью, находя- 


ЛОГО даже допуска- 
ет создать такой список содерхжи- 
мого карнана: 


[МОНЕТА КАРАНДАШ ЛАСТИК (ХЛЕБ 
МОЛОКО НАСЛО НАРКИ] } 


и в этом списке по-прежнему всего 
4 элемента, несмотря на то, что 
четвертый элемент представляет из 
себя список из 4-х элементов. 


Сколько же элементов в следую- 
| ске? 


{ [ХЛЕБ МОЛОКО НАСЛО НАРКИ] [ДЖЕЙН 
ДЭВИД РОЗМАРИ} (СТИРКА ГЛАХЖКА} 
[8-НАЯ г0_ИЮНЯ 1!_ИЮЛЯ 10_СЕНТЯБРЯ 
23_НОЯБРЯ} } 


Таблица 1. 
Уровень :Н $ ТЕЫМОРО ЕТЕЗТ ВОТЕТЕЗТ  ОПТРОТ 
: ТЕМОЕО : ТМЮЮР 

1 5 КЕСОРЗТУЕ Е ЕСОРЗТУЕ 
2 % ЕСОВЗТУЕ Е СУЕ5ТУЕ 
з 3 СОВЗТУЕ [ ОВ5ТУЕ 
8 А ОВЗТУЕ о Е5ТУЕ 
5 1 В5ТУЕ в 5ТУЕ 
6 о р 
5 ь Е5ТУЕ |: Р=МОВО"В" 
м 2 ОВТУЕ № УЕ-МОЕО"О"Е 
з 3 СОВЗТУЕ с СИЕ -=МОЕО"С" УЕ 
2 4 ЕСОРЗТУЕ Е ЕСО =МОВО"Е" СИЕ 
1 5 ВЕСУРЗТУЕ к РЕСУЕ = ЮЕО"Е"ЕСУЮ 


В этом списке 4 элемента. Все 
они - тоже списки. Проше было бы 
дать им инена: 


| ПОКУПКИ ДРУЗЬЯ ЗАБОТЫ ДАТЫ} 


Вы составили такой список для 
себя, теперь Вы ножете составить 
аналогичный список для ‘друга и 
еше раз для кого-то и тогда полу- 
чите список снисков: 


ГНОЙ ТВОЙ ЧУЖОЙ? 


Здесь НОИ 2199 ГПОКУПКИ 
ДРУЗЬЯ ЗАБОТЫ ДАТЫ], точно так же 
ТВОЙ и' ЧУЖОЙ. Так можно продоп- 
хать и дальше, вкл. список 
один в другой, но наверное стоит 
остановиться и предоставить такую 
работу лого. 


Процедуры создания списков 

Мы уже использовали команду 
ЗЕНТЕНСЕ для того, чтобы 
список из двух и более элементов, 
которые могут быть словами или 
списками. Эта команда объединяет 
их в один список, снимая внешние 
квадратные скобки и переписывая 
весь список заново. Например: 


(ЗЕНТЕНСЕ ГВОТ ВАН} [ПРИМЕР 
ДЕЙСТВИЯ] [ОПЕРАТОРА ЗЕНТЕЯСЕ] 


выдает в качестве результата: 
[ВОТ ВАН ПРИМЕР ДЕЙСТВИЯ 
ОПЕРАТОРА ЗЕНТЕНСЕ} 


Сейчас же мы с Вами рассмотрим 
Три новых оператора, по-разному 
создающих списки. 

ЕРОТ (это [Р1!Г34 РИТ). Имеет 
два входных параметра. Второй 
паранетр - список, Конанда ЕРОТ 
создает новый список, в котором 
первый элемент берется из первого 
входного параметра, а остальная 


часть списка - из второго. 
Например; 
РРИТ “РАЗГДВА ТРИ ЧЕТЫРЕ] 


выдаст список: 
(РАЗ ДВА ТРИ ЧЕТЫРЕ] 


В отличие от ЗЕНТЕНСЕ здесь не 
происходит слияния внешних квад- 
ратных скобок при объединении 
списков, например: 

ЕРИТ [РАЗ ДВА} (ТРИ ЧЕТЫРЕ} 


. дает: 


Г(РАЗ ДВА] [ТРИ ЧЕТЫРЕ} 


создать ' 


Нохете считать, что ЕРОТ берет 
свой первый параметр и ставит его 
в первую позицию второго паранет- 
ра. 


расснотрим, Ух 
РОТ). Он работает совершенно ана- 


логично, но с одним исключением. 
Первый параметр ГРОТ ставится 
последним злементом в списке, 


выраженном вторым входным пара- 
метром. 


ГРОТ [ПОСЛЕДНИЕ СЛОВА] [ЭТО] 


дает: 
[ЭТО [ПОСЛЕДНИЕ СЛОВА] } 


Третий оператор - 141$Т. он 
имеет два или более входных пара- 
метров и выдает их в виде списка, 
независимо от того, являются ли 
сни списками или словани. 


ТТТ "БАНК (ХЛЕБ НОЛОКО МАСЛО 
НАРКИ] 


имеет два входных параметра и вы- 
дает список следующего содержа- 
НИЯ: 

[БАНК (ХЛЕБ МОЛОКО НАСЛО МАРКИ] 


Если Г15Т имеет более двух 
ВЕОДНЫХ Параметров, то они должны 
быть заключены в круглые скобки, 


СЕТЗТ "БАНК (ХЛЕБ НОЛОКО НАСЛО 
НАРКИ] (ДЖЕИН ДЭВИД РОЗНАРИ}›, 


выдает список: 
[БАНК (ХЛЕБ НОЛОКО НАСЛО МАРКИ} 
ГДЖЕИН ДЭВИД РОЗНАРИ] ] 


Можете полагать, что команда 
Т15Т Просто берет все свои пара- 
метры и ставит вокруг них цопол- 
вительную пару квадратных скобок. 

ВНИНАНИЕ! Когда 115Т использу- 
ется более, 


списку 115Т, то в этих случаях 
оператор не всегда работает пра- 
он также может вызвать 

если вкаючен в квадрат- 


или в список ТЕ. Очень слояные 
конструкции, таким образом, сле- 
дует создавать постепенно. 


Сортировка чисел. 


Теперь ны посмотрим, как можно 
использовать списки для создания 
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| ожных СТРУКТУР данных и для не- 
КОТОРЫХ ДРУГИЕ практических це- 
(лей. Сначала мы рассмотрим вопрос 
сортировки последовательности чи- 


‘тировка данных это’очень вахный 
ВОПРОС, в котором проявляется 
мошь конльютеров. Существует нмно- 
го нетодов для выполнения сорти- 
провки, но мы остановимся на одном 


Ны будем хранить числа в 
пструктуре, называемой “деревом”. 
|ИНа рис.1 показан пример такого 


|дерева. 


Рис. 1 


| Если не очевидно, почему эта 
|СТрукТУРа получила такое назва- 
ние, переверните рисунок вверх 
ногами. Кахдое обведенное число 
| называется ”узлом”. В каждом из 
узлов дерево нохет ветвиться 
| (максимум на две ветви). 

| Посмотрите, как это организо- 
Ивано. Возьмем, например, число [2 
и введен его в наше дерево. Нач- 
| нем с вершины и в каждом узле 6у- 
ден сравнивать наше число с ‘тен, 
что содержится в даннон узле, Ес- 
пли наше числс неньше, то из узла 
Ипойден по левой ветви, а если 
больше - то по правой. 


Я Представим, что число 6 поме- 
|шается на вершину дерева. поско- 
Пльку 6<Т, то идем вниз по левой 


ветви к числу 3. здесь у нас 6>3 
Пи продолжаем путь по правой ветви 
к Числу 5. Раз 655, то и здесь 
надо пойти по правой ветви. но на 
|сей раз у нас правой ‘ветви нет и 
ее надо сделать. Просто прирису- 
|ем правую ветвь к узлу 5 и поста- 
1вим в ее конце узел 6. 

| итак, каждый узел может иметь 
две ветви, одну влево для чисел, 
которые меньше, чен значение в 
пузле и одну вправо для чисел, ко- 
| торые. больше, чен значение в уз- 
|ле. Простой вопрос “наше число 
[больше, чен значение в узле или 
неньше?" определяет, по какой 
ветви нан идти. 

| Точно так же номно построить 
дерево и для списков. Каждый узел 
ножет быть представлен списком из 
трех элементов. 

| Средний элемент - это номер 
узла, а два других элемента - 
тоже, списки. Первый элемент опре- 
Гделяет левую ветвь дерева, а пос- 
пледний - правую. Каждая ветвь вы- 
|страивается аналогично. Если из 
[узла ветвь не исходит, то ей со- 
ответствует. пустой список. Таким 


- ЯЗЫКИ `` ПРОГРАННИРОВАНИЯ | 


образом, пустые списки служат как 
бы маркерами, показывающини, что 
мы дошли до конца данной ветви. 

Вы. наверное, не удивитесь, 
когда узнаете, что такие конечные 
узлы называют "листьями", а ис- 
ходДНЫЙй Узел - “корнем”. 

дерево для СТРУКТУРЫ СПИСКОВ 
показано на рис. г. 

О о О 


/ х 
т 
/ х 
И С р, 
и 
И. 
Рис. г 
В тех узлах, где список не 
пустой, стоит "точка" [.] и стре- 


лка, показывающая содерхжиное дан- 
ного списка, поэтому несмотря на 
то, что списки находятся один 
ВНУТРИ ДРУГОГО, Такой "разверну- 
тый" вид действительно демонстри- 
рует похожесть на настоящее дере- 
во. 

Давайте еше раз посмотрим, как 
число 6 вписывается в это дерево. 
рассмотрим корневой узел на вер- 
шине диаграммы. он имеет 3 эле- 
мента. из которых средний - число 
Т. Новое число 6 меньше и потому 
мы идем по левой ветви, расснат- 
ривая левый список. этот список 
имеет средний элемент, равный 3. 
Поскольку 6 больше, то ны иншем 
правое продолхение. Новый список 
инеет средним элементом 5. Раз 6 
больше, чем 5. мы ишем опять пра- 
вое продолжение. На этот раз спи- 
сок пуст, мы дошли до конца ветви 
и теперь нашли место, в которое 
должно быть помешено число 6. По- 
скольку это последняя точка, то 
ны отнечаен ее пустыми списками: 
1136133. 


Итак. существуют только два 


правила для того, чтобы поместить 


новое число в дерево. 

1) Если число помещается в 
узел, в центре которого ухе есть 
число, то эти числа сравниваются 
и, если новое число неньше, то 
оно понешается в начальный спи- 
сок, а если больше, 
НЫЙ. 
2) Если число помещается в 
пустой список, оно становится в 
средний элемент, а справа и слева 
добавляются по пустому списку. 

Если мы начнем с пустого спис- 
ка и будем вводить числа в поряд- 
ке 7, 3,5,8,... то у нас будет со- 
здаваться список так, как показа- 
но в табл.г. На каждом шагу мы 
показываем только новые вошедшие 
в список элементы, дабы сделать 
СТРУКТУРУ проше и нагляднее. 


Таблица г 


Е 332 ] 


ША. 

1 

2 1 ТЕ } 
3 

4 ав? 

5 


Г 287) 


Как видите, числа ложатся в 


то в конеч- 


список в правильном порядке. 


Теперь рассмотрин, как сделать’ 
это на языке ЛОГО. Сначала нам 
нужна. процедура, которая выдаст) 
пользователю необходимые инструк-| 
ции и создаст исходный пустой 
список, затем выполнит ввод чисел| 
и распечатает упорядоченный спи-| 
сок. 


ТО 508Т 
РЕТИТ (Введите числа} 
РЕТИТ (Когда закончите, 
наберите ЕНО) 
НАКЕ “НОМЕТ5Т [}. 
ТНРОТ 
РЕТИТТНОКРЕЕ : НОМЕТ5Т 
ЕНО 


Теперь рассниотрим процедуру 
ТНРОТ, Она должна принять с кла-| 
виатуры первое слово и проверить, | 
не число ли это. Ны используен 
тот Факт, что это не число для! 
того, чтобы сигнализировать ©} 
тон, что ввод закончен. Если зе 
это число, то его надо ввести в 
список и посмотреть, куда оно! 
ложится, после чего сформировать! 
новый список. 


ТО ТНРОТ 
НАКЕ “НОМ РТЕЗТ КЕАПЬТЗТ 
ТЕР ВОТ НОМВЕКР :НОМ (5ТОР) 
НАКЕ “НОНЕТЗТ ВЕНЕМ :НОНЕТ5Т 
ЕО 


Здесь мы впервые использовали 
операцию НОТ. Она берёт то усло-| 
вие, которое стоит в качестве ее 
параметра и изменяет полученный 
результат с ТВОЕ на РАГЗЕ или, | 
соответственно, наоборот. Так что 
она работает достаточно просто и 
выдает результат ТВОЕ (ИСТИНА), 
если :НОМ числом не яваяется. 

Теперь нам нужно записать про-| 
цедуру КЕНЕМ, которая проверит’ 
введенное число по всем имеющимся! 
спискам и вставит его на свое за-| 
конное несто. Эта процедура долх-| 
на создавать списки из трех оэле-| 
обычно по результатам 1#. 


главе, 115Т нельзя использовать с\ 
круглыми скобками внутри. так что 
мы начнен с того, что напишен| 
процедуру, которая примет ТРИ 
параметра н сделает из них спи- 
сок: 

ТО Ы5Т А :В;С 

-ОИТРУТ (1.15Т :А:В :С) 
ЕО 


Теперь, когда мы  проверяен| 
введенное число по  инеющемуся/ 
списку (назовем процедуру АЗТ), 
У нас могут быть три возможности 
искода; р 

- список может быть пустым, в 
этом случае мы заменяем его новым 
списком из трех элементов,  внеш-| 
ние из которых являются пустыми! 
списками, а средний - введенным 
числой; 

115Т 3 ПснОНО ° 

- если вводиное число больше, | 
чем средний элемент списка, то 
новый список занешает тот, кото- 
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рый был. В нен первые два элемен- 
та остаются неизменными, ав ка- 


1.15Т3 ЕТЕЗТ сАБЛЗТ ТТЕН2 |: АЕТЗТ 
РЕНЕМ ГАЗТ : МА5Т 


- есаи вводимое число неньше, 
чем средний элемент, то в новом 
списке меняется первый заенент: 


115Т3 БЕНЕМ ЕТЮЗТ :М.15Т ТТЕНа 
ТАГТЗТ БАЗТ :АБТЗТ 


‘теперь мы пришли к процедуре 
ВЕНЕ: 


ТО КЕКЕМ :А115Т 
ТЕ ЕКРТУР : АШТЗТ (ООТРОТ 1.151731 
Ноно} 
ЧР ОТТЕНЕ МА5Т 
ГООТРОИТ 1.15173 ЕТЕЗТ АТ 
ТТЕН2 А5Т 
ВЕНЕМ 1.АЗТ : АЕТ5Т] 
ГООТРОТ 115Т3 
КЕНЕМ Р1ЕТ :^115Т 
ТТЕМ2 :АБТЗТ 
ТАЗТ :А$Т} 
ЕО 


как мы уже видели, в результа- 
ге наши числа будут упорядочены 
по старшинству.  Пробленой, одна- 
ко, является большое количество 
квадратных скобок. к счастью, 
здесь помогает сила рекурсии. для 
того, чтобы упорядочить список, 
состояший из списка, числа и еже 
го списка, нам надо распеча- 
гать первый список в упорядочен- 
ном виде. чисио и ВТОРОЙ СПИСОК В 
упорЯядОоченнон виде. Есаи список 
то вообше ничего печатать 


ТО РЕТНТТНОРОЕВ :А1.15Т 

ТЕ ЕМРТУР :АГТЗТ {5ТОР} 
РЕТИТТНОРОЕЕ РТЕЗТ : АТ 
РЕТЕТ ТТЕНР :АБТЗТ 
РЕТИТТНОЕОЕЕ ГАЗТ : АБТЗТ 
ЕНО 


Когда Вы закончите ввод проце- 
дур, дайте команду 5ОЕТ. Введите 
несколько чисел, по однону на 
Заканчивайте ввод чисея 


ным словом, но не числон. 

После .того, как числа будут 
распечатаны в отсортированнон по- 
рядке, Вы ножете попробовать: 

РЕТЕТ :НО.15Т 

Теперь Вы увидите, как список 
хранится в структуре "дерева". 
Если же Вы хотите увидеть, как 
создается новый отсортированный 
список, Вы нохете попробовать 
вставить эту команду в процедуру 


Сейчас мы попробуем  использо- 
вать стрУуКТУрУ “дерева” для того, 
чтобы написать игру. СУТЬ ИГРЫ 
состоит в тон. что один играющий 
задунывает некоторое животное, ‘а 
другой должен его угадать. При 
этом он может задавать любые `во- 


пРОСы, но ответ ножет быть только 
*да" иди “нет”. Но саная инте- 
ресная часть игры состоит в том, 
что програима способна санообу- 
чаться. В начале игры она знает 
только двух животных, а по нере 
того, как Вы с ней играете, она 
становится все более и более об- 
разованной. 

Вся информация хранится в виде 
дерева. Каждый узел - это список. 
состоящий из трех элементов. Обы- 
чно средний элемент списка - во- 
пРрос, который надо задать игроку. 
Если ответ "да". то программа 
использует первый элемент списка 
{а’он тоже список) для следующего 
хода. Если же ответ “нет”, то 
програнна использует последний 
элемент слиска. 

Ны неизбежно дойден до послед- 
ней точки. Она выявляется по тону 
факту, что и первый и последний 
элемент являются пустыми списка- 
ни. В данвом случае средний эле- 
мент - это уже не вопрос к играю- 
щему, а название животного. 

Когда имя животного выдается 
игроку, ТО У него есть две воз- 
ножности: 

- если компьютер угадал верно, 
то програмну не надо обучать; 

- но если пользователь задумал 
другое хивотное, то программа за- 
прашивает вопрос, с помошью кото- 
РОГО НОНО различить то животное, 
которое задумал пользователь, и 
то, которое назвала программа. 
Это ВОПРОС теперь становится 
средним элементом в новом узле, а 
названия животных - в узлах спра- 
ва и слева. Опять же к каждону из 
эти названий добавляется справа 
и слева по пустому списку. Вход- 
ная пропедура доляна ввести поль- 
зователя в суть игры и создать 
корневой список перед тем, как 
игра начнет свою работу. 


ТО АНТНА!. 
РЕТНТ 
РЕТНТ (Добро пожаловать на 
ВИКТОРИНУ] 
РЕТУТ (Отвечайте только 
"ДА" или "НЕТ" ] 
НАКЕ "НОРЕ 1[((1 [УТКА) [13 
{ОНО ПЛАВАЕТ? 1 
Г) СВИНЬЯ} (11) 
со 
ЕНО 


Рабочая процедура СО просит 
играющего задумать животное, про- 
веряет элементы своего списка и 
обеспечивает повтор всего процес- 
са для другого ЖИБОТНОГО. 


то во 
РЕТЫТ {ЗАДУНАЙ ЖИВОТНОЕ) 
РЕТЯТ * 
НАКЕ "НОЕ ТЬУ :НООЕ 
РЕТИТ ТЕЖЕ РАЗ?] 
НАКЕ "УН РТЕЗТ ВЕАШ.Т5Т 
ТЕ УН- "УЕЗ 160} 

ЕКО 


Процедура СО проверяет текуший 
узел. Это мохжет привести к изме- 
нению списка, поэтому процедура 
ТКУ выдает новое содержание узла. 


ЯЗЫКИ ПРОГРАННИРОВАНИЯ 
Необходино предусмотреть две воз- 


ножности. Средний эленент в узле 
ножет быть либо вопросом, который 
надо задать игроку. либо готовын 
ответон. 

Програмна различает эти два 
случая. проверив первый элемент. 
Если он пуст, то во второн зле- 
ненте содержится ответ. 


ТО ТЕУ :АНОБЕ 
ТЕ ЕМРТУР ЕТЕЗТ :АБОБЕ 
(ООТРУТ СИЕЗЗАНЗУЕЕ} 
(ОБТРОТ РОТОЦЕЗТТОН} 
ЕО 


Теперь процедура СЧЕЗЗАНМЕЕ 
должна угадать ответ и, если он 
верен, то изменений делать не на- 
до, а если вет, то надо сконстру- 
ировать новый узел? 


ТО СЗЕЗЗАНЗЧЕЕ 
РЫТНТ * 
РЕТУТ ЗЕНТЕНСЕ [ЭТ0) 
ТТЕН2 : АНОРЕ 
НАКЕ “УН ЕТЕЗТ ВЕЛЬ.ТЬТ 
ТР :УН- “УЕ 
ГРЕТНТ {Я ТАК И ДУМАЛ] 
ОУТРОТ : АНОРЕ] 
ГОЧТРОТ НЕМНОРЕ] 

ЕНО 


Процедура НЕМНОВЕ запрашивает’ 
правильный ответ и конструирует 
новый узел для ДВУХ ЖИВОТНЫЕ, 
используя при этон полученный от 
вользователя ВОПРОС. *Новое” 
животное должно быть помешено в 
новый список мехду двумя пустыни 
спискани. *Старое"” животное уже 
организовано таким образом в 
текушен узле. 

Здесь нам вновь будет нужна 
процедура 1,1573, © которой мы 
говорили выше: 


ТО НЕМНОРЕ 
РЕТЯТ ® 
РЕТМТ ГСдаюсь! Что это за 
) животное?} 
НАКЕ "АВТНА!.1 КЕАП.ТЗТ 
НАКЕ “НЕЧРАРТ (1.Т5ТТ] 
: АНТНАТ.1 [1 ) 
НАКЕ "АНТНАГ.? ТТЕН2 ; АНОБЕ 
РЕТИТ (5ЕКТЕНСЕ[Дайте нне 
ВОПРОС, ЧТОбы отаичить) 
: АНТНАТ.1 “и :АНТНАГ2) 
НАКЕ “ОЧЕЗТТОМ ВЕАП.ТСТ 
РЕТЫТ (ЗЕНТЕНСЕГИ для 1 
: АНТНАГ1 
тответ будет да?1 
НАКЕ “УН ЕТЕЗТ ВЕАОЕТЬТ 
ТЕ :УН-"ДАГООТРОТ 1.15173 
НМЕМРАЕЮТ :СОЕЗТТОМ :АКОБЕ] 
[ООТРИТ 115Т3 :АНОРЕ 
ООЕЗТТОЯ :НЕМРАЕТ) 
ЕНО В 


Это самая сложная процедура в 
програнне, но ключ к ее пониманию 
длехит в двух операциях ООТРОТ, 
записанных в ее конце. 


ТО РУТОЧЕЗТТОН 
РВТИТ " 
РЕТЫТ ТТЕН2 :АНОБЕ 
НАКЕ "УН ЕТЕСТ ВЕАГЕ. ТТ 
ТЕР :УН="ДАСОЧТРИТ 11573 
ТВУ ЕТЕЗТ : АНОРЕ 
ТТЕН2 :АНООЕ 
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Е 


ТАЗТ : АНОБЕ? 

(ОПТРУТ 11573 РТЕЗТ :АНООЕ 
ТТЕНа : АЯОБЕ 

ТЕУ БАЗТ :АКОБЕ] 

ЕНЮ 


И здесь тоже основная сиысло- 
вая часть процедуры заключена в 
двух последних операциях ООТРУТ. 

Теперь, если все сделано пра- 
вильно, Вы можете дать команду 
АНТНАГ и, работая с програнной, 
как происходит ее сано- 


8. Некоторые математические 
операции. 


ЛОГО различает два различных 


вида чисел целые (например 1, 
723, 245 и ТА’ и десятичные 
(0.67, 28.91 ит п.). обычно Ван 
не надо думать о том, что мезду 
ними есть разнипа. Вероятно, 


елинственный случай, когда разаи- 
чие между ними сушественно, это 
тогда, когда Вы пытаетесь ввести 
десятичное число в процедуру, ко- 
торая ожидает в качестве своего 
параметра целое число. И даже в 


этон случае. как правило, лого 
предупредит Вас. 
Операция ТНТ (ТНТЕСЕЕ)  прИиНИи- 


маег в качестве входного любое 

число. а свой результат выдает в 

виде целого. Она, такин образом, 

отрезает десятичную часть числа. 
РАТИТ ТТ 3.14 


3 
РЕТЕТ НТ 5. 999 
5 
РЕЗЕТ 1 -&.1 
м 


Обратите внимание на то, что 
хотя 6. 999 очень близко к числу 
1, результатом все-таки будет 
число 6. Этот процесс всегда ве- 
дет к округаению вниз. 

В некоторых случаях такая осо- 
бенность может быть полезной. На- 
пример, иногда бывает важным наий- 
ти результат деления одного числа 
на другое и образующийся при этом 
остаток. 

Нохет это быть полезным, когда 
Вы проверяете, является ли данное 
исло целын или нет. Если оно це- 
лое, то применение к нему Функции 
Тит уже не изменит его. 


ТРАТИТ *УЕЗ] (РТТ но} 
ЕНО 


Таким же способом можно опре- 
делить и делится ли одяо число на 
другое нацело. 


"ГО ТЕЗТОТУ КОМ! Ома 

ТЕ НОНт/НОМа } - ТНТ {: ВОНИ: НОМ2) 
ГРЕТЕТ ”УЕЗ] (РЬТНТ "НО 

ЕК 

Если хе Вам на самом деле нуж- 
зо ближайшее целое число, то Вы 
можете воспользоваться операцией 
`ПЕО0бНО. Она тоже ножет принимать 
июбог число в качестве входного и 
выдает ближайжее целое число. 


РЕТНТ РООНО 3. 13 


ЯЗЫКИ — ПРОГРАММИРОВАНИЯ |— 


РЕТЫТ ВООНО 5. 99 
т ; 
РЕТНТ ВООНО -2. 9 
-3 


Эта операция берет свое назва- 
ние из термина гоца911я (”“окру- 
гление”). Она может бить исполь- 
зована для того, чтобы выдавать 
ответ с заданной степенью точнос- 
ти. С небольшими усилиями ее ном- 
но использовать и для получения 
результата с заданным количеством 
десятичных знаков. 

Так, например, если Вам надо 
ОКРУГЛИТЬ 3, 14159 до двух неся- 
тичных знаков, то Вы можете унно- 
жить это число на 100 (314. 159), 
округлить его (314) и снова рРаз- 
делить на 100 (3.14). Эту опера- 
цию нохно конвертировать в рекур- 
рентную процедуру. на каждом шагу 
унножая искодное число на 10, 
Если количество десятичных чисел 
равно нулю, то число Просто окру- 
гаяется. 


ТО СОВБЕСТ ВУ : РЕСРЕ5 
ТЕ РЕСРЬ$-0 ГОУТРОТ КОЦНр : БОН} 
ОУТРИТ (СОЕБЕСТ :НОМи10 : БЕСРЕ$ 
1/10 

ЕВРО 


ЕСТЬ Се одна операция, кото- 
рая всегда выдает в результате 
своей работы целое число. Это 
сперация ВЕМАТНОЕЮ, Она требует 
два входных параметра и выдает 
остаток от деления нацело первого 
чисаа на второе. 


РЬТИТ КЕМАТНОЕЮ 12 5 
2 


Эта операция обеспечивает еше 
один путь для проверки делится ли 
одно чисио на другое нацело. Если 
это так, то результат опЬрации 
равен нулю. ‚ 


ИСТЕНА и ЛОЖЬ (ТВОЕ и РАГ5Е, 

Иы ножен писать процедуры, ко- 
торые проверяют условия и выдают 
в качестве результата ТВОЕ или 
РАЬЗЕ. Это можно сиелать одним из 
двух возможных способов. Бы може- 
те выдавать ‘результат в виде сло- 
ва ТВОЕ, БРАГЕ и т.п., например: 


ТО РТУТЗТВЬЕ :А :В 

ТЕ О-ВЕЛАТАОЕЕ А :В 

ГООТРОТ “ТВОЕ} (ООТРОТ "РАГЗЕ] 
ЕО 


Второй способ - получение от- 
вета сразу в результате проверки 
и неведленной выдачи результата: 


ТО ОТУТ5ТВЬЕ :А :В 
ООТРИУТ О-КЕНАТМЕЕ :А :В 


Здесь, если действительно 0с- 
таток от деления ‘А на :В- равен 


НУЛЮ, результат равен ТКОЕ, а ес- 
ли нет - то результат равен 
РА’ЗЕ. 


‚ Такой результат ножно напрямую 
использовать для оператора ТЕ. 


ТЕР ОГУТЗЛВЬЕ 20 5 ГРЕТЕТ "УЕБ? 
ГРЕТЕТ "НО 


Фактически Вы только что опре- 


делили предикативную процедуру и|. 


чтобы это подчеркнуть, 
назвать ОТУТЗТВЬЕР. 
Иногда мы сталкиваемся с тем, 
что будет ли результат операции 
иметь значение ТВОЕ или РАТЗЕ, 


зависит от одного или большегой. 


количества условий. ЛОГО обесце- 
чивает три операции, 
предикатани {условияни). 
рассмотрели НОТ, изменяющую ре- 
зультат условия на противоволох- 
ный. Есть еше операция АМ, кото- 
рая дает в результате значение 
ТРОЕ, 
имеют значение ТРОЕ. Обычно опе- 


рация АМО обрабатывает два усло-й. 


вия, но их мохет быть и больше, 
если применить круглые скобки. 
РЕ1ЫТ АНО #<2 3<Т- 
ТкОЕ 


Другая операция - О (ИЛИ). 
она дает в результате ТВОЕ, еспи 
хотя вы ощно из входящих вырахе- 
ний имеют значение ТВОЕ. Так же. 
как и АНО, операция ОВ может 
иметь более двух входных выраже- 
ний. у 

При аккуратной работе можно 
объединять АКр и ОВ в одном выра- 
жевии. Например, Вы можете прийти 
ко мне на день рождения, если Вас 
зовут Фред ИЛИ вы зеншина ик 
тому хе красивая. 


Возведение в степень и 


из 
Узнать квадрат числа можно! | 
унножив его само на себя.  другией \ 


степени числа легко находятся с]. 


помошью рекурсии. 


ТО РОМЕВ СА :В 
ТР :В<е ГОУТРОТ :А] 
ОЮТРОТ (РОМЕЕ СА ;В -\А 
ЕН 


для вычисления корней квадрат- 
ных из числа, ЛОГО о инеет специ- 
альвую Функлию 50КТ. 

РЕТИТ 508Т 25 

я 

Ны нолем воспользоваться тео- 
реной Пифагора для вычисления 
расстояния нежду двумя точками с 
известными координатами (коорди- 
ната Хх и координата У}, В учебни- 
ках по натематике Вы найдете, что 
расстояние между двумя точками с 
координатани {%1, У1] и (ха, уе] 
можно найти, как 


2 г 
9-х) 


Рис. 3 


ТО ОТ5ТАНСЕ :Р051 :РО52ё 
НАКЕ "ХОТЕ ЕТВ5Т :2051- 
: ЕЛЕБТ :РОЗа 
НАЕЕ "УОТЕ ТА5Т :РО51- 
БАТ ;РОБа 
ООТРОТ 5ОКТ(ХОТЕ*ХЬТЕ+ 
УБТЕЖУТЕ) 
ЕМО 
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если все взодяшие выражения! | 


С Г: 


Ноиск простых чисел, 


Простое число - это число, ко- 
торое нацело делится только на 
единицу или само на себя. Пробле- 
ма поиска простых чисел волнует 
матенатиков уже несколько тысяч 
лет. Пока не найдена Формула, по 
КОТОРОЙ МОЖНО было бы найти все 
простые числа, а те Формулы, 
известны. — выдают 
последовательноеть 
из ПРОСТЫХ чисел, но начиная © 
какого-то числа выдают и непро- 
стые числа (См, 7Хх-РЕБЮ-91, МТ, 8, 
Е. 133, 

хоть и не существует впоане 
надежной Формулы для простых 
Чисел, зато существует метод, Мы 
можен просто брать числа по оче- 
реди и проверять, делятся ли они 
нацело на другие числа, которые 
меньше, чем оно само.  Запача 
упромается тем, что нужно прове- 
рять яе всё числа, а только до 
корня квадратного из исходного 
числа. Ведь если оно делится на 
что-то, что больше, чен квадрат- 
ный корень, то в результате полу- 
чим частное, которое меньше, чем 
квадртный корень, а эти числа ны 
уже проверили. 


ГО ТЕЗТРЬТМЕ НОМ :Н 
ТЕ ‹Н>ЗОВТ :НУНГООТРОТ "ТЕОЕ] 
ТЕ БЛУТЗТВЕЕ нон 

:НТОИТРОТ "РАГ5Е] 
ООТРОТ ТЕЗТРЕТНЕ НОМ {+1 
ЕН . 


Проверку надо начинать © числа 
г - это наиненьшее простое число, 


ГО РЕТНЕЗЕОКН : НОН 

ТК ТЕСТРЕТНЕ : НОМе[РВЕТНТ : НОН] 
РЕТМЕЗРОЕМ :НУН+1 

ЕНР 


будет распечатывать простые чис- 
ма, начиная с числа ё и выше, 


Тригононетрические операции. 
Если Вы уже знакомы с тригоно- 
метрическини функциями. то можете 
пропустить один абзац. Если хе 
нет, то читайте дальше. 

Если ната “черепашка” имеет 
значение НЕАР1НС, равное УГЛУ 
АНСГЕ, то на’ каждом шаге .она 
проходит разные расстояния вдоль 
Экрана и поперек. Если "черепам- 
ка” пройдет в направяении своего 
движения единицу пути, то ее пе- 
ремешение по горизонтали равио 
синусу угла ‘:АНСЬЕ, а перенеше- 
ние по вертикали - равно косинусу 
угла ‘АНСГЕ. Если путь,  пройден- 
ный “черепашкой” равен единице, 
то очевидно, что путь, пройденный 
ею по горизонтали, меньше едини- 
цы, то же и путь, пройденный по 
вертикали. 

Может быть, Вас интересует не 
пройденный “черепам- 
а сразу 10. В этон случае 


Теперь команда РЕТМЕЗЕОЕМ а 


Рис. 4 Синус и косинус угла. 
1О%*5ТНЕ ЗАНСГЕ 
а путь по вертикали; 
1О*СОЗТНЕ : АНСЬЕ 


Натематики пользуются еше дву- 
мя функциями: тангенс (это част- 
ное от деления синуса угла на его 
косинус) и котангенс (частное от 
деления косинуса на синус). 

ЛОГО предоставляет возножность 
использования четырех операций: 
ЗТНЕ, СОЗТНЕ, ТАНСЕНТ, СОТАНСЕНТ, 
В сокрашенной Форме 51Н, С05, 
ТАН, СОТ. У ЛОГО есть большое 
преинушество перед другими языка- 
ни програнмирования в том смысле, 
что ЛОГО принимает углы для Этих 
операций в градусной нере, в то 
время как другие языки программи- 
рования предпочитают иметь дело с 
рацианани. Поэтому, если Вы пРИи- 
выкли к другим языкам и к рРади- 
анной мере, то теперь вздожнете 
с облегчением. Если зе Вы к ней 
не привыкли и никогда о ней не 
слышали, то ‘тем более вздохнете 
с сблепчением, поскольку ножно о 
ней и не думать. 

Кроме 4-х описанных выше опе- 
раций, есть еще четыре:  АЮСТН, 
АБССО5,  АЮСТАН, АКССОТ, которые 
имеют пряно противоположное дей- 
ствие. 

В качестве входного параметра 
они принимают число. а на выходе 
выдают угол в градусах, который 
имеет соответствующий синус (ко- 
синус, тангенс, котангенс), 

Так. РЕТНТ АВСС05 0,5 
даст Ван угол, косинус которого 
ранен 0.5, т.е. 60 градусов, 


Эти операции имеют огромное 
значение в изучении электроники, 
волновых явлений и вибраций. С 
помошью этих функций молно также 
исполнять очень красивые и инте- 
ресные кривые. расснотрим, напри- 
нер, пару следующих процедур, ко- 
торые изображают график Функции 
косинус для угаов от 0 до 360 
градусов. Координаты Хи У здесь 
Распечатываются через угол и его 
косинус, соответственно. Насштаб 
избран ‘таким, чтобы изображение 
ХОРОШО влисывалось в экран. Когда 
"черепашка" дойдет до границы эк- 
рана, Вы получите сообщение 
"тоге1е ош оЕ Боила$”. 
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РЕНОР. 
ЗЕТРО$ 1120 0} 
РЕНООУНЫ 
ЗЕТРО$ {-120 0} 
О С05 0 

ЕНО 


ТО 00С0$ :АНСЬЕ 
НАКЕ "Х 2к : АНСЬЕ/З-120 
МАКЕ "У 80%С05 :АНСЬЕ 
БЕТРО$ 5Е :Х :У 
20С05 :АНСЬЕ+15 

Ем 


Вы увидите колебания в верти- 
кальной плоскости. Что произой- 
дет, если‘ны добавин сюда еше и 
колебания по горизонтали? вы 
получите Фигуры, названные именем 
их первооткрывателя - Фигуры Лис- 
сажу. 


ТО 115$АЮУ А :В;С 0:1 
БНОМТОЕТЬЕ 


1155 0 
ЕКО 


ТО 1155 АНСЬЕ 
НАКЕ "Х 120*С05 (: А; АНСЬЕ+: В) 
НАКЕ “У 80*С05 (: С* : АНСЬЕ+: 2) 
5ЕТРО$ 5Е :Х :У 


РЕНООМЧ 

115$ :АНСЬЕ+: 1НС 
ЕН : 

Перо опустится посне первой 
конанлы ЗЕТРО$ (и после этого 
останется  опушенным), — поэтому 
“черепашка”. пойдет в стартовую 
позицию без изображения линии. 
Чем выше значение Т1№С, тем более 
угловатой будет полученная 
графика. 

Попробуйте: 


ЬУ$5АЗОИ 11 20. 21 40 1 
введение в графику цвета поз- 
воляет получать очень интересные 
эффекты. Вот еше несколько  при- 
неров "черепашьей" графики; 


ТО СУСЬО :К :АНСЬЕ `: ЗТОЕ 
ЕОКМАЕО : 512Е*$ЗТН (: К*НЕАПТНС) 
ЕТСНТ : АНСЬЕ 
СУСЬО Е САНСЬЕ {5126 

ЕН 


Попробуйте Сус 1 10 10 
СУС10 4 5 20 


И еше одна процедура: 


ТО ТОВЕ :А :В :19С :АНСЬЕ 
РОВЧАВО 1 
ВТСНТ :А :В :14С АНСЬЕ+:14С 
ЕН 


Попробуйте: 

ЧОВЕ 231910 
БОВЕ 10 в 6 О 
тОВЕ 2 в 6 0 
1ОВЕ ?ё 9 ЗО 


«Окончание в следующем номере}: 


‚ ПРИМЕНЕНИЕ  АССЕМБЛЕРА 
ДЛЯ СОЗДАНИЯ БЫСТРОРАБОТАЮЩИХ 
ПРОГРАММ 


Перевод с английского 
Павюрива В. В. 


Продолжение, 
Начало см. с. 9-12, 48-61, 
91-103, 183-188 


8. КОНАНЛЫ  АТТЕТВОТЕ, 
ЗСВЕЕЯЗ и РОТ 


Если ВЫ программировали игры 
то вероятно сталкива- 
тем, что вам необходино 
знать в определенной игровой си- 
туацин текушее расположение за- 
данного символа на экране. Это, 
напринер, нужно при проверке ус- 
- достигла ди ракета цели, 
либо при выполнении посалки на 
Луну. В БЕВСИКе дая этого стшес- 
твУют три способа: 

- использовать оператор АТ- 
ТЕТВОТЕ, который проверяет значе- 
ние ТЕ, РАРЕЮ, РЪАЗН и ВЕТСНТ 
в заданном знакоместе экрана и 


выдает число, соответствующее 
этим параметрам; 
фе использовать оператор 


ЗСВЕЕНЗ. который определяет код 


выдает код этого синвола, если 
он входит в диапазон 32. дет тв 
противном случае считается, что 


ячейка пуста; 
Якнининкииииии ини киииникныиичик 


Примечание: процедуру в машинных 


но и симво- 
\ЛЖ-графики и символы блочной 
графики, т.е. из пиапазона 
за...164 мы привели в первом то- 
посвяшенном графике для "Спе- 
ктрума” - “Эдементарная графика” 
на с. 99 под названием 5САНЕЮ. 
-_ ИНФОРКОМ. 
пиниикииихинининииниихиниииккихки 
- использование оператора 
который проверяет состоя- 
экрана и выда- 
включен и 0, 


Все эти Три способа могут 
быть реализованы и в програмнах в 
машинных кодах с использованием 
специальных процедур ПЗУ. 


8.1. АТТЬТВОТЕ (строка, столбец}. 

Пропедура АТТЕ, аналогичная 
по действию оператору АТТЕТВОТЕ, 
находится в ПЗУ по адресу 9603. 


исследуемого 
знакоместа в регистровой паре ВС 
(номер строки - в регистре в, а 
номер стоабца - в регистре С). 
Результат проверки в виде числа 
6...255 зависывается на вершину 
стека калькулятора. 


АДРЕС МЕТКА НАШ. КОД АССЕНБЛЕР. 
оке 23760 
ЕР 5В ТВ 5С 10 БЕ, (23675) 
21 42 50 ГО НЕ. АТА 
01 08 00 10 ВС, 8 } 
ЕР ВО БОТ 
ЗЕ 02 10 А.а 
Ср 01 16 САЫ, 5633 
ср 6в 0 СА, 3435 
ЗЕ 02 А, 2 
со 01 16 САЫ, 5633 
11 а 50 Ър’ РЕ. БАТА1 
01 10 00 12 вс, 16 
со зс го САМ, 8252 
ЕО 36 57 03 10 (+87), 3 
АЕ ХОВ А 
32 40 5В ‘№ (60, А 
1 41 ЗЕ 50 Ър ОЕ. РАТАЗ 
01 04 00 10 вс.4 
со 3С го сам, ве5г 
РЕБАУ 21 РЕ РР, 1 Н.,. 65535 
г2 2: РЕС Н 
1с 10 А.Н 
В5 ог 
20 РВ ЗЕ На; Еа 
11 ЗЕ 52 12 ОЕ, БАТА2 
01 04 00 0 вС,4 
ср 3С го СА. 8252 
ЗА 40 50 12 А, (СОТ) 
зс СА 
32 30 50 ЕР (СО). А 
ЕО 4В ЗР 50 № ВС. (НЕ) 
С 83 25 САБ, 9603 
со 05 г0 САШ. 11733 
ЕЕ 8Е СР 143 
20 11 538 НД, 
ЕО 36 571 001 (1У+87),0 
с9 БЕТ 
РАТА1 РЕРВ г2 020 11 
У АКТ 
1 149 18 0 
ат и" 
238710 БАТАг БЕЕВ гг 
23871 ТЛНЕ РЕРВ О 
23872 СО, БЕРВ О 
23873 РЕЕВ 62 
23814 ПАТАЗ БЕРВ 24 153 126 155 
24 36 36 102 


КОНМЕНТАРИИ 


Адрес первого символа 
‚графики пользователя. 

} Конструкция символа УПС. 
;8 байтов в символе. 
‚Установка символа у06-"А* 
;Канал экрана - 2. | 

‚ открываем канал печати на 
; экран. 

‚Очистка экрана. 

;См. выше. 


‚данные для печати - РАТА\. 

; Символов - 16. 

Вызов подпрограниы ПЗУ для 

‚ печати символьной строки. 

; (ТУ + ВТ) указывает на’ сис- 

; темную переменную РЕГАС 

; (23591), Установка в ней 

;числа 3 означает включение 

:режина ТНУЕКЮЗЕ, 

‹ Обнуление аккунулятора. 

{ Обнуление столбца сог.. 

‚данные для печати - РАТАг. 

; символов - 4. 

‚Печать строки БАТАа. 
Организация цикла 
задержки для того, чтобы 
изменения на экране не 
происходили слишком 
быстро. 

‚Данные для печати - ПАТАз, 

; символов - 4. 

; Печать строки РАТАР. 

;Номер стоябца позиции печати. 

Переход к соселней позиции, 

;Запомнили новую нозицию. 

Координаты позиции нечати. 

;Вызов процедуры ПЗУ для опре- 

; деления атрибутов в текущей 

; координате. . 

:Перенос результата ‘со стека 

‚ калькулятора в регистр А. 


; Проверка на РАРЕК 1: ТНК Т: 
РЪАЗН 1. 
‚Возврат, если нужное знако- 


‚место еще не найдено. 
‚выключение режима ТНУЕК5Е. 

; Возврат в БЕЙСИК. 

;Эти данные эквивалентны: 
;...АТ 0,20; РАРЕБ 1; ТЫК Т; 
:РЪАБН 1; ”; РАРЕВ 0; ТИК Т; 
;РЫАЗН 0. Здесь "А" - это сим- 
‚вол 00б; размещенный на кла- 
: више А, т.е, СНЕ$(144). 
; 
: 


Эти данные эквивалентны: 
..: АТ 0,С01; СНЕ (62). 
Символ 62 - это ">", они 
; изображает "ракету": 

}Это данные для синвола ТЖ, 
‚ изобрахающего человечка. 


Определить атрибуты знако- БР.ТО_ЛА, находящуюся по адресу 
места, используя это число, можно 11733, а затем сравнить его с за- 
по Форнуле: данным числон Н с помошью конанды 


число-128*РТАЗН + б4=ВЕТСИТ + 


8"РАРЕК + ТНК значение 


Это число можно переписать 
со стека калькулятора, в регистр 
ИСПОЛЬЗУЯ процедуру 


А, 


ПЗУ 


СР. 


Пример реализации этого спо- 


соба показан’ в программе 8, 1. 
Програнма проверяет каждое знако- 
место экрава до тех пор, пока не 
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найдет ячейку, атрибуты которой 
соответствуют РАРЕЕ 1, 1 1. 
ЕТАЗН 1, , Т.е. числу 143. После 
запуска этой програмиы на экране 
Появляется ракета, медденно ‚пере- 
аюшаяся по направлению к чело- 
ечку. При совмешении ракеты с 
этин  челонечкон ПРОИСкОДИТ ВОЗ- 
врат в БЕЙСИК. Вы можете вместо 
команды возврата РЕТ подключить 
процедуру, создающую звуковой э$- 
фект. сопровождающий > попадание 
ракеты в человечка. : 

Такой способ проверки атри- 
р синвольных ячеек безусловно 
но требует, чтобы,  напри- 
все порамаеные объекты имели 


8.2. ЗСКЕЕН® 


вон этой процедуры необходимо в 
р ТроВУЮ' Пару ВС записать“ ко- 
Н Про- 


вызове этой процедуры будут за- 
писываться на калькуляторный стек 
Использова- 
калькуляторного . стека для 
хранения паранетров символа для 
Вас, наверное, открытие. посколь- 
до сих пор речь шла о кранении 
на стекле только чисел в пяти- 
байтной форме. 

Колы калькулятора при этом 
юперируют не с самими симвошани, 
|а с их параметрами, записанными в 
вятибайтной Форме. Дия того, что- 
бы передать паранетры символа на 
Стек. необходимо записать в ре- 
ГиСТровую пару ВС размер символа’ 
в байтах, а В регистровую пару БЕ 
- начальный адрес участка памяти, 


Для передачи этих паранетров 
на стек используется процедура, 
ПЗУ по адресу 
Процедура же по адресу 
11249 выполняет обратную ‘функцию 
= Передает паранетры символа со 


В С В Е При этон размер 
символа будет записан в регист- 
РОоВУЮ Пару ВС. а начальный адрес 
участка паняти с инфорнацией о 
синволе - В регистровую пару БЕ. 

| Программа 8.2 показывает, 
как можно использовать эти проце- 
дуры. После. выполнения программы, 
ва экране появятся два символа ®, 
соответственио в позиниях 0,20 и 
0, 21... Бнесто вызова процедуры 
РЕТНТ ЗТЕЕНС (адрес 6252), можно 
использовать команду 11 А, (ТЕ) 
для проверки значения символа в 
позиции 0,20, а затем выполнить 
ходимые действия. 

При использовании  БЕЙСИК- 
оператора ЗСКЕЕН$® имеет место од- 
но ограничение. Код распознавае- 
мого символа на экране додлен 
быть в диапазоне от 32 по 127. В 


| гозотл_ в нллиных |--— 


Листинг 8.2. 
АДРЕС. МЕТКА НАЯ. КОД. АССЕНБЛЕР ЕОНМЕНТАРИИ 
ОЮ6 23750 
25760 ЗЕ 02 ЕР А, а 
23162 ср 01 16 СА, 5633 ‚Открываен канал печати на 
; экран. 
237165 со 6в ор САМ, 3435 ‚очистка экрана. 
23768 ЗЕ 02 12 А.2 Канал экрана - а. 
2377то ср 01 15 СА. 5633 Открываен канал печати на 
; экран. 
23773 ЗЕ 16 тр А, 22 
23775 р Е5Т 16 
23776 ЗЕ о О А, Об Аналог... АТ 0, 20; "®” 
23778 Вт ВТ 16 
23119 ЗЕ 14 10 А, 20 
23781 от В5Т 16 
23782 ЗЕ 40 Ь А, ба 
23184 рт \ У5Т 16 
23185 06 14 1 В, 20 ‚Номер экранного столбца. 
2зтат ОЕ 00 р с, 0 Номер строки экрана. 
23189 ср 38 25 СА, 9528 {Вызов процедуры ПЗУ для 
;определения того, что нахо- 
длится в данном знакоместе. 
езт9г со р! гв САМ, 11249 ередача параметров символа 
© стека калькулятора в ре-‘ 
Гистры процессора. ° 
23795 ср зс:го СА, в258 Печать той символьной стро- 
ки, на нестоповомение которой 
указывает пара’РЕ, а длина 
‚котороя находится в ВС. в`на- 
;шем случае - это символ *@". 
23198 с9 ВЕТ 
противно случае считается, что любой символ, если он входит в 


это пустой символ. Тэкое ограни- 
чение существенно ддя ИГРОВЫХ 
Программ, гие. используются Л, 
распознать которые в данном слу- 
чае не удается. для программ в 
нашиных кодах такой пробяены не 
существует, поскольку Ц можно 
включить в стандартный сиивольный 
набор. Постоянно этот набор хра- 
нится в зу, начиная с адреса 
15360. Однако начальный — адрес 
зтогоо набора можно менять, меняя 
звачение системной переменной 
СНАЕ5 (2360671). Она указывает на 
256 байтов ниже, чем начало син- 
вольного набора. Если переписать 
символьный набор из ПЗУ в ОЗУ та- 
ким образом, чтобы в этот набор 
вышел участок с информацией об 
ле н \Чтобы 006 "А" соответст- 
вовад код 32, ЧС "В" - код 33 и 
т.д. то ножно вызывать процедуру 
ЗСРЕЕН® для идентификации ЛХ на 
экране. 

Програнма 8. 3 работает точно 
так же, каки програнна 8.1, но 
эта програмна способна распозва- 
вать ва экране символ. ‘код  кото- 
рого равен 144. Выполнив копиро- 
вание . стандартного  синвольного 
набора в ОЗУ и переписав значение 
синрольной. переменной СНАЕК5. можно 
совсем отказаться от Ш. Теперь 
ножно часть станщартных синволов 
(например, строчные буквы и неко- 
торые знаки пунктуации) заменить 
на символы, Форму которых ножен 
задать сами «(это будет около 50 
символов). Процедура 5СВЕЕК® бу- 
дет легко распознавать на экране 


символьный набор. И еше одно вах- 
ное замечание. Необходино всегда 
инеть свободный участок памяти, 
используеный как рабочий для сте- 
ка. Есаи такого участка нет или 
он есть, но периодически не очи- 
щается, то при выполнении про- 
гранмы может появиться сообщение 
© переполнении паняти. Поэтому 
перед кахдым вызовом процедуры 
ЗСВЕЕН® необходимо очищать спе- 
днально зарезервированный рабочий 
участок. 

Процедура очистки рабочего 
участка имеется в ВЗУ по адресу 
5823. Вызов этой процедуры в про- 
граные 8.3 ножно производить пос- 
ле команды 10 А, (0Е), однако 
предварительно необходимо сохра- 
нить в памяти последнее значение 
регистра А. 


8.3 РОТ 

Оператор РОТНТ к, у в БЕИСИК- 
прогРамнах выдает 1, если пиксел 
экрана с координатами х.у вкаючен 
и выдает 0, если он выключен. 
Процедура ПЗУ, соответствующая 
этому оператору (адрес 8910), 
ножет быть вызвана, если предва- 
рительно. записать в регистр В 
у-координату. а в регистр С, со- 
ответствевно к-координату виксе- 
ла. При этом результат  запижется 
на стек, а т.к. он равен 0 или 1, 
то мы молем переписать его в ре- 
ГистрР А и сравнить с заданным 
значениен. В програние 8.4 пока- 
зан способ проверки пиксела верх- 
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«координаты 


Если в начале в символьную 
ячейку с координатани 0.0 занести 
черный квадрат, то результат ра- 
боты процедуры будет равен 1. 
т.к пиксел с координатани 0,175 
ззодит в этот квадрат. 


9. ПРИНТЕР 


Не так ух иного существует 
программ, для работы которых не- 
юбходим принтер. Всегда ножно 
ограничиться для вывода  инфорна- 
ции только экраном дисплея. Но 
иногда, например, необходимо по- 
казать свой уровень. достигнутый 
в какой-нибудь игре друзьям или 
знакснын. В этон случае нужво 
сделать копию изображения экрана 
на принтере. Позтому в этой главе 
ин расснотрим три ВАЗГС-команцы: 
СОРУ, РРЕТИТ, ПАЛЗТ и их аналоги 
в машинных кодах, обеспечивающих 
работу с принтером. 


9. 1. 605% 

При вызове этой процедуры 

только двадцать две строки экрана 
передаются на принтер. Програнма 
в машиных кодах поэволнт Вак уду- 
чиить эту процедуру так, чтобы 
можно было передавать на иринтер 
Произвольное число строк. причен, 
начиная с любой строки на экране, 
вапример, передать ва принтер ТРИ 
строки, начиная с седьмой. 
В программе 9.1 показан спо- 
соб передачи на принтер всех 24 
строк экрана. поскольку для неко- 
ТОРЫХ ИГР ДОСТИГНУТЫЙ УРОВень ПО- 
казан в нижних строках экрана и 
ири обычном вызове процедуры СОРУ 
получить необходиную информацию с 
двух последних строк не удается. 


Листинг 9.1 
Ов6 23760 
25160 21 00 40, ТОН. 16384 
23163 05 СО ьБ в, 19а 
23165 ЕЗ рт 
23156 Ср ве 0Е  Ссмл. 5752 
23169 ХЕТ 


Как вы заметили, в этой про- 
грамме перед вызовом процедуры. 
ваходяшейся в ПЗУ по адресу 3762, 
необходимо в регистровую пару #. 
записать начальный адрес экравной 
области ОЗУ (т.к. нан необходима 
копия, начиная с первой строки. 
то этот адрес 15384), а в регистр 
В - Число копируемых строк, умно- 


Эта команда имеет сходство с 
командой РЕТИТ. Различие состоит 
в том, что не работают по этой 
конанде управляющие коды и, коне- 
чно, используется другой канал 
для вывода информации на принтер, 


АДРЕС МЕТКА НАШ. КОД АССЕНБЛЕР КОММЕНТАРИИ 
об 23760 
23160 
ме сн. листинг 8.1 
23835 й 
23836 2А ТВ 5С 12 НЕ, (23675) ; Адрес первого символа 106. 
23839 25 ОЕС Н ;Отстунили на 256 байтов. 
;вы помним, что СНАЕ5 указы- 
‚вает на 256 байтов ние, чем 
:вачало врифта. : 
23840 гг 36 5С 1.0 (23606), НН. ; Церсустановили СНАР$ так, 
;она теперь указывает на 
; область 906: 
23843 Ср 58 25 САМ, 9528 Вызов процедуры 5СРЕЕМ. 
23846 ср р: гв СА, 11249 ; Передача параметров синво- 
гла со стека в регистры. 
23849 ТА Л А, (РЕ) :Проверка номера символа 
:в текушен энаконесте. 
23850 РЕ 20 СР за ; Проверка "не пробел ли это?” 
23852 г1\ 00 3С 0 1. 15360 ‚Расположение стандазтного 
‚шрифта минус 256 56. 
23855 гг 36 5С ЬР {23506}, НЬ ; Восстановиаи стандартное 
: значение СНАК5. 
23858 


в: + Дадее, как в программе 


8.1 


листинг 8. 4. 


МАЖ. КОД АССЕНБЛЕР КОММЕНТАРИИ 
овС 23760 

ЗЕ .02 0 А, 2 :;Каная экрана - г. 

Ср 01 16 Сми. 5633 ;Открываен канал печати на 
; экран. 

ср 6в 05 САМ. 3435 Очистка экрана. 

ЗЕ 092 О А, 2 ;канаа экрана - г. 

Ср 01 16 САМ. 5633 ‚Открываем канал печати на 
; ЭКРан. 

ЗЕ 8Е ГО А, 193 ; "Черный квадрат”. 

от ©5Т 16 ‚Нечать квадрата. 

ОЕ 00 р с,0 ;Координата х. 

06 АР О В, 115 ;Координата у, 

ср СЕ аг см. 8910 Вызов процедуры РОТИГ 
; из ИЗУ. 

со 05 гр САМ, 11733 ‚Перенос результата со стек 
‚калькулятора в регистры. 

РЕ 01 С! ;Проверка включен ивксел 
;или нет. 

с8 ВЕТ 2 ‚Выход, если да. 

который необходимо открыть в про- 23111 ср 3С го сма. з25е 


грамме в машинных кодах,  прехде 
чем использовать конанду Е5Т 16. 
например, чтобы вывести на. прин- 
тер литеру “А”, т.е. реализовать 
в машинных кодах РГРАТ “А”, 
необходино первоначально ОТКРЫТЬ 
канал 3. затем записать в регистр 
А код литеры “А“, ну а затем 
использовать команду ВТ 16. 

Програмна 9.г демонстрирует 
этот способ для вывода на принтер 
символьной СТРОКИ, 


Листинг 9.2 
овс 23750 
237160 ЗЕ 03 10 А, 3 
23162 СВ 01 16 САМ, 5633 
23165 11 ОЕ 5С 10 ВЕ, ВАТА 
23168 01 09 00 вс.9 


23114 с9 ВЕТ 
23715 РАТА РЕРН РЕОСВАМ 2 


лля выполнения табуляции 
выводиной на принтер инФформапии, 
необходино предварительно в сис- 
тенную переменную РИЮСС (23680) 
через РОКЕ записать соответст- 
вующее число. 


Это третья БЕЙСИК- команда 
для работы с принтером. Реализо- 
вать ее в машинных кодах довольно 
ПРОСТО. Достаточно только запи- 
сать САМ, 6133 и будет выполиять- 
СЯ ЛИСТИНГ СТРОК ВАЗТС-пРОоГРаммы 
на принтере. 
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(С› Саныловский С. В., 
{С) 5Ь0Т Со.144., Нозсом, 


1995. 
1993, 


Новинка сезова-дисковая 
операционная систена 
для ЗРЕСТВУН. 


"15-005" 


вме несколько месяцев назад 
это казалось невероятным. Разрыв 
нехжду хеланиен иметь дома про- 
Фессиональный персональный кон- 
пьютор и вознохностью купить его 
становился все больше и больше. 
Красавцы РС достойно заняли свое 
место в институтах, банках, офФи- 
сах и пока очень редко перешаги- 
вают порог нашего дона. Да и ну- 

н ‘ли каждону из нас дома, в 
школьном классе, в офФисе не- 
большой частной Фирмы супер-ком- 
вьютер типа ТВ РС, стоимостью 
более миллиона рублей? Зададим 
себе вопрос: что бы мы хотели 
поручить своему электронному по- 
мошникУ? При всен кахущемся мно- 
гобразии ответов на данный воп- 
все они могут быть сведены к 


игры и развлечения для детей 
и взрослых; 

-подготовка, хранение и печать 
текстов и документов; 
-выполнение текуших расчетов, ре- 
шение конкретных задач; 
-обучение, тренировка, управление 
какими-либо устройствани; 
-профессиональное использование 
компьютера, составление програнм 
на различных языкая  программиро- 
вания, их отладка и т.п.; 
-коммуникационные Функции-домаш- 
вий секретарь, телефонный `авто- 
ответчик, прнем и передача тек- 
стовых и графических документов 
по телефонным линиям связи. 


Итак, сможет ли каждый из 
нас в обозримон будушен иметь у 
себя дона такой конньютер? По- 
смотрите внинательно на свой 
ЗРЕСТКОМ! Если у него предусмо- 
трена возможность подключения 
накопителя на гибком магнитном 
диске (дисковода; и печатающего 
Устройства (принтера), то уже 
завтра Вы ночете стать обладате- 
лен вычислительной системы, ко- 
торая решит большинство Ваших до- 
машних проблен, поможет в учебе и 
работе, позволит в спокойной до- 
машней обстановке приобщиться к 
‘такому загадочному и такому инте- 
реснону миру настоятих компьютер- 
ных технологий! Это маленькое чу- 
що сделает для Вас и Вашего 5РЕС- 
ткОН-совместиного компьютера но- 
вая дисковая операционная систена 
15-1005! . 


СТРАНИЦА 15 - 00$ № 


О чем собственно речь? 

речь идет об открытой нногока- 
талоговой операционной системе 
15-005, результате многолетнего 
труда коллектива разработчиков из 
Санкт-Петербургской Фирмы 
Т5КРАЗОРТ, нод руководством илья- 
шенко Э.Н. Само название операци- 
онной системы 15-005 - это сокра- 
шение от 13Кга50+4 О1зЁ Орега4118 
Бузфеш. Оно, как и товарный знак 
системы закреплено законодательно 
за данной Фирной и 6ез ее согла- 
сия не может быть использовано 
кем либо в коммерческих и реклам- 
ных целях. 

на российском рынке 15-005 по- 
явилась в конце 1992 года ис 
этого номента уже сумела завое- 
вать многочисленные синнатии 
пользователей 5РЕСТВОМ-совмести- 
мых компьютеров. Подробнее об 
истории создания систены и основ- 
ных идеях, положенных в ее основу 
ны расскажем на страницах первых 
выпусков “2Х-РЕВЮ-94". 

компьютер, который ны выбираем. 

Важнейшим достоинством системы 
15-00$ является ее высокая мо- 
бильность и "неприхотливость” в 
требованиях к компьютеру, Она 
будет работать на любон ЗРЕСТВИН- 
совместином компьютере, инеющем в 
своен составе хотя бы один нако- 
питель на гибком магнитном диске 
(дисковод). Для работы  1$-005 
требуется всего 48 Кбайт опера- 
тивной паняти. Остальная имеющая- 
ся в компьютере оперативная па- 
мять может быть использована для 
буферизации ввода-вывода или 
создания электронного диска, что 
примерно на порядок нохжет повы- 
сить быстродействие работающих 
программ. 15-005 обеспечивает. ис- 
пользование до 4-х накопителей на 
гибких магнитных дисках, элек- 
ТРОННОГО ДИСКа и одного жесткого 
диска типа винчестер одновремен- 
но. Работа с различными клавиату- 
рани от обычной 40-клавишной ло 
ХТ-клавиатуры поддерхивается на- 
бором специальных драйверов кла- 
виатуры. 

К Вашему конпьютеру подключен 
принтер? В богатом перечне драй- 
веров принтеров Вы наверняка быс- 
ТРО найдете нужный. Еспи принтер 
обеспечивает печать символов псе- 
вдографики. то высокое качество 
печатаеных документов, = таблиц, 
графиков Вам обеспечено. Если 
принтер старенький то 15-00$ уч- 
тет и это! 

инея "7Хх-ноден” в составе кон- 
пьютера и установив  1$-005, Вы 
легко сножете связаться по теле- 
Фону со своим коллегой и передать 


„конпьютерные сети.” 


ему несколько файлов, а если Ваш 
компьютер обеспечивает последо- 
вательный интерфейс 85-232, ‚то 
подкаючив к нему стандартный для 
ТВИ РС ноден, Вы, с помошью спе- 
циальной коммуникационной  про- 
граммы сножете выйти в настояшие 


Работа с цветным монитором не- 
сомненно доставит Вам  удовольст- 
вие от общения с системой, Если 
Ваш компьютер подключен к цветно- 
му или черно-белому телевизору, 
не переживайте! Вы мохете рабо- 
тать в режиме 41 или 61 символ В 
строке, а возможность настройки 
цвета используемых програмн сде- 
лает работу с компьютером накси- 
нально удобной. 

Итак, все зависит только от 
наших возможностей, а начать нож- 
но и с малого! В любом случае во- 
зникает вопрос: 


Так где же взять 15-005 систему? 


Кому-нибудь это ножет пока- 
заться странным, но 15-005 пРри- 
дется купить. Переписать ее у то- 
варища не удастся, так как она 
неплохо зашитена от копирования и 
в лучшем случае "не захочет” за- 
ГРУЗИТЬСЯ, не лучшим вариантом 
будет и покупка системы с рук у 
знакомого или (что гораздо хуже) 
у незнаконого унельца хэккера. 
Ряд интересных программ вероятнее 
всего не смогут работать коррект- 
но или вообще не будут запускать- 
ся, а это так обидно... 

Официально приобрести 15-005 
можно у саной Фирмы Т5КВАЗОЕТ в 
С. Петербурге, У ее генерального 
дистрибьютора “но&ковского пред- 
приятия "510%" С0о.,1[Аа или у ик 
официальных дилеров в Вашем го- 
роде или области. заказав систе- 
ну, можно также получить каталог 
прикладных програми и литературы 
по 15-005 почтой по адресам: 


117530 Носква, а/я ТОТ, Фирма 
5104” 
или | 
121019 Москва, а/я 16, Фирма 
*ИНФОРКОН”". 
В Носкве 15-005, различные 


прикладные программы для нее и 
документацию Вам предложит Фирма 
"510%", контактный телефон (095) 
143-11-91, в следующих местах: 

- на корпункте "ИНФОРКОМА" по 
апресу: Москва, Новый 
р.г, 19-е отделение связи (1-й 
этах операционного зала); 

- в здании политехнического ну- 
зея в отделе "Вычислительная 
техника" по адресу: Носква, 
новая пл., д. 3/4 п. 1, 3-й эт. 

- ва московском радиорынке в вы- 


ходные дни у официальных диле- 
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ров ФИРМЫ "5101". 
Система и все прикладные | про- 
гранны к ней поставляются на ка- 
чественных дискетах, в Фирменной 
рупаковке Фириы ”5101", со специ- 
альной Фирменной наркировкой и 
укомплектуются кратким описанием 
покупаемого. продукта, необходи- 
мого для вачала работы НЕГРа и 
. "регистрационной карточки поль- 
Пзователя" которая дает ее ‘ обла- 
'дателю право на 50% скидку ‘при 
покупке новой версии программы и 
бесплатное использование "горячей 
линии пономи“. 
|  Зарегистрированным пользовате- 
мям Фирма в первую очередь предо- 
ставляет информацию о новых по- 


ции, проводит с ними индивидуаль- 
(ные консультации, организует обу- 
| чение и семинары по’ обмену опы- 
том. 


Первое знакомство с`1$-005, 


15-208 выгодно отличается от 
|сушествующих дисковых операцион- 
ных систем для компьютеров семей- 
ства "2х-ЗРЕСТВУМ” и обладает бо- 
‘лее широкими вознохностями, чем, 
| например, традиционная ТИРО$. При 
разработке ос 15-005 использованы 
стиль и идеология известной оне- 
'рационной системы Н5-№5 и ©бо- 
лочки “Ногфой сошрапдег” для  ЭВИ 
|ТВМ РС, а также стремление к`мак- 
симальному удобству для нользова- 
теля. Такой подяод к созданию 
‘системы обладает определенным 
преинумшеством - пользователь, ра- 
ботаюший на ПЭВИ типа "7х-5РЕС- 
ТКОН" с 15-005 при переходе на 
ТЕН РС попадает в знакомую, при- 
|вычную ухе среду "НОКТОН СОМНАН- 
ОБ". й 

Операционная систена 15-005 
позволяет работать с разнообраз- 


выми внешнини устройствани, таки- 
` ми, как эаектронный диск,  диско- 
вод 5.25 дюйма, винчестер, ноден 


и локальная сеть, 
личных ТИПОВ. 
полноценный текстовый редак- 
тор "Еа1‹ог“, програкны печати 
текстовых и графических Файлов. 
поддержка модема преврашают обы- 
квовенный "7Х-бресёгит“ в полно- 
ценное рабочее место совренен- 
ного делового человека. 15-205 
|значительно расширяет возмохнос- 
ти конпьртеров ‘тина "2х-5рес\- 
тыр" для использования их в 
научной деятельности, в сфере 
бизнеса и управления, дия созда- 
ния прикладных и 
програнмных продуктов. 

15-008 ориентирована на поль- 
зователя. не обладающего навыкани 
программирования, но не оставит 
равнолумным м профессионального 
'програнмиста. ИЯ первое, с чеи наи 
поредстсит познакомиться - ‘ это 


принтеры раз- 


конмерческих ` 


Файловая обойочка системы. 


ФАНЛОВАЯ  — ОБОЛОЧКА. 
{ энЕм. ) 


Файловая оболочка 15-005 пред- 
назначена для хранения,  пРОоСмот- 


ра, редактирования и запуска. Фай-. 


пов. В нее Бы попадаете восае за- 
пуска операционной системы. Дия 
этого веобходино вставить дискету 
с ОС 15-005 в дисковой и нахать 
киавиму <везеф>, т.е. перезапус- 
тить комньютер. Загрузчик 1$-100$ 
перехватывает ’обрашение ТРПОЗ к 
диску и передает „управление 
15-005. После загрузки Вы ‘увиди- 
те две панели с содерянмым Вашего 
диска, ‘а верхняя строкз показыва- 
ет систенные утилиты, которыми Вы 
мохете пользоваться при работе в 
оболочке. Эти утилиты вызываются 
цифровыки клавишами <1>,..., <0> 
соответственно и выполняют следу- 
юшие Функции: 


НЕГР. - справочная информация. 

ОЗЕЕ - вызов пользователь- 
ского меню. ^ 

УТЕМ - ПРОСМОТР Файла: 

ЕБГТТ —- вызов текстового редак- 
тора. у 

СОРУ - копирование Файлов. 

БЕНАНЕ - переиненонание Файлов, 
каталогов. 

сгрте, - создание подкаталога. 

БЕТЕТЕ - Удаление Файлов, ката- 

+ логов. 

НЕНО - системное мень, 

НАЗК - установка имен, расши- 


рений, параметров, Фай- 
лов пля отображения на 
панели. 

На верхней строке правой и пе- 
вой панели указано ‘текушее ус- 
ТРрОоЙСТВО И ИМЯ диска или подката- 
лога. На правой и левой панели 
- содержимое главного каталога. 
Чтобы оказаться в нужном Ван под- 
каталоге подведите курсор к нему 
и нажните <Елаег>. Движение КУр- 
сора осуществляется, клавишани: 


<А> - вниз 
<9> - вверх 
<0> - на левую панель 
«Р> - на правую панель 


Здесв работают также стан- 
дартные клавиши управления 
КУРСОРОН. 

«С5/9> - в начало каталога. 

<СЗ/А> - в конец каталога. 

<С5/0> - в корневой каталог левой 

панели. 

<С5/Р> - в корневой каталог пра- 

вой панели. 

обмен. панелей. 


<85/С$5> 
Выбор нового устройства: 

<С5/1>- на левой панели. 

<С5/2>- на правой панели. 


При выборе нового устройства по- 


ана синнниа 


ЕЙ 


`програинан 15-005 вызываются с 


° клавиши <0>, 


55+3 - сортировка по расширению 


Своозе Ог1уе: 


всрег 


Управляя КУРСоРОН клавитами 
<0>, ‹Р> можно выбрать новое ус- 
ТРОЙСТВО с пононью нажатия 
<Еллег>. Отказаться ст выбора и| 
выйти в оболочку ножно с поношьюе 
<55/А> или <брасе>. Подсказки по 


поношью клавиши <!>. для этого 
необходимо подвести курсор к ин- 
тересующей Вас програнме и нажать 
<1>. "ДЛЯ ‘ПРОСНОоТра текстового 
файла подведите Курсор к нену и 
нахжните клавишу ‹3>. для  управ-| 
ления оболочкой задействованы два 
типа клавиш - зарезервированые 
для оболочки и переопределяеные 
пользователен. и 

К первому типу относятся: Кла- 


виши ‹0>, <Р>, <А>, <9> и их кон- 
бинации с <С$5>, клавиши <5>, <6>, 
<Т>, <8>,. <9> и комбинации <С$/1>| 


<С5/2>, а также ‹Ерфег> и <5расе>. 
<р>, <А>,. <>, а тат 
кхе <5>, <6>, <Т>, <8> в сочета- 
НИИ. С <С5> - управляют  ввихением 
курсора (такое управление ‘являет- 
ся стандартным для’ 15-005). с 
Второй тип клавиш и их Функции 
заданы в Файле ежкеу. 4х, в ко- 
тором Вы можете сами ‘определить 
Функции клавиш так, как Вам’ удо- 
бно. По умолчанию подиерхивартся 


следующие определения (олин из 
вариантов) : й 
С - сравнение Файлов на пане-` 
лях; 


С - калькуаятор: 
55+с - копировшик каталогов; 
9 - запрос даты; 
р - вывод данных о Файле на 
экран; 
её - ПРОСМОТР и удаление рези- 
дентов; 
+ - поиск Файла; 
Е - копирование Файла с сег- 
ментацией; 
Ъ - распечатка текста или 
картинки; 
1 = свободное место на диске; 
Ш - монитор конандной строки; 
М - резидентный монитор’ кон. 
строки (необходимо сначала 
установить); ‹ 
38+к - маркировать-все Файлы в 
каталоге (+); 
55+) - отменить наркировку всех 
Файлов (-); 
п - копирование Файла с удале- 
нием (шоуе); 
Г - удадение целого каталога с 
файлани; 
$ - вывод системной информа- 
ции; 
$ - сортировка по имени Файла; 


файла; 


4 _- вывод ‘дерева’ каталогов; 
1: № - восстановление удаленных 
я. 

х ; 


_ Начальная загрузка систены. 


й 


8 


рт вазальной , загрузке опера- 
чнонная систена. ищет в ‘коризвон 
с которого она 

апфоевес. Ба\. 
Есаи этот Файл будет. найден. то 


Файл ацфоехес. Ъаф содержит ко- 
|Нанды. которые’ должны выполняться 
Жажлый раз при начальной загрузке 
Системы. Эти конанды осумествляют 
Необходиняю настройку ‚оцерацион- 
ся системы. устаназливаютг -удоб- 
вое для работы окрухение,  запра- 
вивают текушую дату, устанавлива- 
№г список. каталогов в. которых 
производится поиск  выподняеныя 
программ (команда ра4в), устанав- 
ливают.текуший . ‘каталог рабочей 


Н и ой 
Програнма вызова справочной 
информации в, основном меню сис- 
темы (фигурирует как “ НР") 
вызывается клавимей ‹1>. } 

` Дия ‘получения справочной или 
Дополнительной информации, по’ ин- 
тересующей Вас програмие найдите 
Файл этой програннмы курсором ‘и 
нажмите <1>. Что Вы уридите? Это 
зависит от содерлания Файла с 
именем интересующей Вас_ програм- 
мы, но с расширениен .В1Р,  нахо- 
лящегося.в каталоге НЕ.Р. Если Вы 
увидите :‹ ва 

” Мезсоше 40 5ъе11 

ог 15-005-92`.....° 

то.это означает. что в каталоге 
МЕР, отсутствует соответствующий 
Файл. с ‘расширением ‚БР и Бам 
Уредложено справка. по оболочке, 


МЕНЮ  ПОЛЬЗОВТЕЛЯ 
3. МВ > 
Програмна предназначена для 
удобства работы. пользователя в 
зна, ( авалог програниирования 
кеаклни на нахатие клавиши с 
большими возножвостями, удобна 
дая использования при’, быстрых 
перекодах`из каталога в. каталог, 
для часто вызываемых — програим, 
для. вызова прикладных пакетов 
Чрограмма. вызывается 


‚ дяя работы програниы необходим 
текстовый Файл вепи. +1%. При вы- 
зове программа ввачале ишет Файл 
ети. $х% в тенушен каталоге, ‹за- 
тен. (при его ОтсУузетвии там} в 
каталоге ЗНЕШь, таким образом. 


катадоге свое. неню 


цанениси выполняют другие › полез- 


пользователь ножет инеть в кахдон.. 


СТРАНИЦА ^13.- 005 
ПРОГРАВИА ПРОСНОТРА 
ТЕЕСТОВЯХ ФАЯЛОВ 
$ УЕ) 

Для проснотра текстового файла 
удобно воспользоваться Функцией 
УТЕМ. Для этого подведите к нену 
КУРСОР и нажмите клавишу <3>. На 
экране появится большое окло; в 
котором распечатается ‚ содержимое 
файла. По файлу иолно двигаться с 
помошью клавим управления курсо- 
рон, а также в ‘режиме непрерыв- 
ного скролвинга. Нозно переклю- 
чить рехим отображения текста. на 
экран: 41/651 буква в строке. 


ТЕКСТОВЫЙ РЕДАКТОР 
1 ОГ } 

Мощный и удобный в работе тек- 
стовый редактор ЕПТ несонненно 
придется по душе даже \профессио- 
налу. По своим  ‘нознохностям он 
ненамного уступает ° знаненитому 
текстовому редактору ВЕХГСОН для 


1ВН РС. Кромё обычных ФУНКЦИЙ\ 


удаления, вставки И построчного 
редактирования в нем реализованы 
возможности контекстного  ноиска 
и замены, блочные операции над 
текстом, режни использования псе- 
вдографики, разбивка’ текста ина 
Страницы, автоматическое или по- 
строчное Форнатирование текстовых 
абзацев с выполнением переносов 
слов по правилам орфографии, воз- 
можность одновременной работы с 
несколькими текстовыми Файлами, 
работа с накросами. 

для нызова текстового редакто- 
ра подвепите курсор к Файлу,  ко- 
торый Вы желаете отредактировать,: 
и нажмите клавишу ‹4>. Если тип 
выбранного Вами Файла относится к 
допустимону, то редактор предло- 
хит Ван его отредактировать, со- 
здать новый Файл, или отказаться 

от того и от другого. Вам будет 
такяе предоставлена возножность 
скопировать Файл в резервный Файл 
с расширением „Бак. В противном 
случае Ван будет предложено лишь 
создать новый Файл. 


КОПИРОВАНИЕ ФАЯЛОВ 
{ СОРУ ) 

Ужобно и понятно в систеке ре- 
ализована Функция копирования 
файлов. Для того. чтобы скопиро- 
вать Файл, надо подвести к нену 
КУРСОР и нажать клавишу ‹5>. Дия 
копирования группы Файлов их 
надо предварительно выпелить, с 
поношью клавиши ‘пробел, Копиро- 
вание всегда происходит с текушей 
панели на протввопонохную. Вкаю- 
чение режина работы с. буберизаци- 
ей заметво ускорит выполнение 
больших операций копировавия. 


РЕДАКТИРОВАНИЕ АТРИБУТОВ ФАЙЛА 
ИЛ КАТАЛОГА 
{ БЕМАНЕ › 
„Изменить имя ‘Файла или его 
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АА АНА УЖЕ 


расшизение ‘поможет Вам Функция 
ВЕНАНЕ. Опа работает с азрибу- 
тани как Файла, тах и каталога.” 
Установив курсот? на Файл, с ко- 
торым Вы хелаете работать, нажни- 
те клавишу ‹6>. При этом загорит- 
ся 6-ий саева индикатор “ВЕВАМЕ” 
и возле выбранного Вани Файла, 
замигает курсор строкового редак- 
тора. изменив иня или расширение 
Файла нажмите ЕНТЕХ, ‘ 


СОЗДАНИЕ НОЗОГО КАТАЛОГА 
< ВКОт › 
для создания нового каталога 
(подкаталога) нажмите клавишу ‹7> 
НЕЕ, В ответ на появившийся 
заирос ' введите ‘имя соэдаваеного 
каталога. 


‚ УДАЛЕНИЕ ФАЙЛОВ И КАТАЛОГОВ 

у ( ОБЪЕТЕ ) 

Удаление Файлов или пустых ка- 
талогов выполняется клавишей <8>. 
Иодвелите курсор к  удаляеному 
Файлу и нажмите 8>. Дня удаления 
группы Файлов ия надо предвари- 
тельно выделить с помошью клавими 
<пробед>. После ввода подтверхде- 
ния Файлы будут уничтожены. 


СИСТЕИНОЕ МЕНЮ (. НЕМО ) 
ВВОД НАСКИ-ШАБЛОНА ФАИЛА, 
УСТАНОВКА РЕЖИМОВ 
ПЕЧАТИ КАТАЛОГА 
{ НАБКА ) 
дне последние функции Файловой 
оболочки НЕМИ ‹9> и НАЗКА <0> 
помогут Ван настроить систену для 
‘быстрого поиска и удобной инлика- 
пии в ‘текумем каталоге Файлов с 
необлодиными именами и (или) 
расширенияии. [ 


РАБОТА С ТЕ-00$ ^ДИСКАВИ 
В СРЕДЕ 1$-1005. 

серьезное внимание разработ- 
чики системы уделили вопросам 
копирования информации из 78005 в 
15-005 и обратно. Копирование 
Файлов с ТРРОЗ-писков выполняется 
ррограмиой ЕВОН_ ТЕР и запускается 
клавыией <#> иди из "ИЗЕ"-меню. 
Текстовые Фаваы М. с помошью 
программы РЕОН_ТЬМ посае копи- 
рования ‘мохно ‘преобразовать в 


Формат редактора ЕрТ системы 
18-005. 
копирование на ТкоО5-диски 


выполняется програмной ТО_ТЕрО5 и 
вызывзется клавишей ‹1> или. из 
"ОЗЕВ"-меню. Отметив копируеные 
Файлы пробелом или подведя курсор 
к копируеному файлу нажмите <+>. 
Вам будет предлохдено меню, в ко- 


- Тором. можно. отказаться от копиро- 


вания, изненить текушие параметры 
копирования или выполнить его, 
нашав «ЕИТЕК>. 


РАБОТА С №5-00$ ДИСКАМИ 
В СРЕДЕ 15-005. 
Работая в 15-205, Вы получаете 


А 
у редактора ЕБТТ системы 15-005 и 


выполнить обратную операцию. 

КОНПЛЕКТ ДИСКЕТ Г -воз Обрашает на себя внимание от- 

поставляеный Фирмой "5101" г.Носква сутствие со стороны 15-208 огра- 
ничения на размер обрабатываемых 
Файлов И5-005. Это наверняка за- 
интересует тех, кто котел бы‘ ре- 
зультаты домашней работы перенес- 
ти потом на более ношный конпью- 
тер лая загрузки в базу данных 
или распечатки на дазерном йрин- 
тере. ь 


НАИМЕНОВАНИЕ СОДЕРЖАНИЕ 


БАЗОВЫЙ КОМПЛЕКТ ОС 13-008; 

) Утилиты; Н5-003; 
Текстовый редактор; 
ПроГграмна печати 
текстовых Файлов; 
РЕТЕТЬОХ & Н05тС ОС 13-0оз; Печать; Редактор; 
ВЕСЬАНМ 5НОЧ Програима печати эк- 
ранных Файлов + .5с® 
файлы; Пакет Фонового 
нузыкального сопровох- 
дения на базе АУ-процес. 
Программа создания 
динанических рекламных 


ПРОГРАММА ПЕЧАТИ ТЕКСТОВЫХ 
ФАИЛОВ. 


Программа печати текстовых 
Файлов в 15-005 выполнена в ‘виде 
отдельной программы РТТ, ‘кото- 
рая вместе с редактором ЕТ 


РОЛИКОВ; позволит Ван получить качествен- 

ЗАПИСНАЯ КНИЖКА ОС 13-003; ный документ, использовав” для 
Пакет “записная книжка” этого все возможности подкаю- 

ДЕЛОВОЙ КАЛЕНДАРЬ 0С 13-003; Печать; Редактор; ченного к компьютеру ‘принтера. 
Пакет “Деловой календарь" для вызова  програныы печати 

АРН "ФИНАНСЫ БЕЗ 0С 13-Воз; Печать; Редактор; (предварительно загрузив’ ‘драйвер, 
ПРОБЛЕМ" Пакет"Финансы. без проблем“ печати) установите курсор на 


текстовом файле и нажните клавишу 
<Н>. загорится индикатор `“УТЕМ", 
и Вы окажетесь в меню программы 
печати текстовых Файлов 15-005: 


АРН "СКЛАД" ОС 13-003; Печать; редактор; 
Пакет "Склад"; "Ннастройшик" 
АРМ "МАТЕРИАЛЬНЫЕ 0С 13-Роз; Печать; редактор; 

ЦЕННОСТИ" Пакет "Натценности" 


ТО: ргимег 
ТИТ ТР 
ЗАУЕ 
ат 


освоить систем| расш. 5НМ для редактирования и 
13-Воз ! запуска}. Фоновая НУЗЫКА не по- 
: 4—- мешает работе в 
Записи ПО ЧИСЛАН И ПО ФАМИ- |редак. с. текстом 
ЛИЯН облегчат ван поиск нуж- [а 
ных адресов и людей ! При 
ограниченных объенах - неог- 
рРаниченные вознохности ! 

5- 


до начала печати ножно опреде- 
лить Формат печатаемого ‘докумен- 
та, количество столбцов печати, 
необходиность отступов, нумерации 
листов, плотность печатаеных син- 
волов, качество шрифта и другие’ 
параметры. для настройки на’ кон- 
кретный тип принтера инеется сие- 
циальное меню, которое предлага- 
ет Вам на выбор: ЕРБОН, МС6312, 
#06313, НС633Т. Если в этом пере- 
чне Вы ке нашли подхоляший для 
. себя принтер, имеется возможность 
описать в спениальном Файле свой 
принтер самостоятельно. 


СПЛАНИРУЙТЕ 
свою жизнь на | ДЛЯ БУХГАЛТЕРА это исключитель- 
г года вперед!| ный подарок ! Счета, проводки, 

Нет проблен ! | печать всевозмнохных Форм доку- 
7— ментов и многое 
СКЛАД понестит в себя все, дпругое-ЭтО ВЕЩЬ! 
что Вы захотите. БНИМАНИЕ ! 

Работая с “РАСХОДОМ", дово- 

дите операцию до конца. ‚Спра 
вка - кд. <9> 


ПРОГРАМНА ПЕЧАТИ ГРАФИЧЕСКЯХ 
ИЗОБРАЖЕНИИ И РИСУНКОВ ИЗ 
° ФАИЛОВ ТИНА *. зсг, 

Программа печати графических 
изображений практически эмулирует! 
возможности известного ‘графичес- 
кого пакета ТОКУ ВОАЕО РОК 
Н5-005. ВозножностЬ маситабирова- 
ния изображения, ‘режии  ЛУВА, 
свободное разнешение на аисте, 
печать в  полутонах’” полностью 
возможность прочитать дискету в иоги, создать новые каталоги, удовлетворят Ваши потребности. 
Формате №5-005 емкостью 360, скопировать Файл или группу Фай- Перед запуском программы ‘дол- 
просмотреть каталоги и подкатало- лов на диск 15-005 и обратно, пе- жен быть инсталлирован драйвер 
ги на ней, удалить Файлы и ката- рекодировать скопированный из вашего принтера. допустимый тип 
логи, переименовать Файлы ий ката- №5-005 текстовый Файл в формат  печатаемых Файлов". зсг. При пере- 


НАТЦЕННОСТИ ведут строгий 

учет поступившего и сдаваено- 
го инушества. Теперь у Вас нич 
его не пронадет!Строгий учет! 


ПРИНЕЧАНИЕ: редактор ь 
и печать текст, Файлов есть везде кроме ЗАП. КНИЖ. 


7 3ак.390 , 135 . . 


броске графических Файлов из 
Т8205, не забызайте их переинено- 
вывать. Дадее подведите курсор к 
файлу с расширениен зсг, из кото- 
Рого Вы желаете распечатать гра- 
фические изображения и нажмите 
клавиму Н. 

Продолжение 

следует. 


Комментарий ИНФОРКОНа. 


При первом взгляде на то, о 
чем Ван сегодня рассказали, У 
пользователя возникает обычно два 
вопроса: 


7 НЕУЖЕЛИ ЭТО. СДЕЛАНО У НАС? 
- ПОЧЕМУ Я ОБ ЭТОН ЕЖЕ НИЧЕГО 
НЕ ЗНАЮ? 


То хе произошло и с нами. Где- 
го начиная с июля месяца 1993 го- 
да’в нажей почте все чаше! стали 
проскакивать сообщения о том, что 
где-то кто-то что-то видел или 
слышал. Люди просили рассказать, 
что мы знаем об 15-1005, 

Комментарии, которыми сопрово- 
хдались подобные сообщения, обыч- 


Юсновная суть: это невероятно, 
этого просто не мозет быть, пото- 
му Что этого не может быть нико- 
гда. 

Ны начали “раскручивать” этот 
вопрос. Сначала приобрели пару 
систен и проверили их в деле. 
Оказалось, что слухи не вполне 
правильно описывали ‘действитель- 
ность. ДЕЙСТВИТЕЛЬНОСТЬ ОКАЗА- 
ЛАСЬ ЕЩЕ НЕБЕРОЯТНЕЕ. 

Й сейчас мы делаем однозначкый 
"Господа, пока Вы читаете 
Эти строки, Вам компьютер перехи- 
вает второе рохдение, а У Вас на- 
чинается новая хизнь! О том, что 
сделали Ваши коллеги, российские 
К. Синклер даже и не 


да. это действительно сделано 
У нас в России! И мы еше расска- 
хен на страницах "7Х-РЕВЮ” о тон, 
как это было сделано и расскажем 
© ‘тех людях, которые стояйи у 
истоков новой системы. 

Саное же потрясающее, что это 
действительно нвоголетний ТРУД, 
который не вышел за-стены лабора- 
тории до Тех пор, пока система не 
была ‘полностью ‘подготовлена и 
обкатана и пока она не “обросла” 
необходиным пакетом утилит, драй- 
веров и прикладных програны, то 
есть всем тем, 6ез3 чего ге нельзя 
было вы взять такую, как она есть 
и сразу использовать па понную 


во очень трудного с 
инхенерной и экономической ‘точки 
зрения маркетивга. —Вы› только 
представьте, через что пришлось 
пройти  разработчикаи, — которые 
несколько лет работали в поисках 
и сомнениях, не инея вознохжности 
ни оденить спрос на свой труд, ни 
получить за него минимальную 
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компенсацию. И если коллектив 
выжил в таких условиях, довел 
свое дело до конца, то. ену просто 
надо ставить памятник при жизни. 


Из статьи руководителя Фирны 
*З1от”, Саннловского Сергея Вла- 
динировича Вы узнали саные первые 
сведения об 15-005. По должности 
автор говорит в этой статье о 
том, что сейчас есть реально и 
что ножет быть. взято Вани немед- 
ленно. 

У нас же руки в этом снысле 
развязаны и ны ножен вместе с 
Вами, уважаеные читатели. загая- 
НУТЬ в ближайшее будущее. 

‚ Система открыта, а это значит, 
что она представляет неограничен- 
НЫЙ ПРОСТОР длЯ Творчества  сис- 
тенных програнмистов, которые мо- 
гут ухе сейчас работать над ее 
развитвем, над разработкой новых 
системных утилит и драйверов лю- 
бых внешних устройств. Основное 
достоинство состоит в том, что 
каждый. кто способен сделать неч- 
то значимое, сделает это не для 
КОРЗИНЫ и не для узкого круга 
близких друзей, а для тысяч счас- 
тлиных обладателей новой системы 
и его труд получит достойное но- 
ральное и натериальное вознаграх- 
дение, 

Програмнисты-прикладники, 
раюшиеся на возможности новой 
системы, получат необходиную под- 
держку от айпаратной среды (не- 
сколько дисководов, — винчестер, 
средства комнуникации и т.д. и 
т. п.). Они смогут не просто рабо- 
тать, а работать "под систему” и 
быть уверены, что их труд не 
останется невостребованным. 

Поддерхка из систены 15-005 


опи- 


сетевых возножностей даст неогра- . 


ниченный простор для творчества 
всем желающим. Это и возножность 
работы с ВВЗ и обмен информацией 
через нодем. Возножно, уже в 1994 
году в разных уголках страны поя- 
вятся электронные ° хурналы по 
"Синклерг”. Каждый хелающий  смо- 
хет стать и авторон и главным ре- 
пактором и издателем. 
Совместимость Файлов с Форма- 
тон Н5005 Фактически преврашает 
Вам “Спектрун”" в 1ТНН-совнестиную 
нашину (на уровне систены). Рабо- 
тая дона, по сети Вы получите 
ДОСТУП К ресурсам 1ВМ-компьютера, 
установленного у Вас на работе. 
Вы сножете по-новому организовать 
свой Рабочий день и перейти к 
тому стилю, который уже давно 
практикуется в развитых странах. 
Ресурсы ГВИ-совнестиной техни- 
ки смогут быть использованы на 
благо “Спектрума“. Появятся ре- 
дакторы и АССЕНБЛЕРЫ для “Сцек- 
трума". работающие на ТБМ. Откры- 
вается возможность создания прРо- 
грамм кросс-ассенблеров для нере- 
вода мнажинного кода программ, на- 
писанных для одного компьютера на 
машинный код другого. Все это 
возможно, но требует больших ре- 


` Отныне, 


сурсо» памяти и большого дисково- 
го пространства для. размешения 
функциональных библиотек. Теперь 
эти возможности начнут приходить 
в Вам дом. 

06 уникальных возможностях ис- 
пользования "Снектруна" в качес- 
тве офисного оборудования мы уже 
и ве говорим, они очевидны. 

Новая систена предоставляет 
необычные ‘возможности дая заво- 
пов-изготовителей компьютеров. В 
своих ‘производственных планах они 
уже сейчас могут учесть включение 
в принципиальную схему ПК узлов, 
которые позволят взять от машины 
максивум возможного под управле- 
нием 15-005. Не исключено, что 
будут заключены лицензионные со- 
глашения между заводами и автора- 
ми систены о включении в архитек- 
ТУРУ компьютеров ЙЗУ с системой 
15-005. 

Все это перспективы ближайших 
нескольких месяцев. А что же для 
этого делается сейчас? 


Нехду Фирнани "ИНФОРКОМ” и 
"5.0Т" заключено соглашение о 
совместных действиях по продвиже- 
нию системы 15-005 на рынок СНГ. 
начиная с января 1994 г. 
“ИНФОРКОМ" начинает эксклюзивное 
оспешение новой системы. Принято 
решение о пятикратном увеличении 
тиражности "7Х-РЕВЮ" в 1994 году 
и о сушщественнон улучшении его 
полиграфического исполнения. Мы 
надеенся, что все жедающие полу- 
чать это издание наконец-то сно- 
гут это сделать и не остаться за 
бортом стремительного = распрос- 
транения 15-005, 

Программа действий согласована 
с авторами системы, Фирной тзкга- 
$0#41 (С. Петербург) и получила 
полную поддержку. 

Предполагается, что по мере 
распространения системы и завое- 
вания ею популярности, будет от- 
крываться и доступ к ее работе 
ИЗНУТРИ (пля системных програм- 
нистов). Со временем будут опу- 
бликованы точки входа в систену и 
закрытая часть информации о ее 
работе. короче говоря, распро- 
странение системы будет сопро- 
вохдаться ее "открыванием" в 
расчете на то, что ее распро- 
странение будет поддержано 
дальнейшим ее развитием. Возмох- 
но, будет создана сертификацион- 
ная группа для включения в систе- 
ИУ разработок сторонних специа- 
А: 

Подготовлена и сдана в печать 
первая книга об 15-005. Выход из 
печати ожидается в конце ноября - 
начале декабря 1993 года. ЕнигУу 
можно будет и приобрести как в 
Фирме "ТОТ", так и по каналам 


“ИНФОРХОНа”, 
Одним словом, всех нас ждут в 
1994 году ‘большие события. На- 


страивайтесь на серьезную работу, 
будушее обешает быть интересным. 


Вай “ИНФОРКОН". 
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КОНПЬЮТЕР И ЗВУК 


нерацией звука на Спектруне. 
мый простой пример: оперзтор ВЕЕР 
в БЕЙСИКе. С остальными. звуковыми 
эффектани Вы знакомы лишь пона- 
слышке из игровых программ. Что 
представляет из себя звук на ком- 
пыютере? На рис.1 представлено 
классическое изображение гарнони- 
ческой частоты. 


\/ 


рис. 1 


На компьютере такая синусонда 
неформируема. Мы не сможем на 
"Спектруме" сформировать плавное 
изменение положения диффузора ди- 
намика, т.к. доступ к динамику 
возножен только через бит 4 
(здесь четвертый бит является 
пятын по порядку или числом 16, 
если все остальные считать. нудя- 
ми) порта номер 254. 

Положениен динамика управляет 
©дии бит, значит вознохны только 
два положения, где 0 - начальное 
положение, 1 - максимальное уда- 
ленное от начального положения. 
Графиком частоты. — образованной 
‘таким образом, служит рис. 2 


Подобным образом информация 
считывается и записывается на ма- 
гнитоФон. Попробуйте набрать про- 
грамну 1, в которой данные, счи- 
тываеные с нагнитоФона. запомина- 
ются в памяти. Информация ножет 
представлять собой человеческую 
речь, музыку И прочую — ЗВУКОВУЮ 
инфорнацию. Программа 2 прРоигры- 
вает информацию, считанную с маг- 


нитоФона и записанную в панять, 
выводя ее на динамик компьютера. 


вы уже несколько знакомы с ге- 
са-, 


В данном случае информамия запи- 
сывается в верхние две ТРЕТИ 
экрана с задерлкой 15. Чем мень- 
ше эта задержка, тем быстрее за- 
полнется панять и более четко 
воспроизведение. Так ‘что подби- 
райте ее по вкусу. 


Програмка 1. 

ТАРВОР , 10 Н, 16384 

Ър ОЕ, 4096 
5ВОР ырС,1 
РОВУТ 1 А, 15 
РЕГАЯ1 ПЕС А 

3% НН, ОЕГАУ: 

ТЫ А, (254) 

ВЕСА ы 

ВЬСА 

в С 

38 НС, ОВУТ 

о (но, с 

тс нь 

ЕС ГЕ 

12 Ар 

О Е 

ЭР Н2, ВОР 

ВЕТ 

Программа 2 

ВИРОТН 10 1.16384 

Гр ВЕ, 4096 
ТУТ № А, 

12 ВА 

10 С,128 
РЬАЯ 12 А, 15 
РЕБАУ2 БЕС ^ 

3% н7, БЕГАУа 

р А,В 

АБО С 

ЗР #17. ВЕЕР1 5% 

ХОВ А ы 

О0Т (253), А 
ВР1@ ВЕС С 

3& НС, Р.АУ 

18С НЬ 

БЕС БЕ 

2 А.Б 

05 Е 

В Н2, 5ТВУТ 

ВЕТ 
ВЕЕР1 2 А, 16 

ОБТ (254). А 

зе ВР: 


Но даже при минимальном значе- 
нии задерхки звук ве будет доста- 
точно реалистичным. Из рис. 3 вид- 
но, что выделяются не все часто- 
ты, многие из них, находясь ниже 
0, приравниваются к 0, а находя- 
шиеся выше 0, приравниваются к 1. 

Над данными, которые считыва- 
ются с магнитофона, ножно выпоя- 
нять некоторые операции, напри- 
мер, удаление низкой частоты, 
подавление шуна, выявление пре- 
обладаужей частоты. 'Выяваение 
частот используется в цветомузы- 
ке. Набрав програнму 3, Вы можете 
узнать, сколько импульсов (точ- 
нее перепадов с 1 на 0 или с 0 на 
1) ПРОоиЗОЩЯО за некоторый интер- 
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Рис. 3 


вал времени. Число инпульсов воз- 
врашется в регистровой паре Вс, 
т.е. Вы можете вызывать эту  про- 
Грамму Бейсик-програмной. По чис- 
лу таких импульсов молно узнать, 
какая частота преобладает (в. дан- 
ном случае ^за 127 тактов). Чем 
выше частота, тем меныше ‹ значе- 
ние, содержащееся в ВС. Можно на 
основе ‘этой программы создать 
цветомузыку или програмну, рас- 
познающую нелодию,  проигрываеную 
с магнитфова. Но эта програнна не 
снохжет Вам выдать тчное значение 
частоты. идущей с магнитофона. 
Это значение весьма приближенно, 
т. к. часть ‘частот пропадает, 
часть наоборот появляется в виде 
шума. 


Програина 3: 
ВСОЕТАЯ № В, 12т 
и Н.А 
Ш, с,0 й 
ТИРЫ тя А, (254) 
хо НН 
АО 54 
САМ. 2, СС 
РОЯ  ТИРИ 
БЕТ р 
сы тр А, 
СРЬ 
102 НА 
ис 
ВЕТ у 
Если Вы, к примеру, запустив 
программу 1, предварительно наж- 


нете клавишу "воспроизведение" и 
“пауза” на магимтофоне. то увиди- 
те. что с магнитофона, который’ 
молчит, идет шум, который весьма 
заметен (вполне возможно, что У 
вас прекрасный магнитофон, тогда 
шума ве будет, но урезание частот 
останется). 

Итак. Вы представляете ухе, 
какое качество звука можно поду- 
чить, используя Спектрун, какие 
недостатки имеет эвуковое ревение 
на компьютере. 

Но возможен резонный вопрос: 
“Каким хе образом регулируется 
ГРОНКОоСТЬ В — мелодиях — ИГРОВЫХ 
програни?” Что хе ткое громкость? 
С поношью рис.4 ножно увидеть, 
что громкость - это амплитуда 
звуковой частоты. Но как же можно 
изменять амплитуду на Спектруме? 


КОННЕНТАРИЙ 


орб 30000 
рт ‚Отключение прерываний. 
ТХ. 31000 ;Начало данных. 
А, (1Х+0) {Прием давных в аккумулятор. 
255 :255 - конец мелодии. 
2, ЕХТ ; Выход. 
А ‚Проверка Флагоз в аккумуляторе. 
2, НО ‚Если ноль, то обход. 
С.А ;Временное сохранение аккунулятора. 
РИС. 4 128 ; Проверка старшего (7-го) ‘бита. 
:Если он : 1, ь 
Представьте себе, что на дина- (ВАВВ+1), А  ;включается признак ударника, 
У ы ;Восстановление аккумулятора. 
12т ‚гашение 7-го бита. 
дДиФФУЗОР Р.А ‚Временное соктанение аккунулятора. 
юпять принет начальное положение. (НТ1+1), А ;Уставовка звука в первом канале. 
что, если ны буден увеличивать А ‚деление числа на 
значение задеряки нежду подачей 1 А ;восень для определения 
и 0. Диффузор поднимется уже нес- ; задержки гронкости. 
Колько выше. И так можно уведичи- :УКОд ОТ ВОЗМОЖНОГО НУЛЯ. 
вать эту задержку до тех пор, по- (7+1), А ‚установили задержку громкости в 
ка за промежуток времени мезду 1 ; первом канале. 
и 0 диффузор не будет успевать ‚Установка компенсационной задержки, 
постичь наивысшего положения. ;чтобы громкость не влияла на частоту, 
1 ,Перекод к очередному байту данных 
А, (1Х+0) ; (ВТОРОЙ канал). 
^ ‚Проверка Флагов в аккумуляторе. 
2, ног . :Обжод, еси О (играть не надо). 
Е.А ;Врененно сохранили аккумулятор. 
(Ет2+1), А ‚Установка звука во втором канале. 
А ; деление 
А ‚на 
А ; восемь. 
А Плюс единица (уход от нуля). 
(7.2+1),А ‚Установили задержку громкости во 
‚втором канале. 
А, 1 {Установка конпенсанионной 
(0Е1.2+1), А — ; задержки. ' . 
РИС. 5 1х ‚Переход к очередному байту. данних. 
; Теми 
Если он будет успевать, то, ; мелодии. 
[как такового, изменения гроккости ‚Выдача сигнала на динаник. 
происходить не будет. Вы, навер- ‚Выдача сигнала на динамик. 
вое, уже замечали, что в играх. в ‚Уменьшение громкости. 
Которых используется затукание, 
савшно, что при уненьшении грон- ;2 раза. 
кости мелодии появляется высокая ‚Возврат для приема очередных данных. 
частота. (Это происходит именно 
из-за этого эффекта. Подобные не- 
щодии с затуханиями почти невоз- Р ; первый канал. 
Ножно слушать на наденьких (высо- Регистр Е - второй канал. 
кочастотных) динакиках, так что УТ.1 - громкость в первом канале. 
наиболее благородно мелодиязвучит \1.2 - громкость во второн канале. 
на низкочастотных (больших) дина- р. ‘- компенсационная задерзка 1-го канада. 
рЕЬг - компенсационная задержка 2-го канала. 


ЕББББ ВБЯЯЯЗЕБ 


теперь перейден к Формированию 
частоты. обычно звуковая частота 
Формируется так, как показано на 


Теперь ухе более понятно, как 
Формировать частоту с изменяющей- 
ся амплитудой. Если Вы сделаете 
програнну вывода звука по этому 
принципу, То Ваша програнма будет 


ЗВБЗЗНЕЗЕЕЯЯ 


1. - Изненение громкости. 
г. - изменение частоты: 


Рис. 6 


Работать нормально, Евинственный 
едостаток: зависимость частоты 
от ГРОНКОСТИ. Предположим, ‘залер- 

а залерхка 


нии громкости будет слышно только 
изменение частоты и лишь в о кояще 
булет слышно некоторое изменение 
ГРОМКОСТИ. 
Перейдем к более точному мето- 
ду. Чтобы частота сохранялась при 
гронкости, введем еще 
окин параметр: задержка для ‘со- 
хранения частоты (Ъ}. ве суть со- 
стоит в тон, чтобы расстояние ме- 
иду импульсами. (4) оставалось 
постянным, при изменении громкос- 
ти (а). Значит, 
некоторое максикальное значение 
{авах», откуда Ь = атах - а. 
Т.е. чем больше значение’ за- 


Х примеру, для затухания (а) 
уменьшается на ‘1, а. {Ъ) чувеличи- 
вается на 1 до тех пор,. пока 
(а)>1. При (а)=1 затухание оста- 
вавливается. 


Следующий вопрос: "Как сде- 
чтобы одновременно могли 
несколько ЗВУКОВЫЕ 


| | Представим себе некую сумму 
‘двух частот (рис. 8). здесь график 
Е - уменывающаяся частота, график 
1 - постоянная частота, а график 
$ - результирующая (сунмарная ча- 
истота). 

кахдый такой инпульс представ- 


| у первой и второй частоты 
{а} и (№) ногут отличаться. Спо- 
с06, предлагаемый на рис.Т здесь 
Гне проходит. Отрезок (<) между 
вимпульсани одной частоты превра- 
шается в счетчик, который опреде- 
[ляет: через сколько тактов должен 
|ирРоизойти ‘ИНПУЛЬС. ЭТОТ С10с0б 


мы должны взять. 


Е 

12, ВАБВ 
во 

А, 16 
{254}, А 
А, 42 

А 

57.53 
{254}, А 
А, за 


А 
12,34 


А, 0 ; 
А 


2. МАТ 
А, 16 
(251. А 
л, 6 

А 

НУ, 5ТОК 


{ВАЕВ+1), А 
А, 20 

А 
32, 55 
{254), А 
А, 0 

А, (254) 
31 

31 

#7, ЕТ 
ВЕЕР 


вс 


БЕ5ЗЗН5Б ЭБЕЗБЫВБ ЭНБЗУНЕЗЕСЫЕ 


А, (91.1+1) 


Продолжение пргранмы 4.“ 


Признак удара, 


:Уневьшение громкости в 


А ‚первом канале. 


‹ 2, КОЗ $ 
(+1). А 
А, (0811 +1) 


Соответствующее увеличение 
‚кониенсациовной задержки в первок 


А ; канале, 


(ОЕ). А ; 
А, (У2 +1) 
8 


{У2+1), А 
А, (РЕё +1) 


; Уменьшение громкости во 
А звтором канаде. у 


: и 
; Соответствующее увеличение 
‚компенсационной задержки во втором 


А ; каяале, 


(БЕГ? +1), А ; 


1 РИС. 8. 
вывода звуковой! частоты реализо- 
ван в программе 4. 

Еше одно вазное замечание: от- 
резок (аЪ) занимает 1/8 часть от- 
резка (<). Это необязательно при- 
нимать во внимание, но это обес- 
печивает вормальную регулировку 


192 


`ГРОМКОСТИ ПРИ более высокой час- 


тоте. А так как 256/8=32, то за- 
держка (аъ) принята равной 32. 


как работает програнна. В па-. 
няти с адрёса 31000 лежит массив’ 
данных. В каждом четном байте ле- 
хит эначевие частоты для т ` кава- 
ла, в нечетном - значение ноты т 
канала. Если номер ноты равен 0, 
то панные канала не инициируются. 
Если четный байт более 127 (уста- 
воваен. Т бит), то удар в барабав. ` 
Если четвый байт равен 255, то 
мелодия считается оконченной. ‘Ва-' 
ход из програмкы осуществляется 
также назатиен на любую клавиюу, ^ 


Звук барабана Форкируется про- 1 


доихительной установкой 1 на ки- 
наник и сброс затем. В. конце про- 
граммы подпрогранна РЕСУОЬ унень- 
тает значение грсикости обоих ка- 


или, наоборот, ‘с её ‘увеличением. 


ь В силу объективных причин так 
сложилось, что *ИНФОРКОМ” серьез- 
но не занимается аппаратными во- 
просами, связанными со "Спектру- 
мон”. Кстати, ведь каждый знаету 
что нельзя объять необъятное и 
как знать, Чтобы из нас получи- 
если бы мы начали зани- 


и, может быть’ и 2Х-РЕВЮ уже не 
было бы. р 
‚Но то, что мы этим вопросом ие 
завимаенся восе не означает, что 
ны его игнорируем. Наоборот, ‘мы 
Почень высоко ставим ‘эту проблену, 
просто’ ‘не чувствуем себя нмало- 
мальски конпетентнымки, чтобы са- 
мин писать на эту тему или давать 
какие-то рекомениации, И чем ме- 
ные ‘мы в этих вопросах разбира- 
Ценся. тем ценнеё для ‘нас каждое 
письмо, приходянее от наших’ чита- 
телей на эту тему. Особенно, если 
ЯВ Нем затрагиваются’ глубинные 
[проблемы стандартизации и обеспе- 
чения совместимости разных машин: 
Сегодня своими нысляни и поже- 


"тельная точка в проблене. 


Это 


|дело. И ны полагаем, 
читателям, 


что даже тен 
которые и не помышляют 


в какой 
| среде работают их коллеги, како- 
иво положение дел на сегодняшний 
Г день, 

|(С) Киселев д., 


Казань, 1993г; 


К ВОПРОСУ О СТАНДАРТИЗАЦИИ 


| В связи с сознанием Ассоциации 
Пользователей домашних конмпьюте- 
РОВ и Фонда ”ФЛОП" представляю 
Вашему вниманию мои соображения 
|0о поводу стандартизации дальней- 
|ших расширений к ПК `“Спектрун", 
не секрет, что многие системные 


|Ипрограннисты уже сейчас недоволь- 


созда- 
ние многочисленных режимов, ‘не 
существующих в стандартном. "Спек- 

фтруме 48К” м даже в “128+г”. 

В некоторых ноделях, таких как 
“Бадтика”, “АТМ” и "Пентагон про- 
|фи” даже были попытки внедрить оС 
СРИН (2Х-ревю 5,6-93 и “Радиолю- 
битель №4 за 1993 г.). Однако и 
|здесь наблюдается неразбериха в 


от внешнего ‘порта для  поль- 
зователя (программатор и т.д.) на 
'ВВ55 до Разных режимов графики и 
цвета. Даже на ПК "Орион-128", 
который недавно начал  развивать- 
ся, уже существует ‘стандартная 
‘таблица портов расширения ("Ра- 
дио". Н4, 1993 г.) Настала пора 
подумать о подобной таблице и для 
ИПК типа ”Сиектрун”. ‹ Я понимаю, 
что "Инфорком” аппаратными вопро- 
сами не занимается, однако \хоте- 
лось бы узнать о програмнных ‘ре- 
шениях этого вопроса. В частнос- 


ти; ` было бы интересно узнать о 
карте памяти и портах в таких 
ПЭВМ как "Таймекс 48 и 68" "Эн- 
терпрайз", “Анстрал 464" и им 
подобный (см. Примечание "Инфор- 
кома" в конце статьи). На западе 
ведь тоже дюди не только целыми 
днями в ”Эдиту” играют, но и пн- 
таются иногда сменить картриджи и 
приблизиться к более серьезной 
среде программирования. Неплохо 
было бы такхе услышать ннение 
специалистов по поводу удобства 
програнмирования и логической 
законченности подобных расширен 
ний. Сано собой разумеется, что в 
одном письме всех аспектов этой 
проблемы не отразить. поэтому ‚я 
повроскл бы вкратце ознакомить 
читателей с этин вопросом и пусть 
они высказутся и предложат свои 
решения. ‘Со своей стороны я ‘пре- 
плагаю в качестве затравки  стан- 
дартизацию следующих расширений, 


Во-первых, расширение паняти 
свыше 128К удобно адресовать че- 
рез ‘2 старших бита в систенном 
Порту 5Р128 (2Х-ревю 2/91). Таким 
образом ° можно адресовать до 
2^5«16К=512К 03У. Однако здесь 
встают по крайней мере 2  пробле- 
ны: 

1) Необходимо так пронумеро- 
вать страницы, чтобы пользователь 
мог нарашивать 03У постепенно: 
сначала `1 линейка РУ5 (я предла- 
гаю страницы 5,2,0 закрепить за 
ней, ‘а в качестве первой сделать 
страницу 4, но об этом ниже). да- 
лее при установке 2 линейки РУ5 
апресовать к ней’ остальные 4 
страницы, а ПРИ установке во г-ую 
линейку РУТ изменять только банки 
этих 4 страниц. 


2) Так как в режиме з20К будут 
существовать 4 страницы с номе- 
ром 7, необжодина договоренность 
об использорании только одного 
ЗСРЕЕН1 {2Х-ревю` 2/91) или нес- 
кольких, что потребует дополни- 
тельных условий для переключения. 
В любом случае следует достичь 
максимальной совместиности © 
режимом 128Кк. а также возможности 
легкой‘ доработки  копировтиков, 
такстовых редактоРов и т.д. на 
режим з2о0к, Все, кто ножет пред- 
ложить какое-нибудь решение, 
пусть напишет; о нен в “ИНФОРКОМ”. 

Теперь про теневую страницу. 
Номер 4 я выбрал потому, что по 
Физическим адресам ‘она является 
предыдущей к 5-й и нижние з2к 
переадресовывать не нужно. В те- 
невой странице можно размешать 
дон. экраны,  отладчики и даже 
альтернативные версии ПЗУ, будь 
то Бейсик-систена с 3-х скорост- 
ной загрузкой-выгрузкой, которой 
я пользуюсь, или ТВ-005. Эта воз- 
можность прекрасно реализована в 
ПК “Балтика”. Порт, расположенный 
по ТЕН может не только отключать 
ПЗУ, но и выбирать 4 разновиднос- 
ти экранного пространства, о чем 
будет рассказано ниже. 

К сожалению, при включенном ПЗУ 
отключается всякое обрашение‘ к 
этой странице, что затрудняет 
‘загрузку в нее. С помошью неболь- 


`гих растирений. 


шой доработки (нужно от эленента 
рзгхлл!). отключить 
733. е(ЛЕЧ выв.6) и | 
выход 033. {ЛЕД Выв. 8}) можно за- 
гружать любые данныё с ‘адреса| 
0600н с помошью стандартного за-| 
грузчика` в ПЗУ. способность запи- 
сывать данные в ОЗУ через 13| 
пригодится такхе и для нониторов 
и отладчиков, имеющих собственный! 
экран.в этой области. 

Кстати об экранах. В том хе’ ПК! 
“Балтика” реализовано 4 экрана, о| 
чен говорилось выше.’ Первый экран! 
- стандартный, расположен с адре-| 
са 4000. второй экран - такой же! 
по формату, но расположен с адре- 
са 20004 и ножет использоваться 
отдельным отладчикон, после этого 
экрана остается 2К на матрицы 
приФТОБ 1616. Третий и четвертый 
экраны заслухивают особого описа- 
ния, дело в том. Что при Форниро- 
вании адресов их атрибутов отклю-1 
чается частота, деляшая экран на 
24 знакоместа в столбце.и атрибу- 
ты адресуются так же, как и гра- 
Фика. | 

‚Таким простын фФокусон, который! 
легко сделать и на “Ленинграде” и} 
на “Пентагоне 48”... достигается! 
графика не только высокого графи-| 
ческого, но и цветного изображе-| 
ния (один байт пикселов на один! 
байт цвета). третий экран ‘распо-| 
ложен с`0600н, а четвертый с 
4000Н. Эти`4 экрана конмутируются! 
битани О и 1, а ПЗУ отключается| 
битом `Т порта ТЕН. Таким обра-| 
зом, еще ‘остается место для ‘дру- 


| 
Я предлагаю в качестве ‘стан-| 


дартного расширения экран с 2000н\ 
и экран высокого цветного разре-| 
шения с 4000Н, т.к. он позволяет! 
загружать стандартные картинки, а| 
атрибуты в крайнем случае можно! 
мли пересчитывать, или убирать! 
совсем. конечно, при этом будет! 
затрагиваться область буфера! 
принтера, но в этих областях "со-| 
рят" и многие Фирменные програн- 
ны. Наличие же загрухаеного “ПЗУ” | 
позволит сместить. эти области 
вверх и полностью рещить `пробле- | 
МУ. 

Конечно, найдутся люди. кото-| 
рые скажут: /- "зачем нам эти 12К 
графики, у нас ис 6к Слектрум не! 
успевает работать”. Однако, если 
стандартизировать также и турбо-| 
режим процессора, который кстати 
нохно прикрепить к олному из сво-| 
бодных битов порта ТЕН, то соот-| 
ношение '12К/7(8) ИВ2 будет дахже| 
лучше стандартного, да и проблена 
с "клэшингом” атрибутов почти ре- | 
шится. Остается, правда, вопрос о! 
тон. хватит ли быстродействия У| 
03У, но это уже проблема техноло- | 
гов, а не програнмистов. | 


Следующий вопрос, который по-| 
дымался на страницах *7%х-РЕВЮ“ - 
ЭТО ВОПРОС Стандартизации русско-| 
го шрифта. И если создать дов. | 
матрицы знаков и разместить их в] 
удобном месте - это не проблема, | 
то ПРИВЯЗКУ ‹ РУССКИХ. букв к ла-| 
тинским клавишам, а также ` вопрос! 
© выборе способа и кода переклю-| 
чения нельзя оставлять без внима- 
ния. Здесь я тоже един ий 


ни 


о 


+98 


[звретать велосипел, а пойти 
|навстречу рядовым пользователям - 
Псекретарям, писателям и машинист- 
кам. Достаточно взглянуть ва 
решение этой проблеим со стороны 
Фирмы ТМ. которая выпускает кла- 
виатуру именно в стандарте СМЕЕТ 
({ИЦУКЕН), а неё в стандарте СМЕБТУ 
(ЯВЕРТЫ), который нравится лишь 
| программистан-систеншикан. 


предложить ввести лпополнительные 
линии данных В порту клавиатуры 
|РЕН. ЭТО легко аппаратно реализу- 
емо м используется‘ в таких пк. 


|как "Оризон”. "оризон-микро”, 
*Нагик” {иэг. в г. Ижевске), 
|”Байт“, а также, вероятно. в Фир- 
менном 5Р128+2, где есть разъеи 
КЕУТРАГ. Нужно лишь стандартизи- - 


ровать определенную привязку этих 
|каавим к линиям адресов и внести 
небольшие изненения в ПЗУ. свя- 
йзанные также с кодами переключе- 
Йния РУСУГАТ, в качестве которых я 
предлагаю использовать коды 
102/03, которые в спектруме не 
писпользуются, а в АЗС1Е иненуются 
как начало и конец текста соот- 
ветственно. 

необходимо также подправить 
синтаксис БЕИСИКа, чтобы он не 
интерпретировал коды переключения 
ВНУТРИ чисел и т.п. Бирочем, мне 
будет интересно узнать и другие 
ннения по этону. поводу. 


й Следующая доработка не встре- 
'чалась мною ни в одном компьютере 
1и потому я рискяу назвать ее сво- 
пей собственной. Речь идет о рас- 
щирении музыкальных возмолностей 
|спектрума. Сегодвя существует 
множество программ, 
Имузыкальный процессор 8912(10) в 
рехине 48К. Может быть. они ис- 
пользуют также и порт динаника и 
записи на нагнитоФфон для инитации 
ударников, хотя я лично ‘Чаких о 
программы не слышал. „Во всяком 
|случае. я предвагаю использовать 
[этот порт для создания ритн-Фона 
!ы обрашаю ваше внимание. на сле- 
дующий Факт: в 8912110) сушеству- 
т 1(2) порта, которые предназна- 
чены дия обмена данными с внешни- 
ми устройствами и находятся вя?- 
три адресного пространства регис- 
тров 8912(10) и которые не ис- 
пользуются. к 

Я предлагаю поставить на порт 
№ (который есть на обоих процес- 
два 4-х разрядных цАНа, 


которые будут делить сигналы ди-. 


намика и магнитофона на 16  уров- 
ней, что дополнительно расширит 
диапазон музыкальных вознохностей 
Ик. конечно, ЦАП это слишком гРо- 
|ыко сказано, я имею в виду всего 
лимь известную В-2в цепочку. 
кстати, 16 уровней выходного сиг- 
|нала сполне достаточно (В крайнем 
случае можно сделать эти 16 уров- 
ней промежуточными мехду “0” и 
"1", т.е. получим "0" плюс еше 16 
уровней от +58 дог.!), т.к. 
891210) тоже имеет 16 уровней 
громкости и модуляции, во что я 
поверил только тогда, когда пПРо- 
чел его техническое описание. 

Нз ваписанного видно, что хе- 
лательно проводить комплексную 


ИСПОЛЬЗУЮЩИХ” 


стандартизацию расширений для на- 
иболее полного их использования: 
Теперь слово за остальными чита- 
телями. Вообще нужно активнее ра- 
ботать в этон направлении, чтобы 
потон не было нучительно больно 
за то, что нами любиные конпьюте- 
РЫ - это прыхок в будущее из по- 
запрошлого. А основными критери- 
ями для стандартизации я предла- 
гаю сделать в порядке важности 

1» мининальную несовмести- 
ность на програмнном уровне; 

2) удобство программирования. 
близость в адресном пространстве 
оДНОтТИйНЫХ УСТРОЙСТВ И РАасполо- 
хение “опасных” портов по четным 
адресан, меньшим 128; 

3) легкость аппаратной дора- 
ботки на наиболее распространен- 
ных моделяЕ. 


Внедрение этих’ доработок по- 
Зволиг ВСКОЛИЕНУТЬ необъятные 
програнмирующие укы наших Родин, 
которые наделают на них (конпью- 
тераЕ) такие крутые програмны, 
что на Западе (я надеюсь) люди 
начнут потихоньку собирать |: 
гарахах “СнГговские Спектруны”. 


иккинии нм иинииииимижиниии нихииии + 


КОМНЕНТАРИЙ "ИНФОРКОНа", 


Читатель поставил вопрос о 
тон, что ему интересен. подход за- 
рубежных производителей Пк "Эн- 
терирайз", “Амстрад-н64”;  "Тай- 
некс-2048” и “Тайнекс-2068”. Это 
ухе Вопрос по нашей части. Кое- 
какой инФорнацией мы расподагаем. 

Сразу‘ должны сказать, что опыт 
"Энтерпрайза". и ”Анстрада” наи 
нало пригодится, поскольку эти 
нашины по архитектуре сушественно 
отличаются от ”Спектруна”. несно- 
тря на то, что собраны на том же 
процессоре 2-80. То же можно ска- 
зать и о "Шарие" и о стандарте 
Н5Х% (“"Ямахка", `“Хит-Бит", ”Спек- 
травицео” и пр. }. Все эти машины 
{кроме м.6. ”Шарна”) уже при сво- 
ен “зачатии” планировались под 
работу в дисковой системе, чего 
нельзя сказать о “Спектруне", ›в 
котором ничего для этого не быпо 
сделано, и потому это скорее про- 
мезуточные прототипы для бодее 
поздних действительно интересных 
{по-своему} машин. И их. архитек- 
тура сейчас представляет скорее 
акаденический, чем практический 
интерес для наших условий. 

Совсем другое дело - "Тай- 
кекс". Эта Фирма долгое время (до 
1986 г.) работала по прямону за- 
казу Е. Синклера. Основная цель, 
стоявшая перед этими  нашинами 
была такая - "Обеспечить ‘проник- 
яовение ”Спектрума” на. американ- 
ский континент” (было ‘открыто 
представительство Синклера в 
Бостоне). Все-таки существовала 
спределенная разница мелду Евро- 
пейским и Анериканским рынкани. У 
американцев и требования к маши- 
нам покруче, да и звонкой ‘монеты 
в карманах всегда было побольше. 


` То, что эта цель достигнута не 


была, другой Вопрос, а вот как 
это делалось, нам действительно 
нохет быть интересно, ведь мы 
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‘ние в архитектуре. 


‚ изменения имело и базовое ПЗУ, 


тоже сейчас находимся в аналогич- 
ной позиции - обеспечиваен захват 
"Спектруном" рынка снг. 


Модель 2048 - почти полностью 
идентична стандартному “Спектру- 
ну”. Естественно, для американдев 
сделали красивый дизайн, дешевая, 
надежная и очень удобная клавиа- 
тура и сейчас может служить от-| 


ПИТАНИЯ! Но это нам ие так важно, 
важнее скорее то. чтф был приме- 
нен новый контродлер экрана - на 
нестандартной, специально для 
этого случая сделанной БИС - 
единственное значительное измене- 


Браголаря.ей, стало вознохный 
(теоретически) введение  доподни- 
тельных экранных режинов и вто- 
рого экрана, что делалось управ- 
лением по 255-ому порту. Практи- 
чески же, надо сказать, это нигде 
не использовалось. 

Переключение экранов выполия- 
лось командой ОШТ 255, 1 

Кроме того, ‘был введен ‘лдопол-| 
нительный экранный режим (54 
знака на аг вместо захгг). что 
исполяялось . командой ОПТ 255, р, 
где п - число, которое опредедяет 
цвет символов и Фона,. например. 
СИТ 255,62 - печать черным по 
белону. 

Появилась возможность реализа- 
ции цветной графики высокого раз- 


отводилось по 8. байтов атрибутов 
(внесто 1), т.е. в каждой линии: 
знакоместа можно было задавать 
свой цвет ТНК и свой двет РАРЕЮ; 
Эта возможность исполнялась 
команкой оут 255,2. 

Команда ОСТ 255,0 - возврат к 
стандартному "СпектруУмовскому” 
экрану. 

Никакой поддеряки в ПЗУ для 
этих нестандартных рехимов работы! 
не ‘было и они могли реализовь- 


в машинных  кодая. 


хивающее эти режимы такхе неиз- 
вестно. 


Существенный шагон по измене-| 
нию архитектуры компьютера была 
модель 2068. Она имела два встро- 
енных порта пхойстика, звуковой 
процессор ‘и тот че. оригинальный 
видеоконтроллер. Сушественные 


Злесь. действительно 
новая карта памяти, 
‘темные переменные и новые ы 
ввода/вывода, 


БЕЙСИК приобрел несколько но- 
вых команд: БЕЦЕТЕ. РЕЕЕ, 5Т1СЕ. 
ОК ЕВРО и 50080, 

команла РЕБЕТЕ позволяла уда- 
аЯТЬ СТРОКУ. ПО ее номеру иди 


аж 


например (РЕТЕТ ЕКЕЕ). 

команда 5Т1СЕ читала положение 
одного из двух дхойстиков: и рабо- 
тала аналогично команде. 1КЕТ $. 
Ее Форнат, напринер: 


РРАНТ. 5ТТСК. (в, п) 
Еф есаи интересует по- 
или в:2, если 
состояние кнопки 
{со- 
ах 


дая 


’/Как’и`в’"Тайнексе-г2048"^ ‘здесь 
вознохны те хе резины. управления 
экраном, тозе вознохно иметь два 
экрана или высокое разрешение 
атрибутов или 64 символа в экран- 
была‘ изненена 
карта памяти (звездочками отнече- 
ны участки, совпадающие со стан- 
они "Спектрумои"): 


Карта памяти с одним экраном. 


ныне ынння 


систенное ПЗУ. (*) 
Графический экран. `(#) 
Атрибуты, (9 

Буфер принтера. (=) 
Системные переменные. 
машинный стек. 


Диспетчер прикладных 
програмн в нашинных кодах. 


Код управления банками 
памяти. 


Блок перененных для при- 
клалных ‘програми в 
машинных кодах. 
Информация о каналах. 
БЕЙСИК- программа. ' 
Переменные БЕЙСИКа: 


Буфер редактируеной 
строки, 


Буфер ТМРИТ. 

Стек калькулятора. 

и Свободно. . 
Верхний предел БЕЙСИКа. 
Графика пользователя. 
‘Физический конец оЗу. 


‘как’видно из этой карты  памя- 
ти, во’ многом ее структура сов- 
адает ‘с ‘картой стандартного 
"спектруна”. в то хе время, вы- 
деление  зарезервированных 0б- 
; ‚блока 


изажинных кодах И блока маминноко- 
ДОВЫХ переменных, говорит о том, 
что ‘во-пёрвых, была попытка стан- 
дартизировать, программы’ пользо- 
вателя в кодах и, во-вторых,  по- 


видинону, предполагалось в дааь- 
нейшем надстраивать архитектуру 
компьютера, ‘оставив эти области 
неизменными для обеспечения сов- 
Нестиности с ‘ранее  выпуменным 
програминый обеспечением: 


переключение графических рехи- 
нов выполнялось теми 2е конандани 
ОТ, что и на Тайнексе-2045, но 
здесь это поддержано новой картой 
паняти и новыми систекными пере- 
ненными. 


“Карта памяти с ‘лвуня. экранами, 
осоон. В 
Системное ПЗУ. (*} 
4000н 
Графический экран-1. (*) 
5800н - 
АТРИбУТЫ-1. (#) 
5ВоОН 
Буфер принтера, {*) 
5СООН 
Систенные переменные. 
6соон ь 
Графический экран-2. 
АТРИБУТЫ - 2, 
твоон 
7 ”`Бжок переменных для при- 
кладных программ в 
машинных кодах. 
АЮ5НИЕ 
СНАК5 
Информапия о каналах. 


БЕЙСИК -програина, 
Переменные БЕИСика. 


Буфер редактируеной 
строки. 


Буфер ЛНРОТ, 

Стек калькулятора. 
Свободно. 

Веряний предел БЕЯСИКа. 
графика пользователя. 
Нащинный стек. 


диспетчер прикладных 
программ в нашинных кодах. 


Код управления банками 
памяти. 


Физический конец озу. 


Новые Порты 1/0. 

в Тайнексе- 2068 было  зацейст- 
вовано, несколько новых портов 
ввода/вывода для обслуживания 
во-первых двух дхойстиков и, во- 
вторых, для обслуживания мУзы- 
кального пролессора. - 


Управление музыкальным процес- 
соРОоН. осужествлялось командами 
ОТ по, портам РбН - регистр. дан- 
ных и Р5Н - индексный регистр. 
Сначала командой ОУТ по порту Е5Н 
подучем достуй К одному из’регис- 
ТРОВ музыкального процессора, а 
потон командой ОТ по порту РОН - 
вводим в него нужное число. 

для чтения джойстиков сначала 


ее 


‚со старых времен большие 


п ее 

вкаючался контроллер. конандой 
ОПТ Е5Н, БЕН , 

а затен их положение определялось 

анализом портов: 

у РОРЕН - левый 

РОРОН - правни, 


дополнительные возножности; 

Из-за существенных изменений в 
ПЗУ, в. системных переменных ив 
карте памяти стада проблематичной 
совместимость с програмнами, ва- 
нисаниими дпя’ фирменного ` "Спек- 
труна”. В принциие, эта совмести- 
мость возможна, но это скорее ‘ист 
ключение, чем правило. Для того, 
чтобы все-таки добиться полной 
совместимости, Фирма  ‘Тайиекс“ 
начала. выпускать дополвительные 
картриджи ПЗУ, для подключения 
которик конпьютер ‘ инеет специ» 
альный отгсек, 

После подключения ‘такого  кар- 
тридха. коильютер становится пол- 
ностью аналогичен Фирменному ва- 
рианту, сохраняя свои пополнит 
тельные возможности для тех, кто 
обращается к нин Через внешние 
ПОРТЫ Из машинного коза, 

дяя удобства пользователей на 
подобных картридлах выпускались и 
игровые и прикладные програмны, 
вапример текстовый редактор, ас 
учетон того, что американцы испы- 
тывали в то вреня явную восталь- 
гию но СР/УН, был выпущен и кар- 
тридх "Зебра", преврапающий кои- 
пьютер в СР/Н-совнестиную нашину. 

У наших программистов, 


работ в СРИИ тоже ивно ‘прослехи- 
вается ностальгия по этой систе- 
ме. И вообме. во-многом пути раз- 
вития могут быть схожи, Сейчас не 
хотелось бы делать выводы и реко- 
мендации, еше н6 время, но опыт 
предшественников может дать пиму 
для разнымления. . 


Едниственное, 
бы сказать тем, 
доработкани и 


что ножно было 

кто думает над 
станпартизацией. 
Спыт показывает; что это не долх- 
но быть самоцелью и ОБЯЗАТЕЛЬНО 
дОЛХНО БЫТЬ ПОДДЕРЖАНО ЭКОНОМИ- 
УЕСКИ, 

Пусть мы скахем. грубо. но пря- 
но. Вы. ножете быть альтруистон 
сколько хотите и можете делать 
какие угодно открытия просто за 
спасибо, из. любви к работе. Но 
что Вы придунали, ве 
даст другим людян заработать ни 
копейки, Ваше дело не прихивется. 


й наоборот. если Вы открываете 
НОБЫЙ ПУТЬ, 10 КОТОРОМУ ПОЙДУТ 
люди и увидят для себя з это 


вознохность не только поработать. 
во и ЗАРАБОТАТЬ, они подхватят, 
разовьют и увековечат Вашу идею и 
Вас вместе с ней. На этом постро- 
ен весь многолетний опыт К. син- 
клера. 

Он дал возможность развернуть- 
ся тысячан Фирм, выпускающим про- 
граимы и сотням Фирмы, 
периферию. Те сделали свой кази- 
тал, а его компьютер стал самым 
ПОПУЛЯРНЫМ в мире. То хе самое 
происходит и У Нас, 

врочем, последнее слово ‘оста- 
нется конечно за Вами, дорогие 
читатели и мы буден хдать Ваши 
письна и Ваше мнение. 


ее 
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вылускаюиый | 


| От редакции. 


| Представляя читателям эту ин- 
тересную авторскую работу, мы 
должны сказать несколько слов о 
|"спектруме", о нашен вэгляде на 
этот компьютер и вообще на "Син- 
|клеровское” движение в целон. 

| "Спектрум" занимает совершенно 
'особое место в деле компьютериза- 
йции нашей страны, Количество его 
|поклонников давно перевалило за 
миллионы. Это движение, если го- 
ворить честно, стало всенародным 
и’ уникальным. Уникальность его 
состоит в том, что огромная часть 
самого талантливого, способного и 
одаренного населения одной шестой 
| земного шара, не спрашиваясь ни 
|советов, ни разрешений у Высокого 
'НАЧАЛЬСТВА, сделала то, что ока- 
залось не под силу никаким госко- 
|митетан и институтам. `В ранках 
| скромных 48 килобайт кахлый день 
|во всех уголках страны решаются 


пинтересные проблемы, делаются 
настоящие открытия. 
| Отличительной чертой нашего 


|"синклериста"” стала необычайная 
ние к ее возможностям, Ни для 
|кого не секрет, что это маленькое 
чудо мохет очень многое из того, 
|что и предположить себе не могут 
ФИРМЫ, торгующие суперсоврененны- 


|ми 386-ыми и 486-ми 1ВН-совнести- 
мыми нашинами. Ны знаем множество 
способные 


примеров, когда Про- 


граннмисты, намаявшись за рабочий 


. день с 1ВМ-совнестиной техникой, 


приходят домой и отдыхают наедине 
< любиным “Спектрумон". Они ни на 
что его не променяют, 

Умение реализовать свои идеи, 
найти новые решения, сделать свой 
компьютер профессиональным, оста- 
ваясь в пределах 48 килобайт, 
дают. такой большой простор ДлЯ 
творчества и  саноутверхдения, 
какого не во всякон деле найдепь. 
Ны ножен воскитаться гигантскими 
прокатныни станани, довко рас- 
правляющинися с тоннами металла, 
но всегда будет в почете профес- 
сия ювелира, способного так обра- 
ботать несколько граммов, что они 
будут радовать глаз и вызывать 
всеобщее восхишение. 

Все это имеет непосредственное 
отнощение к данной статье. Астро- 
нонические ‹ расчеты достаточно. 
сложны, но это одна из тех облас- 
тей, ° в которых Ваш "Спектрум" 
снело ножет потягаться с гораздо 
более ношными потомками. Редакцию 
"7Х-РЕВЮ" особенно радуют такие 
натериалы, которые выводят эту 
машинку на новый уровень,  позно- 
пяют взять от него то, для чего 
она не предназначалась. 

Ны никогда не сталкивались © 
астрологией и были приятно обра- 
дованы тем Фактон, что это, как 
оказалось, не мертвая наука былых 
лет, а постоянно’ развивающееся 
учение и занимаются им люди серь- 


- ЧИТАТЕЛЬ - ЧИТАТЕЛЮ --—— 
езные. Они непрерывно растут, по- 


се редактирования ны вынесли в 


растете и вместе 
возможности Вашего ”Спектруна", 
то это то, что’ надо’- ‘основная 
цель *2х-РЕВЮ" достигнута! 

для тех же из Вас, кто захочет 
заняться этим делон основательно, 
эта статья сможет стать первой 
вешкой на длинном и ТРУДНОМ ПУТИ. 
ны далеки от мысли. что прочитав 
и разобрав ее, Вы сразу выйдете 
на некоторый достаточный уровень: 
Нет, это будет только началон. 
Ножет быть, даже трудным началон: 
вам еше предстоит узнать и понять 
очень и очень многое. Статья до- 
статочно. слохна для неподготов- 
ленного читателя, поэтому. кое- 
что, саное необходимое, в процес- 


отдельный комментарий в ее за- 
ключении. 

АВТОР статьи - Сергей крушин- 
ский. Он не является ни професси- 
ональным астрологом, ни проФесси- 
ональным программистов. И то'и 
пругое - хобби. По профессии он 
хурналист. В то же нреня, его 
программы по ‘астрологий у вас 
распространены не неньше, чем 
западные аналоги и, если Сергей 
достиг значительных успехов в 
своем ‘деле, то благодаря огромной 
любви к астрологии и, саное глав- 
ное; к своему ЗРЕССУ, ‘как он 
нехно называет "Спектрум". 


| ‹ Доводилось ли когда-нибудь 
читателю заглядывать в кабинет 
современного астролога? Если да, 
`о могу спорить: Первое, что бро- 
|силось в глаза, было не нагичес- 
йким кристаллен и не чучелом кро- 
|кодила. На самом почетном месте 
|светился дисплей! Как-то у моего 
знакомого, ‘считающегося ‘по праву 
одним из ведуших носковских ас- 
|трологов, сломался его’ "Коммо- 
дор”. “Такое чувство. словно вы- 
ключилось деное полушарие моего 
мозга", - жаловался он. Ничего 
удивительного. Я сам вспоминаю 
как кошиар возню с таблицами и 
|циркулен, длившуюся порой до по- 


ЛУНОЧИ Ради того, чтобы построить 
один-единственный гороскоп, а под 
Утро, напрягая взгляд, пытаешься 
его прочитать. . 

Дело решительным образон` из- 
ненилось после того, как я купил 
“Спектрум” и написал первую про- 
гранму - она стала делать за ме- 
НЯ “Грубую" работу. 


Что такое компьютерная астро- 
логия? Это эффективная работа с 
большим количеством информации, 
возможность экспериментировать и 
исследовать. чего только нет в 
современных астрологических про- 


гранмная, написанных для машин 
класса 184: базы данных, атласы 
нира, графика, статистическая об- 


Работка инфорнации... Даже самому 
отъявленному скептику небезынте- 
ресно взглянуть на 
распечатки, представляющие его 
персону с новой точки зрения. 
Ножет показаться, что "Спек- 
ТРУНУ" с его 48-ью килобайтани не 
под силу тягаться с куда бодее 
мошными компьютерани. Ничего по- 
добного. Даже если за дело возь- 
нется начинающий програмнист, не 
инеюмий понятия ни о чен, кроме 
стандартного Бейсика - каким я 
был г года назад, когда написал 
первую програнну, - ЗРЕССУ хватит 
на то, чтобы сделать по крайней 
мере самое важное, а именно: по- 


‘ кальное. Когда человек рождается, 


аккуратные ` 


СТРОИТЬ ГОРОСКОП рождения. 


Что такое гороскоп. 


АСТРОЛОГИЯ ПОКОИТСЯ НА аксио- 
не, согласно которой состояние 
нира в данном месте и в данный 
момент времени ‘есть нечто Ууни- 


он настолько восприимчив, что это 
состояние мира накладывает на не- 
го неповториный отпечаток, впо- 
следствии в большей или ‘меньшей 
степени определяющий его реакции, 
а также тип ситуаций, с’ которыми 
приходится сталкиваться. 

Самая большая роль отводится 
Солнцу, Луне и планетам Солнечной 
системы. Их расстановка - основа 
астрологического ‘ "сюжета" - ни- 
когда нё повторяется во всех под- 
Робностях, так же, как не повто- 
ряется ни одна шахматная партия. 

Сравните три рисунка. На них 
изображено по сути одно и то же: 
так называемая "небесная сфера”. 
Вторая картинка имеется в любом 
астрономическом учебнике. За ее 
разъяснениен ножете обратиться и 
в энциклопедию. А третья - тра- 
дИЦИоННЫЙй ГОРОСКОП. й 

Положение любого тела на не- 
бесной сфере определяется парой 
координат: долготой или угловым 
расстоянием от точки весеннего 
равноденствия до проекции тела на 
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Рис 1 


\ ЧИТАТЕЛЬ - ЧИТАТЕЛЮ 


| За. 28 39$>а АО 9$. 9 БНТ нивы 


ЭКЛИПТИКУ (*/1), и ШИРОТОЙ - Рас- 
стоянием "вверх“ или “вниз” от 
нее, со знаком "+" к Северко- 


полюсу эклиптики и ">" к Юж- 


это пояс созвездии, 
тянущийся вдоль эклинтики. (Ш 
нему совершают свой видимый путь 
Солнце, Луна и планеты. Астрологи 
делят его на {2 знаков по 30 гра- 
усов: Ояен, Телец, Близнецы и 
т, д. Начало Овна - точка весенне- 
го равноденствия. Астрологи гово- 
рят; "Нарс - 12 градусов Тельца“, 
а не "42 градуса”. хотя это то же 
саное. В ваше время знаки не со- 
впадают с одноименными созвездия- 
ми, к 

Другая система координат назы- 
вается экваториальной. В ней. две 
мерки - прямое восхождение и 
склонение. 

В астрологии есть еше 
понятие, как "дома”. Их, 
знаков, двенанцать, только 
чаются они путем деления не зоди- 
ака, а пространства вокруг. гори- 
зонта. Начало 1-го дона совпадает 
с точкой горизонта, где восходит 
Солнце. Если знак говорит о том, 
как проявляет себя ‘находящаяся в 
то дон - о сфере 
на которую это действует, 
Сами же планеты - символы опреде- 
ленных жизненных принципов. 

Солнце ‘- источник сил,  досто- 
инства, принцип власти: глава 
государства и “царь в голове“ 
(этот РЯд можно продолжать до 
бесконечности); Луна - инстинкты, 
привычки, чувства; Марс. - борьба, 
самоутверяиение, Венера - гармо- 
вия, любовь и т.п. Изучив псложе- 
ние планет в знаках, донах и’ уг- 
ловые расстояния мелду планетани, 
астролог пытается построить ха- 
рРактерный сюжет. 

...Итак, надо научить "Спек- 
трум" делать следующее: 

1) Рассчитывать эклиптические 
геоцентрические (*/2) координаты 

олнца, луны и планет; 

2) Определять границы домов в 
той же эклиптической систене ко- 
ординат и выводить результат на 
экран или принтер хотя 5ы в. виде 
таблилы. Впрочем, неста вполне 
хватит и нА ПРИЛИЧНЫЙ РИСУНОК. 


такое 
нак’и 
полу- 


Основой ‘для расчетов будут 
служить дата, время рождения и, 


кроме ‘того, географическая широта 
и долгота. Расснотрин ‘подробнее 
эти этапы. 


Основной расчет. 

Вначале определяется положение 
Солнца на эклиптике. Рассчитываем 
7Н (среднюю ‘аноналию), 2\ ‘истин- 
ную аномалию), 28 (радиус-век- 
тор). Затем довольно: простым спо- 
собом 51, дойготу Солнца. Широта 
его всегда равна нулю (*/з) . Две 
величины, полученные на’ данном 
этапе, 2 и ЕН надо сохранить как 
ЗВ и 5Н - они понадобятся в даль- 
неяшен. Чтобы найти положение 
планеты, необходимо: 

1) Рассчитать тем же способом, 
что и для Солнца, 2М, У, 20; 

г) Найти гелиоцентрическую ‘ми- 
РОТУ (1/4) и долготу планеты (7В 
и 21); ; 

3) используя полученные ранее 
величины, перейти к геоцентричес- 
ким координатам, 

Нестонахождение Луны’ опредля- 
ется совершенно особын спдсобон, 
для неё’ придется предусмотреть 
отдельный програмнный блок. Вмес- 
те с Луной будет рассчитываться и 
долгота лунного узла - точки, в 
КОТОРОЙ ЛУНА Пересекает’ эклипти- 
ку, двигаясь с Юга на Север. она 
важна для гороскопа, поскольку 
ГОВОРИТ © ТОМ, насколько гармони- 
чно личность вписывается в соци- 
ун. Все сказаяное можно проиляюс- 
трировать скеной (табл, 1): 

входом в этот биок процедур 
послужит перменная, ‹ выражающая 
искомый монент времени - Т и таб- 
лица, где содержатся характристи- 
ки орбит на некоторый известный 
номент, так называеную начальную 
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} 
& 
} 
: 


©\(- овен С - телек 
{1 - визнеы © “рак 
<). - лев 7 - дева 
$ - Весы 7 - Скорпиой 
>" - стрелец \ - козерог 
А - вололей  9-@ - Рыбы 


внешний круг - это пояс | 
Зодиака. Он делится на 12 знаков: 


внутреннее кольцо разделено на 
1г домов. Их тоже 12. Их отсчет 
начинается с линии горизонта 
{Асц-дсц) и нумеруются против 
часовой стрелки, как и знаки. 


В этом же кольце расположены 


солние () ‚ луна © и 
планеты: 

Неркурий о Венера © 
Варс Ст Юпитер 24 
Сатурн Я Уран У 
Нептун У Плутон Р. 
Кроме Того, Северный или 


Воскодяший лунный узел 62 


эпоху ТО. Их нетрудно пересчитать! 
на эпоху т. Выход - массив! 
А(2,1!), долгота и широта 10} 
небесных тел и Лунного узла. | 

Формулы, которые используются 
пля решения почти всех поставлен- 
ных здесь задач, - это классичес- 
кис Формулы небесной механики, 
основывающиеся на законах, откры- 
тых Иоганном Кеплерон. Снешно по- 


Таблица 1. 


Планеты (от 5=2 до 1=9) 


луна 


71. 7В 


А(, 1), 


А(, 2) А(10, 1), А{10,2) 
А(11,1) 
А(11, 2) =0 


думать, они умешаются в десяток 
Бейсик-строк. Есть, правда, ню- 
анс. Тела Солнечной системы влия- 
ют ДРУГ На друга, что нарушает в 
некоторой нере “правильность” их 
движения. В астрономии это назы- 
вается ”возмушенияни”. Сатурн, 
например, может оказаться в .с9- 
седнем градусе. Для достижения 
точности, на разных этапах расче- 
‘гов приходится вносить поправки, 
Чтобы вычислить положения пла- 
нет с точностью до угловой секун- 
ды, рекомендую такой алгоритн: 

а) отключить телефон, запереть 
дверь; 

5) выпить крепкого кофе; 

в) набирать тригононетрические 
выражения, страницу за страницей; 
вернуться к шагу 6). 

Выход из этого цикла надо пре- 
дусиотреть по одному из следующих 
условий: 

- если не хватило памяти ком- 
ипьютера; 

- ‘если 
истошение; 
- если последний убедился, что 
его старания бесполезны, т.к. все 
равно для 8-разрядного компьютера 
сверхвысокая точность недостижима 
{или достихина, но сверх-высокой 
ценой) ! 

К счастью, в астрологии, в от- 
личие от навигации, не требуется 
такая точность. ‘Плюс-минус 10 
Минут вполне достаточно. Поэтому 
надо будет всего лить внести на- 
ленькую поправку в гелиоцентри- 
ческую долготу Сатурна, Юпитера, 
а по желанию ‚и Нептуна и Урана. 
Эта точность будет почти неизмен- 
ной не только`для нашего стоае- 
тия, но и. скажем, для 16-го ве- 
ка. 


У программиста нервное 


| Календарь. 

Период Т говорит’ о том, сколь- 
ко столетий ‘проншю от начальной 
эпохи. Примем за начальную эпоху 
31 декабря 1889 г., 12 часов 00 
МИНУТ ПО ГРИНВИЧУ. Рассчитаем, 
сколько суток и долей суток | про- 
шло с этого момента. Цереведем 
их в столетия, поделив на 36525. 
Если наша дата приходится на один 
из прошлых веков, число будет от- 
рРицательным. 

Определение интервала в сутках 
- дело довольно хлопотное, если 
браться за него "в лоб”. Поэтому 
астрономы применяют так называе- 
ную систему юлианских дат. За 
точку отсчета взят средний грин- 
вичский полдень 1 января 47113 г. 
до н,э, В следующий полдень на- 
ступила юлианская дата 1, потом - 
2 и т.д. Таким образом, начальной 
эпохе соответствует ю. д. 2415020, 
а 1 Февраля 1965 г. 11: 9. 46 
мин. - 2438792. 99. Для определе- 
ния ю. д. существует формула: 


О=ТРОНС (365. 25кУ) + 
ТРОНС (30. 6001 * (№+1) + 
2+А+1720994. 5. 


Если месяц - январь или Фев- 
раль, то У-(год-1], И: (месяд+12). 
Иначе У-году, Н-месяцу. 


Р:-число+ (час по ГРИНВИЧУ 


+нин/60) /24 
А-0, если дата`дана по старому 
стилю. Иначе  Аза-Х+ТКОНС(х/4), 


где х-тТкоНС(У/100) 


Дальше просто:  вычитаем из 
ю. д. 2415020 - получается число 
суток от. начальной эпохи. Нехду 
прочим, в подавляющем большинстве 
програмн, занимающихся  определе- 
нием дня недели и биоритмов, ис- 
пользуется система юлианских дат. 
Так, если известна ю. д. в 0 часов 
по ГРИНВИЧУ, ТО НОМер дня недели: 

Ц: (+1. 5) НОР 7, 
0 - воскресение, 6 - суббота. 


никикникиииикиикииикниникикикикияк 
Примечание: Здесь мы применили 
две Функции - ТВС ) и НОВ, 
которых нет в стандартном Бейси- 
ке, хотя они имеются среди кодов 
калькулятора "Спектрума”, поэтому 
надо дать некоторые пояснения, 

Функция ТЕОНС выделяет целую 
часть дробного ‘числа. Дотошный 
читатель ножет предположить, что 
то же самое делает и стандартная 
Функция ТНТ, но это не ‘совсем 
так. Они совпадают только для 
положительных чисел, для отрица- 
тельных же они различаются. 

Дело в том, что НТ всегда 
округляет число "вниз", а ТРОМС - 
всегда округляет к "вулю”. 

Так, если число равно 3.14, то 
ТЕТ (3.14) = 3 ИТ (3.1 
тоже равно 3. С другой стороны, 
если число равно  -3.14, то 
ТИТ(-3. 14) : -4, а ТВУНС о (-3. 14) 
равно -3. 

Задать в стандартном БЕИСИКе 
Функцию ТВОНС можно так: 

ТЕР ЕН Т(Х} =56Н(Х) «ТНТ (АВ$ Х) 


Теперь Функция МОГ(Х, У) - это 
остаток от деления Х/У: 


РЕР ЕН Н(Х, У) = Х-У*1ЫТ(ХИУ). 


иикиниикиииккыиикккикииникникники 


Итак, понино блока с основными 
расчетами, в программу надо вкаю- 
чить календарные вычисления. На 
входе дата и время по Гринвичу, 
на выходе - Т (период) и о (юли- 
анская дата, ова может еше приго- 
диться}. 


Ввод исходных данные. 

Если не претендовать на очень 
ух товарный вид программы, то по- 
дойдет стандартное 1НРИТ. Обозна- 
чим данные, которые долины быть 
получены в результате так: УЕ, 
НО, РА, НО, М1, ТА, 10 - год; 
несяц; день; часы; минуты;  гра- 
дУСсы ШИРОТЫ (Положительное число, 
если она северная, отрицательное, 


`за 24 часа, 


градусы долготы (”+") 
к западу, к востоку, это (мо’| 
жет не соответствовать некоторым 
ставдартан, но так удобнее). | 

Слособ организации ввода, т.е; 
вводить ли поясное время, а потом! 
пересчитывать его в’ Гриивичское| 
или сразу последнее;. записывать 
долготу в виде градусов/минут или| 
в виде десятичной дроби, как вво“| 
дить для нее. знак - дело вкуса, 
главное - разобраться во'всем за- 
ранее, в противном. случае появят- | 
ся ошибки, которые трудно будет 
выловить. И. разумеется, = надой 
своевременно ‘сообщить пользовате- 
лю о выбранном формате. 

В англо-амёриканских програм- 
мах принято записывать не! 
"23:15". а! 14 4:35", затем "РИ", 151 
"после полудня”. Йотом ‘- номер! 
часового пояса › ("ТЕМЕ ^ ОКЕ"). 1 
{6 июня 1930` г. ‘почти на всей 
ТеРРИТОРИИ. бЫВШегО’ СССР. стрелки 
были переведены на 1 ч. 
что получило название 
время". Асс 1980-го дадеевуЕ |] 
летнее. Поэтому к номеру часового! 
пояса надо еще‘ прибавлять 1 или‘) 
часа. 

Координаты Носквы в: большинст- 
ве "фирменных" программ занисыва- 
ются так: 0371ЕЗ5 ; 55445 ("М | 
означает север, “Е”`- восток). 

Я вполне солидарен с  програм-| 
мистами; которые считают хорошим 
тоном проверять, не), ошибся ли} 
пользователь. Широта не может вы- 
ходить за пределы -90, +90 граду- 
сов. В феврале 1993 т. 28, ‘а не 
20 дней... Что еще хорошо ‘бы 
учесть? В санон начале я писал 01| 
домах гороскопа.“ Сегодня чаще 
всего применяют г системы: Плаци-| 
дуса и Кола, и в. том и в другом! 
случае при расчете идет в ход! 
тригонометрия. Так вот, если зат 
дана заполярная широта и одна из| 
этих систем. происходит остановка| 
с сообщениви "1НУЛЬТР АВСОНЕКТ”. 

Определить. сколько дней в 
любом месяше любого года ножно по 
формуле: | 


Х-28+АВ$ (1НЫТ(МО/8) - (НОоЛе-ТНтТАНОй 
2) ) жа) +2з5СМ (АВ (НО-г) } + (1-ЗСН‹ ( 
У/8-ТНТ (УЕ/4) ) «4 )) (1 Вов 
72) )} 


В тех хе фирменных программах, 
как правило, имеется банк данных, 
В КОТОРОМ хранятся во-первых инме- 
на и даты рождения клиентов, а, 
во-вторых, координаты городов. | 
Дисковая операционная  система| 
ТЕ-505 позволяет сделать. то же 
саное на "Спектруне”. 


Астрологические дона, 

ЕСЛИ ПОЛНЫЙ ОбОРОТ. ВОКРУГ СВО 
ей оси Земля совервает примерно 
то кажиые 1 минуты, 
или около того, над горизонтом 
ВОСХОДИТ НОВЫЙ ГРАДУС  ЭКЛИПТики. 
В астрологии этот участок называ- 
ется Аспендентом и считается од-| 
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асе = 
ним из самых важных Факторов го- 
`Проскона, пожалуй даже более вах- 
›|ным, чем сопнечный знак {© кото- 
.рром идет речь на последвих стра- 
ницах газет). ›Нримерно так хеме- 
няется кульминирующий градус или 
Середина неба (она, занимает самое 
высокое положение в небе по срав- 
‚увению с остальной частью эклийти- 
ки). Противоположные им точки на- 
‚Азываются "Десцендент” и ”основа- 
Ч ние неба”, а все вместе - “углами 
гороскопа”. Вот вкратне. их значе- 
ния: 


Асцендент - темперамент, внеш- 
ность, самооценка, самые харак- 
терные черты личности и. судьбы. .. 
вообще, по одному нему можно ска- 
зать очень многое о человеке, Вся 
'Пастрология, ебли угодно - не что 
как учение о больших и ма- 
Асцендент - это ‘на- 
чало (в этой точке. планеты восхо- 
дят, "ровдаются”), ‘а по началу 
любого цикла ножно спрогнозиро- 
вать его дальнейшее развитие. Еще 
его можно сравнить со оглавлением 
книги, где коротко указано, чего 
ют нее ждать. 

Середина Неба - Социальная ре- 
ализация личности, карьера, о5- 
Шщественное положение (здесь не- 
бесные тела кульминируют; Солнце 
пересекает это место в полдень, 
образно говоря, достигает расцве- 
та). С.Н. в решительнон, инициа- 
‘тивнон знаке Овна - человек готов 
идти на риск и борьбу, добиваясь 
профессионального успеха; в знаке 
Рыб - наоборот, пассивен. плывет 
по. течению, зато шансы нередко 
сами приходят к нему. в руки... 
Десцендент.- Говорит © ДРУГИХ 
людях (в противовес "Я" - Асцен- 
денту). с которыми приходится 
считаться. Прежде всего, это пар- 
еры: коллеги, супруг. 
основание. Неба - "источник": 
дительский дон, детство, рРоди- 
на. "семейное гнездо”. 


Асцендент - начало 1-го дома, 
©: Н.. = 4-го, Десцендент - 7-го, 
10-го. Границы остальных 
омов’ рассчитываются в разных си- 
по-разному. На протяжении 
г тысячелетий нашей эры одни сис- 
|темы уступали место другим. сего- 
дня широко известны несколько. 
любопытно, что одна из них при- 
, жит перу Иоганна Нолиториса 
де Кунигсберга (1436-1476), приз- 
нанного = математика, внесшего 
вклад в сферическую тригононет- 
рию. Его имя, как и псевдоним - 
Региононтанусе - говорит о чом, 
что родом он из нынешнего Кали- 
винграда. 
Другая. систена приписывается 
‚ г. камванелле... Я приведу систему 
Вальтера Коха {1895-1977). Счита- 
я, Что она особенно хорошо ра- 
ботает в сфере бытовых прогнозов. 
Расположение домов неодинаково 
не только в разное вреня, но и на 
разных широтах. Представьте себе 
апельсин, разрезанный наискосок’ 


ЧИТАТЕЛЬ - ЧИТАТЕЛЮ | 


От угла, под которым прошел нож, 
будет зависеть внешний вид содер- 
химого. Помимо МИРОТЫ и времени 
суток для решения. задачи надо 
знать еше период Т и наклон эк- 
липтики в эпоху Т (угол эпсилон, 
см. рис.2) Обозначим его ЕС. 


ЕС=23. 452292-1. 30125Е-О2иТт- 


1.6388889Е-ОбиТкТ+5. 0305556Е-ОТ, 


градусов. 


Сперва определяется прямое 
восхождение Небесного меридиана 
КАНС, затем прямое восхождение, 
пересчитывается в долготу (т.е. 
переходим от однои системы коор- 
динат к другой) - получается С. н. 
Находим асцендент. Наконеп, зная 
УГЛЫ". одну за другой рассчиты- 
ваем границы домов 11-го, 12-го, 
2-го и 3-го. Остальные дона рас- 
положены в ПРОТИвополохжных гРаду- 
сах. На выходе - нассив 

Н(1,.,12), дома. 


А. Г. Алексеев в одной из статей 
для "7Х-РЕВЮ" удачно назвал этим 
словом Фрагменты, которые повто- 
РЯюТСеЯ в Разных программах - с 
них удобно начинать. В мой *де- 
бют” входит несколько процедур: 


1. "ТЫТЕВУАГ”. 

В астрононических вычислениях 
часто приходится инеть дело с 
большими углами. Например, угол 
74, рассчитанный по стандартной 
Формуле, может оказаться равным 
29345.6712 градуса или 512. 17858 
радианам. Это то же саное, что 
185. 672 градуса или 3. 2405816 ра-: 
диан. Нало того, что последние 
два числа нагляднее. Бывают слу- 
чаи, когда вычисляя тригономет- 
рические Функции больших углов, 
калькулятор "Спектруна” ошибает- 
ся. 

Попробуйте, например, 

РЕТНТ $18 (512. 17858). 
Получится -. 098815626. 

Затем: 

РЕТНТ 51Н(3. 2405816). 
результат: - .098833433! 
Нежлу прочим, ТВН показывает: 
70, 0988334620170090. 


десяток таких ошибок, и ре- 
зультат окажется столь далеким от 
точного, что духи-управители пла- 
нет разгневаются на астролога, 
который ин воспользуется... Дабы 
избежать их немилости, предлагаю 
процедуру, которая приводит число 
А в интервал 0. - АМАХ: 


95 РЕМ: вход А-число, АМАХ- 
верхний предел 
96 БЕМ: Х-результат, 
У-локальная перененная 
100 ГЕТ У=ТИТ(АВБ (А) /АНАХ) «АМАХ 
110 ГЕТ Х-А-У* (А>=АНАХ) + (АНАХ+У} 
*(А<0): БЕМ: Слава Джорджу Булю! 
2120. ВЕТОЕЕ 


ое нана 
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г. "РОГУНОМЕ" 

Как Вы заметили, ряд Формул со-| 
держит ‘умножение ‘последователь-| 
ности чисел на степени временй| 
(Т). Процедуру для этого на Бей-| 
сике удобно оформить в виде Функ- 
ции пользователя: 


129 ВЕМ РОБУНОМЕ 
130 БЕР ЕН РА. В, С, Т) = 
А+Ти (В+СаТ} 


3. "АВСТАНСЕН5 (А/В) ” 
ПРИ использовании Функции АТН 


вестно, в ‘каком квадранте лежит! 
вычисленный угол. Его можно уста- 
новить по знакам А и %: 
139 БЕМ на входе А, В (радиа- 
ны), на выходе Х 
ТЕ НОТ В ТНЕН ТЕТ В-1Е-6: 
ВЕМ на случай, если В-=0 
150 ГЕТ У-АТЫ (А/В) 
160 БЕТ А-У+ (У<0) «РТ+ (А<О) «РТ 
170 ЬЕТ В=РТ+РТ: СО5УВ 100: 
ВЕН к пропедуре 1НТЕКУМ,, | 
которая вернет результат &$| 
180 БЕТОЕН 
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Кроме этих подпрограмм, Яя| 
включаю в "дебют" — объяваение! 
констант. | 


10 ВЕЗТОВЕ 9000 

20 КЕАО 2Е,. ОН, 16, К 

30 ГЕТ $5=Р1/К; ВЕН величина, 
блихающаяся к 1 радиану, 
переводить градусы в радианы и| 
наоборот, удобнее всего умно- | 
зать. и делить число на 5, а не] 
на (Р1/!180) 

40 ТЕТ Ка=К+К: ВЕМ 360 

50 ТЕТ Рё=РТ+РТ 

9000 РАТА 0, 1, 60, 180: ВЕМ кон- 

станты 


Этот ход значительно сокращает 
программу. Все же, из соображений! 
читаемости, я не буду использо- 1! 
вать константы в примерах. 


Неплохо было бы написать пРо- 
цедуры "дебрта” в кодах калькуля-| 
тора и разнестить их, например, в) 
ВЕМ-строках. Параметры  удобно| 
передавать туда через Функции! 
пользователя. (см.  ”"Эленентарная| 
графика", гл.3, или "Програмниро- | 
вание в машинных кодах и на язы- 
ке АССЕМБЛЕРа", ч. г, гл. 4.6). | 
Вопрос в ‘том, как возврашать в| 
Бейсик результат, он ведь находи- 
тся на стеке калькулятора в ин-| 
тегральнон представлении. Я знаю] 
несколько способов, увы, ни один 
из них не назовешь вполне изяш-| 
ным. Самый принитивный - завести 
особую переменную, допустим 0, 
затен написать на Ассемблере про- 
цедуру, которая будет искать в 
области Бейсик-переменных нашу © 
и переносить в отведенные ей 5] ` 
ячеек паняти 5 байт ‘с калькуля- 
торного стека. Пропедура, которую 
я привожу - это слегка измененная| 
программа ЕТО из. Н-3, 4 “7Х-РЕВЮ” 
за 1993 год (“Применение  ассемб-| 
лера для создания быстроработаю-| 


шух лрогламн' 


СА. РТН: ВЫЗОВ ПРОЦеЛУРЫ, КОТО 


рай имет адрес переменной и а #1) у 
понежает его в М. Дес. код ннемслика коментарий, Содержимое стека: 


15 НЬ после кода имени перё- Е 
мевной идут 5 байтов, туда и 6 ; Поскольку. будет“ исподьзоваться операдия! 
надо переместить 5 байтов со 10 2 В0А :">;*, надо водготонить регистр В; помес- 
стека калькуиятора. ;тив туда“ее код (10), Я 

ЕХ ПЕ, Н.; чтобы выполнить коная- | 239 изт гвн ; Включение калькулятора. В ох 
ду Ш. этот адрес должен | 192 _ зтоге но ;Сокраняен АНАХ в. ячейке Во 
быть в 9Е. г детеле. ги Удаляенлего со стека, ›' 

12 НЫ. (5С65}; теперь надо найти 193 зхоге 1 :Сокраняен Ав’ ячейке“ и! } 
начало стека’ калькулятора. по- да аъз АВА) Ни 
мешаем в НЬ содерхиное систем- | 224 геса!1 во ;Вызов АНАХ на стек 
ной нерененной ЭТКЕНО, Число 5 311146 ГАВЗ (А) /АНАХ 4 } 
находится в ячеках от (ЭТКЕНО) 58 4голсате } ТРОНС (АВЗ (АЗИАНАХ) х { 
=5 до (ЗТКЕВО) -1. 224 гесатт иво АМАХ, ТЕЗНС(АНЗ (А) ГАНАХ: и 

ЕС НЫ 4 1 1РЕУ ;АНАХЕТВОНС (АНБ (А) УАНАХ) =. 

РЕС Н. } 194. 51оге не У - в ячейку ма ^^. - у { 

БЕС НЫ * 225 геса11 м А: У и 

ЕС в, 39 аирузсаце А, А, У ь и о 

РЕС` НГ. ;теперь в Н!, - адрес пер- 224 гега1: но ТАНАХ, АА У 
зого байта искомого чисаа, 10 >= ;А.>- АНАХ ? резуаьтат: ©’ или ® 

Ир ВС.5 ;его даина - ‘5 байг. 226 ` геса!: на :У, [О иди 11, А, У. м 


; передаен его перененной. % ПАТЕЕРУ ; У (А>=АНАХ), А, М. 


3 зир1гасе : Ук (А>=АНАХ)-А, У 
56 епа`сатс } Выход из калькулятора. г 

ЕЕ поиск переменной. 5 ; Теперь надо ПОДГОТОВИТЬ Регистр в к 
Ьр НЫ, (5САВ};гадрес системной пе- 13 гр вор операции "<". 

рененной УАЕЗ. 239 вт езнН 
1 224 гесай! но гАМАХ на стек 4 
102  ^,54И; код буквы *0" 226 геса!1` на :У ва стек Я 
СР(НЬ) ; сравнение и выход, если 15 ааа ХАНАХ+У 

переменная найдена. Ее адрес 2г5 гесат №1 А на стек 

Ш: №: +60 сопз4 тего ;0 на стек 
ВЕТ 2 3 < АО. 
ВТТ 5, (Н.); Если 5-й бит в инени 4 Перу — $ (АМАХ+Т) * (А<О) у 

равен 0, то это либо массив, 15 ааа $ А-Ч* (АЗЕАНАХ) + (АМАКУИ) (А<О) - что и 

либо символьная строка, ; требовалось. . 
2 Н2, Ха; Следующие строки следу- |101‘ ехсапяе Лучше не’ оставлять на стеке “мусора”. 

ет пропустить. 2 аетее :В данной случае за результатом идет. диш- 
тис нЕ. \ нее число. оно удаляется. 
8:9] 56 еп4 са1с ;После чего - выход из процедуры; . 
тс нь. И : | ре на стеке.. хот 
по р, а) 201 ВЕТ 


АБР. На. ОЕ ы ы Вин, ь ы 
тс н. Объявить Функнию пользователя: * программы бопее-ненее ясна,  саное 
и) х! РЕЕ`РИ А(А, В,. ‚. } 958” адрес время порассуждать на эту тему, 


у вызывать ве; Не стоит торопиться, с ответом: 
хг р БЕТ Х=РН А(...} "конечно хе, в кодах”. Ивот по- 
ВЕТ 6, (\.} аналогичный способом Х здесь не ямеет ровно‘ викако- чену. При всех бесспорных преиму- 


проверяем, не является ли пе- го значения: ‘он показывает лишь  шествах - скорости, экономии па- 
ременная многосинвольной, па- содержимое регистровой пары ВС.  мяти, возможности создавать не- 
‚раметром цикла, наконец, если Важно то, что ответ содержится сстаняартные эффекты - дале отла- 
ни тен, ни другим - соответст в @%. | женная маминно-кодовая › програмиа 
вует ли ее имя "9". ’ останется как бы. замороженной: 
уе Нл, хз Читателям, не имевший опыта  Измевить о какие-либо детали’ еше 
18с не } работы с кальктляторон “Спектру- можно, но структуру;.. ‘легче пи- 
№р А, (НЫ) ма", предлагаю воспользоваться  сать заново, ‘чен резать по. жино- 
вт, вы) отлаженной процедурой ТЫТЕКУАЕ. НУ. Есаи че автор серьезно. инте- 
8 1. -6 Перед тен, как вызывать ве, надо ресуется астрологией, его. : 
12  рЕ,6 понестить параметры на калькуля- на предмет не стоят на месте. То 
АБО Н1., БЕ торный стек. Цервый паракетр па и цело возникает желание попробо- 
5 1 стеке (сверху) - АНАХ, следующий ‘вать новую методику или ‘изменить 
- число А (листинг 1). привычную. ‘То и дело говорвль, 
хз При вычислении У неплохо было ‘себе: "Бот этого я раньше‘ не Учи 
рВЕт т, о) ? бы воспользоваться конандой тывал, а‘надо бы”, 
8 1-10 поа/азу, = которой располагает Хочу подчеркнуть, структура, 
1 108,13 калькулятор, ‘но, к созалению, она которую я описал, подкодит для 
АО Н.Е не во всех случаях работает кор-  скрокной программы, не  претенду- 
д ректно. юшей на’ то, ‘чтобы удоваетворить 
р неслабые потребности профессио- 
КОНСТРУКЦИЯ ПОЛУЧИТСЯ такая: Ановогия Бейсика. } нального астродога. А\ методов, 
Е ПИ помимо гороскопа Роздения - хоть 
1. В БЕЙСИЕе: Вот и зашла речь © наболеваен ПРУД пруди... \ 
Объявить переменвую @ вопросе: на каком языке програн- Совершенствуещься  и- в ‘уневии 
^ МЕР 9=0 нировать? Теперь, когда структура решать вычислительные задачи... Я, 
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Например. совсем недавно узнал, 
как проше всего рассчитывать ор- 
фиту Плутона (это запутанный во- 
Прос в астрономии, поскольку Плу- 
тон быа открыт сравнительно нё- 
давно). И до сих пор не нашел 
‘иростого способа выполнять на 
восьмиразрядном ”Спектруме” нате- 
матические операции с . двойной 
как, например, в 
; задал “РЕРОВ, А-Т" - и 
все переменные от А до Т стано- 
вятся хислани с удвоенной разряд- 
|востью. Но рано или поздно, ведь, 
УЗнаю, быть может не без помощи 
*2х-РЕБО". Кстати. не занимался 
ли кто-нибудь из читателей этим 
вопросом? Не дунаю, чтобы это бы- 
120 архисложной задачей. В коннью- 
тере №5Х, построенном на` тон же 
процессоре 2-80, все числа по 
умолчанию 16-разрядные! Это очень 
пригодилось бы в календарных рас- 
четах (9-я пифра в юлианской дате 
не обязательна, но ее присутствие 
повысило бы точность}. 
вше один "минус" кодовой 
программы: нониторы-отладчики, по 
крайней мере, те, что мне извест- 
ны, не “берут” кодов  калькулято- 
та. ‘Попробуйте сани и увилите 
‘`акую Фантсанагорию! Дабы ’умень- 
шить мучения, мне пришлось делать 
|смециальный отладчик; он позволял 
писать мненоникани и накро-конан- 
дами, переводил числа в упакован- 
ную Форну - вобщем, выполнил вся- 
кую рутину, но при всем этом был 
'лишен удобств пакета СЕНЗ/НМОН$. 
Й|другое дело, игра - там калькуля- 
тор используется не. так часто, 
задачи иные. а потому и подход не 
тот. у 
Недостатки стандартного | 
ка общеизвествы. Ладно, пускай, 
увычисления. Хуже То, Что ради 
экономии памяти приходится идти 
ва уловки, делающие порой про- 
Грамму нечитаемой — Отсутствуют 
некоторые команды, очень полезные 
щля создания хорошей структуры, 
| типа ОЖ... СОТО. Зато  спектрунов- 
ский БЕИСИК один из саных демо- 
|кратичных. Как-то я попробовал на 
пихонском компьютере М5Х написать 
нечто вроде: 
СО5УВ‹УА1," 1000" АНО Х=5СЫ РТ) + 
{УА1,"2000" АНО ХЕВТЯ). 
Беднягу, кажется, стошнило... 


| ЕСТЬ ли другие варианты?. Пер- 
вое, что приходит в. голову - ПАС- 
ЖАЛЬ. Однако, повозившись недель- 
КУ-другую с версией Фирмы Н150#\, 
приходишь к выводу, что авторы ее 
заботились в первую. очередь о 
том, как облегчить себе жизнь. 
Вешественные числа там имеют все- 
го 6 значаших цифр (*/5). Чтобы 
получить результат ‘такой же точ- 
ный. как на БЕЙСИКе, приходится 
проделывать разные арифметические 
трюки. Из-за этого и по другим 
причинам катастрофически не хва- 
тает памяти. Нет полной ясности 


ЧИТАТЕЛЬ`- ЧИТАТЕЛЮ 
относительно того, как Паскаль 
взаинодействует 


распространенные руководства го- 
ВОРЯТ 0б этом крайне скупо. Так 


что далеко`не все нашинно-кодовые ‘ 


фрагиенты, — которые пытаешься 
вставить в програнму, используя 
оператор 1ИЫЛНЕ - особенно, если 
в них есть обращения к ПЗУ, дают 
охидаемые результаты, 

Програнму написать мозно. в 
этом я убедился. работать она 6у- 
дет исключительно быстро. Читать 
ее текст и отлаживать - одно удо- 
вольствие - ПАСКАЛЬ есть ПАСКАЛЬ. 
Но считать она будет максимум в 
рамках двух столетий, делать смо- 
зет очень ненногое... и никаких 
красот. Ножет быть, есть смыса 
сделать на Паскале графический 
табедь-календарь, показывающий, 
как планеты движутся в течение, 
скажем, заданного месяца - благо, 
разрешение экрана не настолько 
высоко, чтобы на графике быаи 
видны минуты, зато важно, чтобы 
расчеты выполнялись быстро. 

С другой стороны, ничуть не 
худшего эффекта ножно добиться с 
поношь» ТОВОЗ-РР, похалуй  ещин- 
ственного из Бейсик-конпиляторов, 
который оправдывает надежды, С 
вин пришлось немало повозиться. 
Часть того, что о нен написано - 
не только'в "таблоидных" инструк- 
диях. но и\в такой серьезной кни- 
ге, как "диалекты Бейсика для 
7\-5РЕСТКОМ" - оказалось неточ- 
ным. А кое о чем важном тан вооб- 
ще не сказано. Наприкер, о том, 
что объектный код является рело- 
цируенын. Несмотря на то, что не- 
посредственно после компиляции он 
распопагается с адреса 24000, его 
нохно загрулать и запускать с 
другого адреса - скажем, с 25000, 
расположив нихе собственные кодо- 
вые подпрогранмы. лить’ бы он не 
затирал рабочие процедуры и стек 
компилятора. 

Напомню, что для конниляции 
бойьших програни в ТОВОЗе преду- 
снотрен рехин “компиляции с уни- 
чтолением исходного текста". ока- 
залось. этот режим не работает с 
дисковой системной, которая сдви- 
гает БЕЙСИК вверх. Так что прихо- 
дится инициализировать стандарт- 


ную  5ЛЕСЬАТЕ-СсиСстему страшной 
. командой ВАНООНТСЕ 458 0, загру- 
хать с ленты компилятор и исход- 
вый текст. компилировать. записыь- 


вать полученный объектный код на 
ленту, потом загружать его с лен- 
ты в новый адрес и только после 
этого переписывать на диск (н/б). 

Удовольствия надо. Тен не не- 
нее, нне удалось откомпилировать 
такии образон довольно. объемную 
программу. включавиую помимо рас- 
четов»еще и графику, сервис, раз- 
ные виды таблиц - большую часть 
того, что необходино профессио- 
нальному астрологу - и знакогене- 
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с систекой яя 


печатающий 60 символов в 
Больше ‘всего’ поразила» 
скорость. Хотите ' верьте. хотите 
нет, ‘она быва почти такой же, как 
У програмны “РЕТМА”, написанной 
Б. Богдановым дия ТЕН на ТУрбо-| 
Паскале! ] 
Однако. увы. за все . приходится 
платить. Недостаток 'Г0805а - по- 
ниженная точность расчетов (он 
работает с Т-эначными числами}; | 
паняти, несмотря па все, он’ съе- 
дает много: хочешь добавить в} 
программу какой-нибудь милый пус- 
тячок - не тут-то было... 
Варнант, который ‘ине кажется 
почти идеальным для неконмерчес- 
кой астродогической програины - 
это БЕТА-БЕИСЕК. О его праиму- 
шествах было. достаточно написазой 
в "2Х-РЕВЮ". Он как будто нарочно 
создая для подобных програмы. | 
Позже пойдет речь 06 уравнении) 
Кеплера. Оно очень красиво ввисы- 
вается в СТРУКТУРУ 10... ЧИТИ.. 
оператор о1.., с050В в паре 
просто необкодии. 
Со5Е,  знакогенератор 8/1 пиксе- 
лов, возмохность гибко ‘нанипули- 
ровать сеткой графических коорди- 
нат; окна - Все это помогает `ва- 
гаядно идлюстрировать результаты. 


ратор, 
строке. 


Параметры орбит. 

Я 7;ё писал, что пля расчета 
координат небесных ‘тел’ нужно 
знать во-первых. период Т, а во- 
ВТОРЫХ, параметры их орбит в на-}. 
чашьную эпоху 70. для каздой из. 
планет таких параметров 6: сред- 
няя  аломалия, эксцентриситет, 
большая полуось, долгота периге- 
лия, долгота восходямего узда и 
наклон орбиты. Обозначин их пе- 
рененнымни 2, 7, ТА, 7%, 29, 21.1 
допустим, дата у нас 24 июня 
1978 г. Время - 0 ч. по Гринвич?. | 
Тогда юлианская’ дата: 


Л):244 3683. 5. а 
Т: (2443683. 5-2415020)/356525 = 
0. 784715385, 


Найден среднюю акомалию 7М для 
Неркурия. В таблице даны три чис-} 
ла: \ р 

102. 21938, 
1494тг, 52, 
ТЕ-6. 
обозначин их Х1, Ка, ХЗ. 
М =. Х1+Х2ит+хЗитеТ р 
(или РЕ Р(Х1, Ха, ХЗ, Т) ) =11 7402. 91 
градусов = 42.91004 градусов = 
0, 74892085 ралиан. Точно так хе 
находим остальные значения. 1 
Все ведичизы, кроме 7А (астро- 
номические единицы) и ТЕ нужно! 
перевести в радианы! 
поскольку каждая орбита пред-| 
ставаяет собой  залипс, данные 
параметры описывают иненно эту 
геометрическую Фигуру, а `такхе ее 
положение относительно орбиты 
Земли. 


Подозения, соинда и планет. 
Средняя аномалия 7 показыва- 
ет, где бы находилась плавета, 
если бы она двигалась равномерно 
}00 кругу. Зная ее и эксцентриси- 
тет эйлниса, можно найти эксцен- 
| трическую аномалию Ел М. истинную 
аномалию 2\, т.е. перенести пла- 
нету на эллипс. для определения 
А служит уравнение Кеплера: 
ЕА-ТЕЗЗТЕЦЕА) 7М. } 
Оочевадно, резить его не так-то 
просто. Но компьютеру все  нишо- 
зен: Вот как это делается. 


197 ВЕИ НЕ,101 

1198 РЕМ : 

199 РЕМ Уравнение кеплера, На 
входе 2Е,7М. На выходе ЕА 

200 [ЕТ ЕА-ТН: РЕМ начальное 
значение БА 

202 1ЕТ ЕРЗЗЕОН-1Н-6: КЕМ зада- 

} ем точность 

205 БЕШМ начало цикла 

6210 ВЕТ БЕБТА-ЕА-2ЖЕЗТН(ЕА -29: 
ИЕМ невязка, 

1220 БЕТ ЕА-ЕА-РЕМТАИ (1-2Е® 
С054ЕА)}: ВЕМ очередное зна- 
чение ЕЛ ‘ 

230 1Е АВЗ(РЕТА)>ЕРЗЧЬОН ТНЕН 
СОТО 210: РЕН к началу цикла, 
если не достигяута требуемая 
точность 


А вот как то хе самое выглядит 

в кодах калькуаятора (к моменту 

Звызова этой процедуры на вершине 

калькуляторного стека должно 

фнахолиться 7, за ним - 7Е. Сана 
процедура ноет быть расположена. 

в любом месте оперативной паия- 

ти), Си. листинг-г. 

Теперь можно найти’ истинную 
аномалию 7У: 

235 ВЕМ истинная аномалия. на 
входе БА, 2Е, ТА (большая 
полуось). 

0240 ГЕТ А=САиЗТИ(ЕА) «508 (1-7ЕХЕ) 

250 ТЕТ В=74я (С0$ (ЕА) -2Е} 

250 СОБУВ 140: ВЕН к процедуре 
АЮСТАЕСЕН5 

ТО ЪЕТ. 2У=Х 


Затем радиус-вектор, 78: 


|215 ВЕМ радиус-вектор. На входе 
2А. ЕА, 2Е 
1280 БТ В=2А* (1-7Е*С05 (ЕА) ) 


й Таким образом, величины 78, 7У 
найдены, что и было намечено в 
‚первоначальной схеме. на этон 
исяжно было бы и ‘закончить подпро- 
Грамму НЕГтО!. Однако, здесь хе 
зудобнее вычислить еше одну проме- 
хуточную веаичину. используя оче- 

редной паранетр орбиты. ня 
ее 20. 


1290 БЕТ А=2У+24: ТЕТ АНАХ=РТ+РТ 

1300 60505 100: РЕМ к процедуре 
ТЫТЕРУАЕ, 

310 БЕТ 20-Х 1 

320 ВЕТОВН: ВЕН конец подпро- 
грамны НЕГО 


циеновика 


ятави 
195 з1оге Н3 
195 зфоге на 
: езсвапае 
197 зфоге и5 


|. деле+е ‚Удаляея верхнее число со стека. 
{Это начало цякла. Е 
49 Фир11са%е ‚Копирование перщиеы стека. 
229 геса11 №5. ;Вызываен 2Е 
1 ехсвашие ‚Теперь стек вягаядкт так: ЕЛ, 2Е. ЕА_ 
31 зап ЗИ(ЕА), ТЕ; ЕА у 
.4 вру ЯЕжЗЧТ(ЕА). ЕЛА 
$ заъегаса ЕА-ИЕЮ ЗА (ВА) 
225 геса11 54 ;вызываем 2 , 
3 заъ\гасе БА-2Екз10(ЕА)-2М, т.е. невязка ОЕГТА, 
49. пр! 1саче ТОЕЫТА, БЫТА. ^^ й 
161 сойз& опе 21, РЕБТА, ФЕТА ' 
ггт геса11 Н3 :ЕА на стек 
зг соз } СОЗ(ЕА) 
229 геса!1 #5 ЛЕ ва стек 
. 8 вру } ©03 (ЕА} "Е 
3 зиъегаса $1-С03(ЕА) ДЕ, РЕГТА. ОЕГТА 
5 а1у1ае :РЕБТА/ (1-со3(ЕА) «7Е), РЕГТА 
ггт гесат1 из ;ЕА на, стек 
1 ‚ ежсвапае : 
СА звегась :ЕА ммнус последний результат. Нолучено 
очередное значение ЕА у 
195 залоге н3 : сохраняен его в 3-и ячейке 
1 ехсванае _зменяем местами ЕА и БЫЛА , 
42 аз г аъз (БЕТА) 
52 ;Это ввод 
221 у ; чисаа 
6 | $1Е-6 в упакованной Форне 
55 ; (допустимая 
189 ;‚ величина 
5 ; невязки) 
з зцыгас& ; аъз (РЕБТА) -1Е-6 
55 #%{ 2его ;>0? 


Зишр 1гае-31 


55 е08 са1с. 
ВЕТ 


Боинентарии 


:Вкп. калькулитога 

‚Начальное значение БА, т.е. 2 - 
:8 3-ю ячейку памяти’ 

128 в 4-2 ячейку. . 

зНеняем местани 7 и 2Е 

$75 в 5-ь ячейку 


Если да, 
;Выключение калькулятора, 
‚результат на вершине стека. 


то переход к началу цикла 


Дозготу Солнца (51) найти `те- 
перь просто, В случае с ним 70 - 
зто долгота  Земаи. Так что 
51.:20+РТ. Полученную ‘величину 
надо "прогнать" через процедуру 
1НТЕВУАГ. С паанетани сложнее. 
вот как выгаядит расчет для них. 


3г1 вЕм НЕТТО 

322 ВЕМ гелиоцентрические коорди- 
наты планет. 

323 ВЕН на. входе 20,721,2, на 
выходе `71.. 2В - гелиоц. широта 
и долгота 

Зея КЕМ 

325 КЕМ ини 21, 

3350 БЕТ А-С05 (71) и5 18 (70): ВЕТ 
В-С05 (20) 


` 340 60508 140: ВЕМ к процедуре 


АБСТАНСЕЕ$ 
350 ЕТ А-Х+20: БЕТ АМАХ=РТ+РТ 
360 СОБУВ 100: ВЕМ к процедуре 
ТЫТЕРУАЕ 
370 ТЕТ .=Х 


389 ВЕТ В: АБН ТВСЛ н 
390 ВЕТУЕН 


395 ЛЕЙ СЕОСЕНТЕТС 

396 КЕМ переход от гепио- к гео- 
центрическим додготе и широте 
(1.5, БА) 

397 ВЕЙ на входе: ТЕ, 71. 28, а 


такхе 58, 31 - радиус-вектор 
я долгота Солица. ` 
398 РЕМ 2, А, М, С, Н, О- 40- 
кальные переменные } 
399 КЕЙ 


800 ТЕТ АЗТЬ-Я ЕТ и: СА В. 
БЕТ СЕ2ВЗТНСЯВ» 

410 ГЕТ Н-ИЕ5Та(А): 
БЕТ 2=Н=Со5 (А) +50 

415 ВЕМ ники 1О 

420 ГЕФ А-Н: БЕТ В-0: бовиВ 140: й 
ЕЕЙ АВСТАНСЕКЗ | 

425 ЦЕТ А-Х+5Ы: РЕГ ВЕРЕ +РТ: 
СОЗОВ 100: КЕМ ТИТЕЕУАЕ 

830 ВЕТ Ъ0=Х # 

435 ВЕМ вии расстбяние от Зенли 


20? _ 


440 ГЕТ 2-50 (ВэН+0=0+С ис) 
|445 ВЕМ изжрА 

450 ТЕТ А-АЗН СВУ Ри ЗТИ( В) } 
460 ВЕТОРН 


Осталось перевести 10 и 1А из 


Радиан в градусы м передать нас-._ 


сиву А‹). 
Луна. 


ть ы 
Вместе с Сольцен и Асценден- 
том, Луна - важнейтий показатель 
в любом гороскопе, а в женском 
часто самый главпый, — достаточно 
вспомнить, с чем она’ связывалась 
в представлениях разных народов, 
чтобы понять ее значение в астро- 
огии. ‘В древних религиях ее по- 
читали, как’ богиню зачатия и ма- 
‘теривства. Если Солнце - актив- 
`50е, мужское начало, то Луна - 
авновешивающая его пассивная, 
земская сторона природы, — ин- 
стинкт самосохранения. чувства. . 
Известно, что лунные циклы ока- 
зывзают влияные на многие процессы 
в хивотном и растительном мире, 
Два здоровье человека. — древние 
славяне лечились, выполнзли зем- 
ледедьческие работы и даже солили 
капусту сообразно с определенными 
Фазани ЛУнч. 

Луна движется через Зодиак бы- 
стро, проходя полный круг за не- 
сям, а один знак - принерно за 
двое суток. Точио вычислить ве 
водохевяе в задавный момент вре- 
мени непросто - слишкон много Фа- 
КТоРОов приходится Учитывать. На 
каздок магу ‘надо вносить поправ- 

\1кя. Цепиком все занинает пару 
страниц. Тем, кто желает 
вычислить пололение ЛУНЫ с точ- 
Чвостью до минуты, = реконендую 
(обратиться к книге Х. Нееса *Ас- 
утрононические Формулы дая кайьку- 
ПиЯтоРов", Здесь же приведу упро- 
'меннзй расчет, занимающий немного 
Меньше ‘места и` даювий точность 
|олюс-Нинус 10 минут дуги. это не 
зак страшно. как нохет показаться 
ва первый взгляд - ведь видимый 
диск Луны “растяяут" на целых 30 
мннУт. подученная зе долгота 
указывает водожение пентра ниска. 


495 ВЕН НООН 
496 ЗЕМ на вкоде Т, Л». 51, зн. ва 
выходе Х, 1,70 - долгота; / 
широта ЛУНЫ и долгота ЛУННОГО 
узла й 
498 ВЕН С.В - вспомогательные 
локальные переменные 
1499 КЕМ парайетры орбиты 
500 ТЕТ 0-.0-2415020: ВЕН число 
„дней. прошедших от. начальной 
эпохи . 
1505 РН Р(5); ВЕМ дая поправок 
510 БЕТ 2Ё:210. 834164 +0513. 115397 
В ‹ВЕМ средняя долгота 
520 ТЕГ 2№-334. 32956+0к0, 11140408 
` ; ВМ долгота перигея 
530 ГЕТ 2И:21.-2М: ВЕМ средняя 
‘аномалия 


ЭЗОБЕТ 20:259, 18328-Р*о. 052953922: 


ВЕН долгота узла 
543 ТЕТ 21-5. 145396: 
орбиты _ 


ВЕИ наклоя 


0.5. 


| ЧИТАТЕЛЬ — ЧИТАТЕЛЬ 
545 вкя приведение параметров. в 
интервал 0... 360 я перевод в 


ни {21/180} 


620 2 (2)-0, 1858*514 (380 

630 Р(3) =0. ЗТЬ51Н (58) 

640 ТЕТ 2Н-2Н+(Р(1)-Р(2)-Р(3)) 
(21/180) 

650 ТЕТ Р(а}-5. 2686%515 {720 

660 ГЕТ Р(5} :0. 214=51(Н+7М) 

670 ЦЕТ 21-71.+ (211) +2 (4) -Р(2) + 
Р (5) (21/180) 

680 ЕТ 21.-21.+0. б58ЗЖ5ТН(а (1. 
51) в {РТИ 80} 

690 ТЕТ 20-29-0. 165518 (58) * 
(21/180) 

700 [ЕТ С-71.-79 

105 ВЕН «з«долгота 

710 БЕТ А:51Н(С) ®С03 {71 ): 
ГЕТ В=605(5) 

720 60508 140: РЕЯ АРСТАЕСЕН 
725 БЕТ А:Х+20: ТЕТ АБАХ:РЕ+РЕ: 
60508 100: ВЕН ТНТЕВУАЕ 

730 ВЕМ «из широта 

740 [ЕТ У-АЗЯ {518 (С) &5ТН (СГ) 

750 ТЕТ Х=Х/(Р1/180): ЕТ У-Ч/ 
(РТ/180): ЛЕТ 29:20/ (РТ/180) 

760 РЕТОЕН 


ЦЕТ 
580 ЕТ А-29: 60508 100; 
`ЪЕТ 29=Ха (РТ/180) 
590 ТЕТ 21-71* (Р1/1 801 
595 ВЕМ расчет основных поправок 
600 БЕТ С=2.-8Ь 
610 ЕТ Р(1) 1. 273951 (С+*С-Н) 
ЕТ 
БЕТ 


Разумеется, вместо (Р1/180) 
луче использовать константу 5, 
которая равна 1. 7453292Е-2, т.е. 
приблизительно { радиану. А. нас- 
сив Р(5} объявить в  начаде про- 
тракны. 


Поправки на вознушения. 


планетных орбит. 


Вольше всего отконяются от. 


правильного в геонетрическов смы- 
сае двимения Сатурн и Юиитер, к 
нх среднии долготам (21; надо 
прибавить: 

Лля Юпитера: 
(40. 3314-0, 0105нР{1} ) 5ТЕ(Р (4) - 
0, 0634 =Р (1) =С05 (Р (4) } ) ® (РГ/1 80) 


для Сатурна: 
{ (0. 1609*Р {1} -0. 01051 *С05(Р(4) ) + 
(0. 0182=Р(1) +0, 8142) "ТН (РА) ) - 
0. {388 +514 (Р{5) ) 0. 0408 =5ТН(Р(5) + 
Р(3)› +0. 0856:5111Р(5} )*С05 (Р(3) ) + 
0, 081305 (Р(5} ) =518(Р(3))) 
я (РГ/1 80), 
где: 
2(1):1/5+0. 1 
Р(2) = (237. 37555+3034. 9061 1) « 
(21/180) | 
Р(3): (265. 91650+1222. 1139=Т) и 
(21/180) 
Р(4)-5*Рр(3) -2=Р(2) 
Р(5):Р{3) -Р{2} 
как всегда, полученные везичи- 
вы лучше привести в интервал 
Рид. 


203 


Расчет астрологических донов 


орон 


по системе В. коха. 


— 885 РЕ 


88% КЕМ ЕОСН` НОПЗЕЗ 

887 ВЕН 

888 РЕМ на входе: сМт-вреня по 
Гринвичу в часаЕ и десятых 
долях часа, 10 - долгота 
в градусах, “-” к востоку, 
ТА-митота ‘в градусах, *-" к 
югу, ЕС- наклон экливтики в 
градусах, Т. Выход: нассив 
Н(1.,. 127-эклыютическая дод- 
гота гравип домов, 

892 5РИ 


893 БЕН Прямое восвождение мери- 
диана 
891 КЕН 
960 ГЕТ ВАМС-РИ Р{6. 6460556, 
2400. 0513, г. 584Е-5, Т): 
ВЕМ РОБУВОНЕ 
$10 ТЕТ А: (ВАМС+СИТ) 15-10 | 
920 ГЕТ БАТЬАя {РТ/1 60) 
930 1Е 11А>(90-ЕС) ТНЕЯ 
БЕТ А-КАНС+180: ЕТ БА: --ЬА! 
940 ГЕТ А=БАНС: ТЕТ АНАХ-360: 
СО5УВ 100: ВЕТ ВАМС=Х: 
ВЕН ТИТЕРУАГ у 
945 ГЕТ ВАНС-ВАНСи (Р1/180) ; 
БЕТ БС1-ЕС* (21/180): 
РЕМ перевод в радианы 


950 ВЕН Середина неба 
960 ШЕТ А=ЗТН(ВАБСУ: 
БЕТ В-С05 (ВАНС} *С0$ (ЕС!) : 
СОЗУВ 140; КЕМ АЮСТАНСЕН$ 
965 БЕТ ИС-Х. 


970 БЕН Асцендент 

980 БЕТ А-С05{ВАНС) : 
ЦЕТ В=-(519(ЕС) ТАНКА!) 
+С05 (ЕС) «ТН (ВАМС) : 
60508 180 

985 ЕТ АЗ-Х 

990 БЕТ 1:1: БЕТ Х:А5: 
СО5%В 1140 

993- ШЕТ 1:10: БЕТ Х-МС: 
$0508 1140 


995 ВЕК вершины донов 

1000 БЕТ ХО=5ТЯ(ЕС1) «ТАН (1.81) / 
С05 (ЕС1 } "5ТЫ(ВАНС) 

1010 БЕЗТОЗЕ 1020 

1020 РАТА` 0. 52350879, 1. 0411976, 
2. 0943952, 2, 617994 

1030 ТЕТ Х4=-3 

1030 РОК 4:1 ТО 3 

1050 БЕЛЮ Х: ЕТ Х4-К4+1 

1050 ТЕ Х4-0 ТНЕН ШЕТ Х4:1 

1070 с0508 1100 

1080 НЕХТ у 

1090 КЕТОВН 


1095 ВЕМ Вычисления 
1100 1ЕТ ХЗ-РАМС+Х+АТН(ХО/ЗОВ (1- 
ХОнХО) } излиЗ . 
1110 ТЕТ А=518 (ХЗ): 
ТЕТ В-С0$ (ХЗ) =С0$ (ЕС1) - 
ТАН (Т.А! ) ®ЗТН(ЕСТ ) \ 
1120 БЕТ 1=.+1: 1 1>12`ТНЕЕ 
БЕТ 11-11 
1130 60508 140: ВЕМ АРСТАНСЕН$ 
1140 ТЕТ НЕ) -Х/(РГ/180) : 
ЪЕТ А-Х+РГ: ЕТ АНАХ-РТ+РТ: 
` - 60508 100:`ВЕМ ТИТЕВУАТ, 
1150 ЦЕТ Н(1.+6-12* 1.27) = 


Х/ (21/180) : 
Е ложный дон 
1160 ВЕТОЮН 


ВЕН ПРОТИВОПО- 


Управляющая программа. 
Поскольку для ряда ПРОСТЫЕ 
расчетов я давал лишь Формулы, то 
нет смысла подробно описывать 
главный. блок, показывая номера 
Строк для переходов. Важнее сам 

алгоритм. Выглядит он так: 


1) ввести исходные данные. 
Проверить, не допустил ли пользо- 
ватель ошибку. Если да, то начать 
Распечатать эти данные 
на экране и спросить у него сано- 
Го, все ли в порядке. Если нет, 
начать сначала. Перевести все в 
Форнат, который будет использо- 
вать програнна. 

2) Рассчитать Юлианскую дату. 


7%. найти по- 
ложение Солнца (см. НЕ1.101). Со- 
хранить среднюю долготу, рардиус- 
вектор и средикю аномалию Солнца 
в особых переменных. 

4) Найти положение ЛУНЫ и 
Северного лунного узла - Н(1,1). 
№(2, 1), №(11,1), ма, 1) 

5) Вычислить значения Р(1..5). 
которые понадобятся. при расчете 
поправок на долготы Сатурна и 
Юпитера 

6) для планет: 
цикл для 3 от 2 до 9 
Определить 2, 

2т, 

Найти гелиоцентрические коор- 
динаты. Если 4-5 или 6 (Юпитер, 
Плутон}, вычислить поправки и 
прибавить их К 271.. 

Перейти к геоцентрическим ко- 
ординатам. 

Перевести результат в градусы 
и присвоить нассиву Н( ). 


ТЕ, ТА,  72м, 


20, 


т) наити наклон эклиптики ЕС. 

$) Рассчитать границы домов 
н( ). 

9) Вывести результат на. дис- 
плей или принтер. 

10) Вернуться к началу. 


Я намеренно не касался пункта 
(9) только ‚ потому, что тема эта 
слишком обширна, Сюда входят, во- 
просы дизайна и графики, Форнати- 
рования чисел... возножно даже 
несколько нестандартного прерыва- 
ния, если Вы желаете, чтобы в уг- 
лу экрана имелись часы - для всё- 
го этого потребовалась бы отдель- 
ная статья. Хотелось бы только 
обратить внимание читателей на 
следующее: все результаты. храня- 
шиеся в массивах Не зи М) - 
вещественные числа. долготы ле- 
зат в диапазоне 0... 360 гралусов. 
Выводить )на экран лучше градусы и 
иивУты. ‘Если же придерживаться 
астрологической традиции, то нало 
указывать знак Зодиака. Так. на- 
принер, 
СТРИНГ "08:04 Рыб”. Олин из воз- 
НОЖНЫХ Способов вывода представ- 
лен на рис. 3 (получен из зарубех- 
ной програмны Фирмы РГОо*Ьеиз 50+- 
&маге). 


В заключение прошу извинить 
неня за слишком поверхностное 
изложение астрономии. Всен, кому 
такой уровень покажется. недоста- 
точным, горячо рекомендую книги: 
Х. Неес - “Астрономические Формулы 
для калькуляторов”, н.. Мир, 
1988; П. дэфФет-Смит - "Практичес- 
кая астрономия с калькулятором”, 
Н.. Нир, 1982. Что же; касается 
тонкостей астрологии. то. среди 
норя доступной сегодня литературы 
я бы выделил учебники Сефариала, 
Дхордха Ллевеллина, Ф. Сакоян, 
Ххет Нонстера и Философские работы 
Редиара. з 

" ® и. 


Справочные таблицы для 
расчетов элементов 
орбит планет. 


358. 41583 


НАК5. 


319. 51913 

. 0933129 

1. 5236883 |0 

285. 43176 |1. 0697667 
48. 786442 |0. 7109917 
1.850333 |-. 000675 


БЕРСЕЕ 


`ОУРТТЕВ 


338. 25002 преобразуется в‘ 


КОМНЕНТАРИЙ .”ИНФОРЕОНа", 


/1. "Эклиптика” ›‚- правильнее, 
ГОВОРИТЬ - "ПЛОСКОСТЬ эклиптики”. 
Это плоскость, которая совпадает 
с плоскостью орбиты земли. По- 
скольку Земля врашается вокруг 
Солнца, то естественно, что Солн- 
це всегда лежит в этой плоскости. 

/г. Геощентрические координаты 
- это координаты, в системе, в 
которой начало отсчета привязано 
к центру Земли. Эклиптические 
геоцентрические координаты - ко- 
ординаты в системе, в Которой! 
начало координат совпадает с пен- 
ТРОМ Земли, а главная плоскость 
ХУ совпадает с плоскостью эклии- 
тики. . | 

/3.. Поскольку . сощнце естест- 
венно всегда. лежит В плоскос' 
эклиптики, то его широта в эклип- 
тической геоцентрической систене 
координат всегда равна нулю. 

/%. Гелиоцентрическая систена 
координат - в отличие от геолен- 
трической связана не с Землей, а. 
с Солнцем. Центр этой систены 
находится в центре Солнца, а 
главная плоскость ХУ - совпадает 
с плоскостью эклиптики. 

/5. Это действительно так, но 
вадо призвать, что это не столько 
облегчает жизнь создателям ПАСКА- 
ля. сколько пользователям. ‚Ведь 
благодаря. этому в ПАСКАЛе НРАТ 
удается использовать только четы- 
ре восьмиразрядных регистра для 
хранения действительных чисел 
(вместо пяти). Это значительно 
упромает интерфейс программ. на 
ПАСКАЛе с, собственными процеду- 
рами пользователя в машинном ко- 
де. из м/к легко находятся и эк- 
сплуатируются переменные ПАСКАЛЯ. 

/6.. По-видимому, используя ин- 
Форнацию, приведенную в статье 
Алексеева А.Г. “Секреты ТРПО$" 
{сн. ТХ-РЕВЮ #Е!1,2 за 1993 г.) 
этот недостаток компилятора можно 
было бы и устранить. Не исключе- 
но, что кто-то.это уже м сделал. 


УЖАНИ5 


БЕРЕЕЕ: 


225. 32833: 3034.692 |-. ооотгг 
‚ 04833415] . 00016318 | -4. 676Е-Т 
5. 2025613} 0 о 

273. 21156] 0. 5994317 |. 00070405 
99. 443413 | 1.01053 |. 00035222 
1. 308736 | -. 0056961 | 3. 9Е-6 


тн 
ТЕ 
2А 
74 
20 
7 


1221. 5515 | -. 000502 


2г9. 9атгг 
. 24864 
39. 51174 


108. 953544 
17. 14678 


(С) Т.Д. Фрост (Т, В. РГОЗ), 1966. 


‘Алексеев А. Г. 
(С Авторизованный перевод, 


кто интересуются адвентюр- 
: знают о ‹ сушествова- 


насеаить пешеры троз- 
лями попрятать золото в сундуках 
м насытить игру хитроуиными годо- 
воломками, Что делать в такой си- 
туации? Если Вы не программист, 
гс дезо ваше почти безнадехное. 

Но на помошь Вам может прийти 


это систена, которая по- 


цепцию вовсе не нухно садиться и 
писать игровую программу. На это 
могут уйти месяцы, 
что концепция не интересна, 
нарий скучен и все труды затра- 
Гораздо удобнее иметь 


а окажется, 


можно в течение нескольких часов. 
Эта программа будет полезна и 
кто просто интересуется во- 
"как это делается?” Как 
устроены адвентюрные игры. как 
они работают - все это Вы узнае- 
разобрав эту систену. 


Когда наберете 
сможете делать 


лей - опытные хаккеры смогут раз- 
вить и поработать эту программу - 
сократить ее газмер, 
нерируеные программы более насы- 
охивленными, более 
для русского 


сделать ге- 


"приспособленными” 
языка - дерзайте, ‘творите, 

Если дело пойдет, 
вольствием поддержим его развитие 
и в разделе "Возвращаясь к наде- 
буден сообщать о новых 


идеях и приемах, открытых нашими 
читателями. 


Структура систены. 

Систена АВ$ довольно  объемна. 
листинг 1 - это сака программа 
АБЗ. Листинги 2...5 - денонстра- 
ционная адвентюрная  програниа, 
показываюая. как пользоваться 
программной АВ. В них содержится 
вся необжодимая для корневой 
программы инфорнация - количество 
комнат, количество объектов, опи- 
сания коннат и т. п. Под "комна- 
тами" здесь понимаются конечно не 
Физические комнаты, а докации, 
т.е: участки, из которых состоит 
игровое пространство - это мозет 
быть и лес и горы и борт косми- 
ческого корабли и действительно 
комнаты. 

Во время работы денонстрацион- 
ная программа выдает на экран 
описание текущей локадии (а может 
выводиться графика, если опа 
есть} и список объектов, видимых 
в данном месте. Програмиа задает 
вопрос: “ВАШИ ДЕЙСТВИЯ?” и хдет 
от Вас команды. Ваша команда типа 
:"ВЗЯТЬ ФАКЕЛ” печатается ‘на 
экране, затем анализируется - 
сначала глагол, потон сушестви- 
теаьное и исполняется програнной. 

Головная програнма (Листинг 1) 
содержит кодировку часто встре- 
чающихся действий, например “С” 
или “ИДТИ С”. означает “ИДТИ НА 
СЕВЕР”. 


листивги, 

Порядок работы с пистингами. 
их ввода и их выгрузки на ленту - 
довольно сложен, но если Вы акку- 
ратно будете сасдовать всен ука- 
завиям, то сможете не только ус- 
тановить головной блок, но + яве- 
сти и запустить демонстрацию. 

Программа русифицирована нашим 
традиционным способон с использо- 
ванием утолменного русско-латин- 
ского синвольного набора в коди- 
РОоВке АЗСТТ КОЙ-Т, сформирован- 
ного в Файл "суг”СорЕ. 

Сначала введите Листинг_!. Он 
сохраняется на ленте прямой ко- 
нанлой КОН 9990. Это “Настер-ко- 
ция” головной программы. Вы бу- 
дете ею пользоваться всякий раз, 
когда захотите создать новую иг- 
ру, а пока спрячьте эту кассету в 
надежном месте, сейчас она нам 
больше не понадобится. 


Листинг_1. Программа “АВ5”". 
Настер-копия. Файл “АБ5”. 


1 с0 то 100 
2 СТЕАВ 49999: 1ОАР "сьг"СОПЕ 


5 60 ТО 9990 

8 РОКЕ 23605,80: РОЖЕ 23607, 1 
94; ВРЕТУЕН 

9 РОКЕ 23606,0: РОХЕ 236071, 50 
: ВЕТОЕЯ 

40 СЬ$ : РОКЕ 23658,8: С0 58 
8 

42 РЕТНТ РАРЕЕ 0; ТИК 6; ВЕС 
НТ {АТ 1,3;:” АБУЕНТОРЕ ВОУПЛЕЕК 
БУЗТЕН * 


зе 


210 


50 РАТНТ та; 
$Н ЗАТ К ®ПОЛОЖДИТЕ НЕИНОГО. 


52 ВЕЗТОВЕ 50: РОБ Х-64008 ТО 
54047: ВЕЛО А: 

54 РАТА 254, 226. 40, 15, 254, 195, 
40, 15, 254, 204, 40, 15,254, 203, 40, 1 
5, 195, 48, 250, 62, 126. 28, 10, 62, 124 
‚29,6, ба, 123, 24,2, 62, 125, 195, Т2, 
252, 121, гаг, 133, 201 

58 ВЕБТОКЕ 60; РОВ Х-645430 ТО 
РОКЕ Х.А: НЕХТ Х 

60 РАТА 205, 190, 251, 62,21, 50, 6 
©, 250, 24, 33, 58, 137, 92, 254,2, 192, 
бг, 3, 50, 137, 92, 229, 6, 0, 205, 0. 14, 
225, 201, 58, 131, 92, 71, бе, г4, 144,2 
54, 22, 40, 216 

61 РАТА 50, 60,250, 33. 61,250, 6, 
55, 54. 0, 35, 16, 251, 33, 61, 250, 54, 1 
‚35, 54, 1, 35, 54, 0, 35, 106, 92, 54, 0, 
62. 22, 215, 58, 60, 250, 215, 62, 0,215 


65071: ВЕАР А: 


62 РАТА 62,215, 62,22, 215,58, 60 
‚250, 215, 58, 61, 250, 215, 60, 50, 61, 
250, 62, 42, 215, 1,0; 0, 205, 61, 31,20 
5, 191,2, 33, 8, 92, ТЗ, 62, 13, 185, 202: 
‚ 181, 252, 62 

63 ОАТА 12, 185, 202, 132, а5г, 62. 
8. 185, 202, 132, 252. 58, 61, 250, 254, 
зг, 202, 48, 250, 121,254, 32,40, 13,2 
54, 230, 21а, 44, 250, 254, 128, 210, 8, 
250, 19,24, 9, 19, 58, 61,250 

68 РАТА 254, 3.218, 48, 250, 65. 62 
‚22, 215. 58, 60, 250, 215, 58, 61.250, 
61,215, 60, 50, 61.250, 120, 245, 215, 
231, 42, бг, 250, 17, 63, 250, 25, 119.4 
2, ба, 250, 35, 34 С 

65 ПРАТА 62, 250, 11, 50, 0, 33, 200. 
1, 205, 181, 3.195, 243; 251, 58, 61,25 
О, 258, 35218, 48, 250, 61. 50, 61.250, 
62, гг, 215, 58, 60, 250, 215, 58, 61, 25 
О, 215, 51, 50, 61,250 

66 ПАТА 62, 32; 215, 42, 62.250, 1, 
62, 250, 9. 54, 0, 58, ба, 250, 61, 50, 62 
‚250, 195, 120, 252, 58, 61,250, 254, $ 
‚218, 48, 250. 62, 22,215, 58, 50, 250. 
215.58, 61, 250 

67 РАТА 61,215, 62, 32,215, 17,25 
‚ 0, 33, 250, 0, 205, 181, 3. 35, 63, 250, 
54, 32, 35, 229,6, 51, 126, 254,48, 56, 
3, 35, 16,248, 225, 17, 100. 250, 62, 31 


68 ПАТА 5, 0, 184, 250, 251. 252, 12а 
6, 18, 35, 19, 15, 250, 24, 11, 19, 71, 12 
6, 18, 35, 19, 16, 250, 62. 0, 145, 71.47 
5, 19, 18, 16, 252, 33, 93, 250, 6, 51,12 


69 РАТА 3, 43, 16,248, 126, 254, за 
‚80, 3, 43. 16, 248, 5, Т2, 6, 0, 33, 64: 2 
50, 9,6, 0, 17, 107, 250, 126, 18, 35, 19 
‚ 16, 250, 33, 0, 0, 37, 100, 250,6, 0, 26 


10 РАТА 32, 10,35, 19,16, 248, 126 
‚ 50, 114, 250, 24, 17, Тё. 6, 0, 9, 35, ба 
‚ 199,190, 40. 2, 24,225, 33, 114, 250, 
54, 200, 33, 0. О, 17, 107, 250, 6,0, 26, 


71 РАТА 10, 35, 19, 16, 238, 126, 50 
„115, 250, 24, 17. 12, 6. 0, 9, 35, 62,19 
9, 190, 40, 2, 24, 225, 33, 115, 250, 54. 
201,58, 115,250, 71, 62, 0, 184, 236, 3 
3, 24, 251, 58 

12 РАТА 115, 250, 6, 0, 19, 9. 62, 1, 
190, 192, 58, 115, 250,6, 0, 128. 50, 11 
5,250, 201, 33.0, 0,6, 0, 54, 0, 35, 16, 
251, 11,0, 0,5, 0, 58, 24, 251, 33, 124, 


13 БАТА 190, 40,4, 35, 16, 250, 201 
‚ 19, 62, 0, 184, 18, 19, 35, 121, 24, 243 
„33,0, 0, 6,0, 54, 0, 35, 16, 251, 17,0, 
©, 6, 0, ба, 99, 33, 124, 251. 190,40 


= СДЕЛАЙТЕ — САМИ 


а = 


74 РАТА 4, 35, 16, 250, 201, 79, 62, 
О, 144, 18, 19, 35, 121,24, 243, 17,7;0 
‚33. 0, 0, 6, 0, 58, 24,251, 190,80, 5,2 
5, 16, 250, 58,115, 250, 71. 35, 15,253 
‚ 125 

15 РАТА 50, 115,250, 201, 33, 24,2 
51, 17, 130, 250, 1, 150, 0, 2ЗТ, 176, 20 
1, 33, 130, 250, 11, 24,251. 1,150, 0.2 
ЗТ, 176, 201, 33, 24, 251, 6, 150, 54, 0, 
35, 16,251, 1,24, 251 

16 ОАТА 62; 0,2, 33, 99, 0.9 

80 БЕЗТОРЕ 80; РОК Х=64048 ТО 
64059 

82 БЕАР 7: РОКЕ Х,27: НЕХТ Х 

84 ЭАТА 17,5.1, 33,125, 1, 205, 18 
1,3. 195, 18, 252 


89 БЕТОН 

{00 ВОБРЕК Т: РАРЕК 7: ТНК О: С 
15 : РОЖЕ 23658, 8: С0 598 8 

105 60 508 40: 60 $508 50: 60 50 
В 80 я 

106 РОЕ Х=: ТО 11: ВЕЕР. 1х: М 
ЕХТ Х 

107 ГОК Х-10 ТО 1 5ТЕР -1: ВЕЕР 
.1,Х: НЕХТ Х 
‚110 РЕТНТ АТ 2.0; у. 

ВБЕДИТЕ ПОЛНОЕ КОЛИЧЕСТВО ГЛА- 
ГОЛОВ, ЕСЕЛЮЧАЯ: 
ИДТИ, ВЗЯТЬ (БРАТЬ). ПОЛОЖИТЬ 
(БРОСИТЬ), ПРОВЕРИТЬ, СМОТРЕТЬ, 
ИНВЕНТАРЬ (И), СТОП (КОНЕЦ), СО- 


ХРАНИТЬ, ЗАГРУЗИТЬ; 
А ТАКЖЕ БУКВ, ЗАДАЮЩИХ НАПРАВЛЕ- 


НИЕ: СЕВЕР), Ю(Г), В4ОСТОК), 
З(АНАД), (ВВЕР)Х, ‹В)Н(ШЗ) - ВСЕ 
хОлОВ: 


ЭТО УЖЕ ВВЕДЕНО С 
. 


115 РЕЖЕТ ТАВ 8; "ВДТИ....... 0" 
116 РЕТЫТ ТАВ 8; “ВЗЯТЬ. ..... 1" 
117 РЕТЫТ ТАВ 8; "ПОЛОЖИТЬ... 2° 
118 РЕХЫТ ТАВ 8; “ПРОВЕРИТЬ. . 3" 
119 РЕТЕТ ТАБ 8; "СМОТРЕТЬ... 4” 
120 РЕТИТ ТАБ 8; “ИНВЕНТАРЬ. . 5" 
121 РЕТНТ ТАВ 8; КОНЕП..,... 6“ 
122 РЕТИТ ТАВ 8; "СОХРАНИТЬ. . 1* 
123 РИТИТ ТАВ 8; “ЗАГРУЗИТЬ. . 8* 
125 ТЫРОТ У 

126 БЕТ У-У+2в 
127 60 508 40 
128 РЕТЯТ ЕТ; 


РАРЕВ г; ВЕС 


НТ 1; АТ 5,2; "СИМВОЛЫ ЕДЕНТИФЯКАЦ 
ИИ КОМАНДЫ" 
129 РЕТНТ АТ 8.0; \ы 


ДЛЯ  СРАВНЕНАЯ 
ВВЕДЕННОГО ГЛАГОЛА С ОРИГИНАЛОН. 


130 РЕТИТ ТИК г; АТ 15.4; "ВВЕДИ 
ТЕ ЧИСЛО ОТ 3 ДО 1" 


` 131 1ШРОТ УЬ р 
132 ГР УЕ<З ОВ УЬ>Т ТНЕН 
‚5,20: 60 ТО 127 ‹ 


133 ВЕТ УР-\.+1: ТЕТ УРР-УР+1 
134 РЕТ РАУ-68000- (МУР) 
140 60 508 40 
150 РЕТИТ АТ 8,0; и 
ВВЕДИТЕ КОЛИЧЕСТВО ОБ”ЕКТОВ, 
КОТОРЫЕ БУДУТ ВХОДИТЬ В ИНВЕН- 
ТАРЬ ИГРЫ: * 
155 ТЫРОТ МОВ 
{56 ТР №0В>50 ТНЕН РЕТНТ ТИК 
2; АТ 12, 1; "ИЗВИНИТЕ, НО ЭТО СЛИЕ 
КОМ МНОГО!": ВЕЕР . 5,20: РАШЗЕ 5 
0: 60 ТО 140 
160 60 508 40 : 
161 РЕШШТ ТИХ 7; РАРЕВ 1; 8816 
НТ 1; АТ 5,2; “СИНВОЛЫ ИДЕНТИФИКАЦ 
НН ОБ’ЕЕТА" 
162 РЕТИТ АТ 8,0; Ю 
ВВЕДИТЕ КОЛИЧЕСТВО СИНРОЛОВ, 


Е: 


163 РЕТНТ ТЕ 1; АТ 13,4; "ВВЕДЯ 
ТЕ ЧИСЛО ОТ`З О 7* 

168 ТЫРОТ в 

165 ЛР Ш.<3 ОР Н!.>7Т ТНЕН ВЕЕР 
. 5,20; 60 ТО 160 

166 БЕТ КРМ. +1: 

1710 0 558 40 

171 РЕЛИТ АТ 6,0; м 

ВВЕДИТЕ МАКСИНАЛЬНУЮ — ДЛАНУ 

ОПИСАНИЯ ОБ’ЕХТА: ^ 

175 ТИРОТ Ь 

176 ТЕ 11>32 ТНЕЯ РЕТИТ ТЕК а; 
АТ. 1а, 1; "НАКСЯНАЛЬНАЯ АЛИНА - ТО 
ЛЬКО 32!”; ВЕЕР . 5.20: РАЦЗЕ 50; 
60 то 170 

179 ВЕТ АУАЗ=0 

180 С0 ЗВ 40 

190 РЕЛЕТ АТ 8.0; т 

БВЕДЯТЕ ЧИСЛО ОБ”ЕКТОВ, КОТО- 

РЫЕ МОГУТ ИЗМЕНЯТЬ СВОЕ ОПИСАНИЕ 
ПО ХОДУ ИГРЫ, НАПРИМЕР: "° ТИК 1° 
ТАВ.5; "ФАКЕЛ - ГОРЯЩИЙ ФАКЕЛ"' 1 
ИК 'О’“ЕСЛИ ЭТО НЕ ТРЕБУЕТСЯ, ВВЕ 
дите 0° 

195 ТЕРОТ ВСОВ 

196 12 АТАЗ-О ЛИР ВСОВ>Т ТНЕХ 
РЕПЕТ ТИХ 2г;АТ 19,5; *ВЫ АБСОЛЮГ 
НО УВЕРЕНЫ?": ВЕЕР . 5,20: РАШЗЕ 
50: ЪЕТ АЗА5:1: 60 ТО 160 

200 50 508 40 

210 РЕТИТ АТ 8,0; у 


ЪЕТ НРР=НР+1 


220 \ЕТ #:ВОВ+ВОЙ+ 22 . 
225 ЕТ БАИ-ПАУ- (ИзЕР) -5 


230 60 508 80 

235 РЕТЕТ АТ 8,0; и 
ВВЕДИТЕ МАКСИНАЛЬНОЕ — ЧИСЛО 

05 ЕЕТОВ, КОТОРЫЕ (ОДНОВРЕМЕННО 

ВОЖНО ВЗЯТЬ: 


240 ТИРОТ МАХ 
2%5 60 5%В 30 
255 РЕТИТ АТ 8,0; и 


ато РАЛИТ РАРЕБ г; К Т: ВВС 
НТ АТ 5,8; "ФАКТОР СКРОЛЛИНГА“ 
272 РИТНТ АТ 8,0; м 
ВЫ МОЖЕТЕ СДЕЛАТЬ ТАК, ЧТОБЫ 

НЕСКОЛЬКО  БЕРХНИХ СТРОК НЕ 
СКРОЛЛНРОВАЛИСЬ ПРИ ПЕЧАТИ НА 
ЭБРАНЕ ДЛИННЫХ СООБЩЕНИИ. СКОЛЬ- 
КО СТРОК ОСТАВИТЬ НЕПОДВИЖНЫМИ, 
РЕШИТЕ САНИ. ® 

213 РЫТИТ * м 
ЕСЛИ ТАКОЙ ЭФФЕКТ НЕ НУХЕН - 0* 
217 ТЕРОТ $СВО 

219 1Е $С80>15 ТНЕН РЕТИТ ШК 
2; АТ 18. Т; "ЭТО СЛИШКОМ МНОГО!" : 
ВЕЕР ; 5,20; РАЦЗЕ 50: 60 ТО 265 
280 1ЕТ 5С80:-23-5СВО 

285 60 508 40 

230 РЕТЯТ АТ 8,0; фи 

В КАКОЙ ЛОКАЦИИ НАЧИНАЕТСЯ 

ЕГРА?" ‚ 

295 ТЫРИТ ВЕС 

330 РОКЕ 64821, БАУ-е5би ТНТ (РАУ 
/256): РОКБ 64822, ТИТ (ФАУ/г56) 
335 РОКЕ 64360, РАН-256*1ЫТ (РАН 
{256}: РОКЕ 64861, ТИТ (РАН/256) 
ЗАО РОБЕ 64903, МСОВ: РОКЕ 64924 
‚ (ВОВ-НСОВ): РОКЕ 64934, НОВ: РОК 
Е 53944, НОВ К 
345 РОКЕ 64960, (№ОВ+1): РОКЕ 64 
ЭТ2, НОВ: РОКЕ 64997, (ВОВ+1) 

350 РОКЕ 64982, НОВ: РОКЕ 65012, 
НОЕ: РОКЕ 64453, 5СЕО 

355 РОКЕ 65072, ВЕС 


' зта. РАТИТ 


360 РОКЕ 68750, \1.: РОЖЕ 64172. У 
Ъ: РОКЕ 64821, У1.: РОЖЕ 68810, ИНЬ: 

РОКЕ 654855, НЕ. 

355 60 508 40 

370 РЕТЫТ АТ 6,0; | 
ЕСЛИ ВСЕ ДАННЫЕ БЫ ВВЕЛИ КАК ПО- 
ЛОЖЕНО, НАЖМИТЕ <ЕНТЕР> И НАЧ- 
НЕТСЯ ГЕНЕРАЦИЯ СИСТЕМНОГО КОДА, 


ТЫ г; АТ 13,4; 
“ИНАЧЕ ВВЕДИТЕ <5> - ТОР“ 

ЗТ3 ЗШРОТ |НЕ 1% 

374 1Е А$:"5" ТНЕН 60 ТО 9999 
500 60 508 40 

502 РЕТИТ ТИК 2; ВЕТСНТ Е; РА 
$Н ЗАТ 8,12; " ЖДИТЕ... ";АТ 10,5 
;" ИДЕТ ГЕНЕРАЦИЯ ДАННЫХ. * 

505 НЕЗТОКЕ 1000 

506 ртм У$ (У, У) 

508 РОВ У-1 ТОУ 

510 ВЕЛО У$ (у) 

515 РОВ Х-1 ТО \. 

520 РОЖЕ (((ФАУ-УРР) + (УжУР)+Х}. 
‚ СОРЕ Уз (т, Хх) 

525 1Р СОБЕ У$(1,Х)-32 ТНЕНЯ РО 
КЕ {(( (БАУ-УРР) + (У+УР)+Х)), 0 

530 ВЕХТ Х 

535 БЕАО 1 

540 РОКЕ {(РАУ-1) + (Ч=УР)). 2 
545 НЕХТ У 

550 РОКЕ (РАУ+ (У*УР)}, 199 

600 рти 0$ ( (ВОВ). Ш 

602 ВЕЗТОВЕ 2000 

$03 ОТН $ ( (МОВ+НОН+ 21), №.) 

604 ТР НСОН-0 ТНЕЯ 60 то 67о 
605 РОБ 1-1 ТО иСОВ 

61:0 ЕБАР 9$ (9) 

615 РОВ Х=1 ТО №. 

620 РОКЕ (((ФАН-КРР) + (УНР) +Х} ) 
› СООЕ Н% (1, Х} 

625 17 СООЕ 1% (1, Х)-32 ТНЕЯ РО 
КЕ (((ФАН-ЕРР) + (УжЫР) +Х)), 0 

630 ШЕХТ Хх 

635 БЕАО 2 

640 РОКЕ ((РАН-1) + (У=БР)), 2 
645 ВЕАО 5% 

650 ТЕТ 0%(7}=6% 

655 ВЕЛО В$ 

660 ЪЕТ 0$ (У+Н0В-НСОВ) = 8$ 

661 МЕХТ У 

662 РОК Х=О ТО ((НСОВаНР) +1) 
663 РОКЕ {РАН+Х) + { (№ЮВ-НСОВ) «НР 
}, РЕЕЕ (БАН+Х) 

665 ВЕХТ Х 

670 РОК У- (МСОВ+1) ТО (МОВ-НСОВ 
) 

675 БЕАО #3 (У) 

680 РОВ Х-1 ТО №. * 

685 РОКЕ {( (ВАН-НРР) + (УНР) +Х) ) 
‚ СОРЕ 8$ (9. Х) 

690 ТЕ СОБЕ Н$(У.Х):32 ТНЕЯ РО 
КЕ (((РАН-НРР) + (УзНР)+Х)), 0 

695 ШЕХТ Х 

7100 ВЕАО 2 

105 РОЖЕ ((ПАН-1) + (У«НР)}, 2 
710 ВЕАО 5% 

115 ВЕТ 0$ (1) =5% 

120 НЕХТ У 

130 РОБ У: (МОВ+1) ТО (НОВ+НОЯ+2 
1) | 
735 КЕАО #% (1) 

7180 РОК Х-1 ТО в. 

745 РОКЕ {((БАЖ-ЯРР) + (УНР) +Х) ) 
‚ СОБЕ В$ (У, Х) 

7150 ТР СОБЕ и% (1, Х)-32 ТНЕВ РО 
КЕ (( (РАВ-НРР) + (Укр) +Х} ), 0 

755 НЕХТ Х 

7160 ВЕАР 7 

765 РОКЕ ((РАН-1) + (УчИР)), 2 

7170 НЕХТ У 

7715 РОКЕ (ФАИ+ {ИзИР)), 199 

780 ВЕЗТОВЕ 3000 ` 


241 [ 


‚ 185 ЦЕТ ОМОУ=РАН- (НОЮ*Т)-5 
} ТТ БЕТ ПВОМЬ-ОМОУ-256итНт (ВО 
(У/256): ЕТ. ОВОУН= ТИТ (0МОУ/256) 
‚ 188 РОКЕ 65009, ОНОУЕ.: РОКЕ 6501 
о, рноуи 

790 РОВ У=ОНОУ ТО (ФНОУ+(ВОВ*Т) 
-1) 
‚ 195 БЕАО А: РОКЕ У. А: 
’ 800 ВЕЗТОВЕ 4000 

801 РОВ Х=65078 ТО (65078+( (НОВ 
-1) #4)) ТЕР 4 

802 РОЖЕ Х. 35: РОЖЕ Х+1, 62: 
Е %+3.119 
’ 803 БЕАР А: 

804 НЕХТ Х , 

805 РОКЕ 65078+ (МОВид), 201 

810 ТЕТ РВ5=65078+ (МОБи4) +5 

820 ТЕТ РВБТ.-РВЗ-256"1ЕТ (РВ5/2 
'56): БЕТ РББМ-ТЫТ (РВ5/256) 
` 825 РОКЕ 64931. РВ5Ъ: РОЖЕ 64932 
‚ РВБН 

826 РОЖЕ 64941, РВУЁ: 
.РВЗН 

82Т РОЕЕ 64969, РВЗЪ,: 

828 РОКЕ 64979, РВЗЕ: 
РВИ 
860 РОБ Х=1 ТО 11: 
БАТ Х 
` 865 РОК Х-10 ТО 1 ЗТЕР -1: ВБЕР 

.1.Х: НЕХТ`Х 
> 867 БЕН ОЕ ВТ ВАЗТС === : 
868 ТЕТ БАУЕ-ТНОЧ-10: БЕТ ЕН: 
5368-БАУЕ 

869 ТЕТ ЗАУЕГ-5АУЕ-256&1НТ (АУ 
Е/256): ВЕТ БАМЕН:ТИТ (5АУЕ/256) 

870 ТЕТ БЕНЕЕГЕН-256етЕТ (ТЕНИ? 
56): МЕТ БЕМН-ТНТ (1ЕН/256) 

871 ВЕЗТОРЕ 674 

672 РОВ К-0 ТО 9 

РОКЕ (64116+Х),7: Н 


ВЕХТ У 


РОК 
РОКЕ Х+2.А 


РОКЕ 64942 
РОКЕ 64970 
РОКЕ 53980 
ВЕЕР .\,Х: Ш 


87а ОАТА ЗАУЕТ,, БАУЕЙ, МАХ, НОВ, Е 

М1, ГЕВН. РВ5Т., РВЗМ, НОУТ, НОУН 
875 60 508 40 
885 РЕТЕТ АТ 8,0; м 

ПОДГОТОВЬТЕСЬ К ВЫГРУЗКЕ НА 

ЛЕНТУ. НАЕМИТЕ <ЕЯТЕР>, КОГДА 

БУДЕТЕ ГОТОБЫ. *. 

886 РЫШТ ТЕ 2; АТ 12,0; \ 
ЕСЛИ НЕ УВЕРЕНЫ, ЧТО ВСЕ ПРА- 

ВИЛЬНО, ТО ВВЕДИТЕ ‹5> - $ТОР. ® 
$887 ТИРОТ А$ 
890 ТР 4А3-"5” ТИЕН 60 ТО 9999 
900 60 508 40 
910 РЕШИТ АТ 8.11; "ЗАПИСЬ..." 

‚ 915 БАУЕ "зуз1ею"СОБЕ ЗАУЕ, ГЕЯ 
920 ЗАУЕ *оБ3ес43" РАТА 03 (} 
925 РЕТИТ АТ 8.0; ы 

`ПРЕЕДЕ, ЧЕН БЕИСИК-ПРОГРАНМА 

И КОДЫ БУДУТ ЗАГРУЖЕНЫ В ПАНЯТЬ. 

ЛОЛЕНО БЫТЬ ВЫПОЛНЕНО: ®* ТИК 2’Т 

АВ 10; "СЪЕЛЕ *; ЗАУЕ-1 
921 ВЕЕР .5,20: РАЦБЕ 50 

‚ 930 РЕТЕТ РАРЕЮ.2; ТИК Т; 


в81с 
НТ БАТ 15,0; ыы 


932 БЕЕР ‚5,20; РАЗЗЕ 50 
935 РРТИТ АТ 18.0; м 
НАЖМИТЕ ЛЮБУЮ КЛАВИВУ, КОГДА 
БУДЕТЕ ГОТОВЫ. 
940 РАОЗЕ 0 
945 60 59В 20. 


950 РЕТИТ АТ 8, 9; ° ВЕРИФИКАЦИЯ. . 
ея 


` 955 УЕКТЕУ "зуз4ет”СОрЕ ЗАУЕ. БЕ 
Е 


960 УЕВТЕХ "оьзес%3” БАТА: 03} 
965 С15 

‹ 970 60 ТО 9999 -. 
999 рай ‚ГЛАГОЛЫ РАТА 0-8 = 


1000 АТА “ИДТИ, 0, СЕВЕР“. 0, *С® 
‚0, "ЮГ*, 0, "Ю", 0, "ВОСТОБ*, 0, "В", 0 
‚ "НАПРАВО", 0, “ЗАПАД”, О, "3°, 0, "НА 
ЛЕВО", ©, "ВВЕРХ”, 0. "Х”, 0, "ВНИЗ", 0 
*БЗЯТЬ", 1, "БРАТЬ", 1, "ПОЛО 
*БРОСИТЬ", 2, "ПРОВЕРИТЬ", 
3. "ОСНОТРЕТЬ®, 3, "СМОТРЕТЬ, 4, “ИН 
ВЕНТАРЬ®, 5, “а”, 5, *СТОП*, 6, "КОНЕЦ 
*,б, "СОХРАНИТЬ", Т, “ЗАГРУЗИТЬ”, 8 
1002 ВЕИ ДАННЫЕ ДЛЯ ПРОЧИХ ГЛА- 
ГОЛОВ (КОНАНД) = 
1999 БЕН ОБ“ЕКТЫ, КОТОРЫЕ ИЗНЕ- 
НЯЮТ СВОЕ ОПИСАНИЕ В Золе. ИГРЫ 
2019 ВЕН ПРОЧИЕ ОБ”ЕКТЫ = 
2189 ВЕН ПРОЧИЕ СЛОВА, РАСПОЗНА- 


=, НОВ+1, "С" 
нЕ в *Ю”,МОБ+а, "ВОСТОК", 
ВОВ+3. "В", НОВ*3, "НАПРАВО", МОВ+ 3 
"ЗАПАД", НОВ44, "3", МОВ+, “НАЛЕВО” 
„НОВед, "ВБЕРХ®, №ОВ+5, “Х*, МОВ+5, = 
ВНИЗ", МОБ, “Н", НОБ+5, СМОТРЕТЬ" 
‚ 99, "ИНВЕНТАРЬ", 99, "И", 99, "СТОЙ® 
‚99, “КОНЕЦ”, 99, "СОХРАНИТЬ", 99, “3 
АГРУЗИТЬ®, 99 
2999 ВЕМ ДАННЫЕ © ВОЗМОЖНЫХ ПЕ- 


9993 РЕТНТ АТ 6,0: ны 
ОТНОТАИТЕ ЛЕНТУ ДЛЯ ВЕРИФИКАЦИИ. 


9994 ВЕЕР .!,20: РАЗЗЕ 50 

9995 РЕТНТ АТ 42,0: } 
НАЖНИТЕ ЛОБУЮ КЛАБИШУ, КОГДА 

БУДЕТЕ ГОТОВЫ. °; РАОЗЕ © 

9996 СО 518 40 

999Т РЕТЕТ АТ 8.7; "ВЕРИФИКАЦИЯ. . 


9998 УЕВТРУ “АВЗ" 
9999 ВОВОЕК Т: РАРЕК Т: ТИК 0 
Теперь допоялните текст Настер- 
копии строками данных для денон- 
страционной програнны из Листиз- 
га_г2 иди наберите их отдельно (и 
сохраните на ленте). В посаелнем 
саучае загрузите Настер-копию, 
объедините ее при поноши НЕХСЕ с 
данными для демонстрационной игры 
из Листивга_2 и сохраните поду- 
ченную программу командой Ки 
9990. Эту ВЫГРУЗКУ надо делать на 
рабочую ленту ‹назовен ее 
лента_А). 


листинг.г. данные дая 
демонстрационной игры, 
{Объединить с Файлом “АВ5") 


1003 ПАТА "ОТКРЫТЬ", 9, "ОТПЕРЕТЬ" 
‚ 10, “КОПАТЬ”. 11, "ВЫКОПАТЬ", 11, "3 
АЖЕЧЬ”, 12, "ГАСИТЬ". 15, “ПОГАСИТЬ” 

ПОДНЯТЬСЯ", 18, "ЗАЛЕЗТЬ", 18, 
"ЛЕЗТЬ", 14, "СПУСТИТЬСЯ", 15, "СЛЕЗ 


1007 ВРАТА "ПРЫГАТЬ", 22, *СПРЫГНУТ 
Ь", 22, "ЗАПРЫГНУТЬ", 22, “ИСПОЛЬЗОВ 
АТЬ", 23 

2000 ВАТА "ПЛЕД", 1, "ШЕРСТЯНОЙ ПЛ 
ЕД", "ПЛЕД, НАДЕТЫЙ НА ПЛЕЧИ“ 
2001 ВАТА "ФАКЕЛ", 2, "МАЛЕНЬКИЙ Ф 
АКЕЛ”, "ГОРЯЩИЙ ФАКЕЛ” 

2020 БАТА ОАК. з, =. 

АЯ ШКАТУЛКА” 


2191 РАТА "ДВЕРЬ", 16, “БУФЕТ”, 1Т, 
= ЛУХАЯКА" , 18, "СТУЦЕНИ" ‚ 19, °ЛЕСТН 

ИЦА“, 20 

2192г РАТА "ВОРОТА", 21, “КОПАТЬ", 2 

2, "ЯМУ", 22, "САД", 23, "ПОЛЕ", 24 

219% РАТА "СЕЙФ", 25, “ПЯТНО®, 26. * 

ПРЫГАТЬ", 21 


3001 ВАТА :,0,3,0,0, 0,0 
3002 РАТА 2,0,0,0,0.0,6 
3003 ВАТА 3,1,7.0,0, 0,0 
3004 ПАТА 4,0,9,5,0,0,0 
3005 ВАТА 5.0,10.0,4,0,0 
3006 БАТА 6.0, 0.1, 0,2, 11 
з00т 7,3, 13,8.6,0.0 
3008 8,0,0,9,7.0,0 
3009 9,4, 0, 10,8, 0,0 
3010 10,5, 15,0, 9, 0,0 
3011 11.0,0,0.0,6,0 
зо1а 12, 0.0, 13,0,0.0 
3013 13, 7,0, 14, 12, 0.0 
3014 14, 0,0, 15. 13, 0,0 
3015 15, 10.0, 0, 14, 0,0 
8000 4, 10,0,1,0, 0,0, 0, 0 


Теперь наберите загрузчик бу- 


на новую ленту (денту_В). 
назад не отнатывайте. 


Листинг_3. загрузчик 
демонстрационной игры. 
Файл "ТНТ". 


10 СТЕАВ 49999: ТОАБ "сьг"СОрЕЛ 
50000 

20 ВОРОЕЕ 7: РАРЕК 7: ТИК 0: С 
13 : РОКЕ 23606, 80: РОКЕ 23601, 1 
94 

30 РЕТЕТ ТИК 1; ВЫТСНТ АТ 2 

40 РЕТЕТ АТ 5, 11;" 
* С использо 

$6 РЕТЫТ РАРЕБ 0: 
НТ ПАТТ,З; 
ЗУЕТЕМ * 
60 РИТЯТ АТ 9, 


тик 6; 
АБУЕНТОЮЕ ВОП.РЕВ 


;"Т.О. РОТ + 
""ЕНФОРЕОМ" 
10 РЕТНТ РАРЕВ 0; ТНК 5: 
НТ 1:АТ 12,9;" ЗАГРУЗКА, .. 
80 РЕТНТ ТИК 1; АТ 15.0; 


ВР1С 


50 РЕТИТ АТ 19,0; ЕТ: 
100 1ОАЮ "аауетиге" 
200 ЗАУЕ “ТЕТВО” НЕ 10 


Сейчас наберите сан текст де- 
монстрацнионной игры - Листинг.4. 
Точнее сказать, это ве вся про- 
гранма, а только первая ее часть. 


ое олаитаьн 
ПЕСНЕ д, Техст первой части 
демонстрационной игры. 
Файл “аауегАиге”. 


45 ТЕТ Вал): “НЕ ПОЛУЧАЕТСЯ. * 

50 РОВ Х-1 104 

52 1Е #$4(Х,1)="#”" ТВЕН РЕ Х- 
5; 1886: 20 10 195 

54 КАНРОНТЯЕ 058 55: РЕТИНТ 1 
К 5:53): ЕТ И" 


100 ВОБОЕР 0: РАРЕР. 0: ТИК 6: В 
ВТОНТ 1: ©13 . 

10а 60 Э8 1000+РЕЕК Ря10 

10% 32 РЕБК Р-11 АНО РЕЕК (0+9) 
<>99 ТНЫН 60 ТО 195 

105 КАНРОНТУХ 05И 67930. 

109 РИТНТ ТАВ 3; РАРЕВ 1;"А 

с 

140 РЕТИТ ТАВ 3; РАРЕЕ 4; "А"; т 
ИХ Т;” В ПОЛЕ ВАЖЕГО ЗРЕНИЯ: *; 
ТНК 6; "6" 

145 БЕТ НЕ-О 

120 гов Х=0 ТО (МОВ-1). 

122 12 РЕЕК, (РВ5+Х)=0 ТНЕН ВЕТ 
Х=МОВ: 60 ТО 128 

124 БАБТОНТХЕ 058 5$; РТИ ТАВ 
3: РАРЕК 1; ТИК 6; "А"; ТИК т; ° 
"03 (РЕБЕ (РВБ+Х)); ТИХ 6; *6" 
ЕТ НЕ-НЕ*1 

126 ВЕХхТ х 

128 1Р НЕ-О ТНЕВ  РЕТИТ ТАВ 3; 
РАРЕЮ 1; ТИК 6; "А"; ТВХ т; НЕТ 
НИЧЕГО ИНТЕРЕСНОГО": ТИК об; “6” 
` 129 РЕТИТ ТАВ 3; РАРЕЮ 1; "СЕВВВ 
е: : РОКЕ 6445 


3, РЕЕК 23689-14 
195 РАБКРОНТЕЕ 058 55: 
К 4; "ВАШИ ДЕЕСТВИЯ?”: 
196 НК б. 

200 БАНООНТЕЕ 95Е 54359: РЕШИТ 
202 ВЕТ УВ-РЕЕХ 64110 _ 

204 БЕТ НО-РЕЕК 64115 

206 БЕМ АНУ БРЕСТАЬЗ ТР ЕЕЗ-ЕНЕЕЕ 
208 1Е РЕЕК Р:11 АМО РЕЕК (0+9) 
<>99 АНО УВ<>0 АМ (УВ<>12 АНО У 
В<>13 АНО УВ<>14 АНО УВ<>6 АНО У 
В<>5 АНЮ УВ<>Т АЯР УВ<>6} ТНЕН 
ГЕТ 5% (1)-"ЗДЕСЬ ИЕ ОБОВТИСЬ БЕЗ 
СВЕТА! “: 60 ТО 50 

228 ТР УВ-200 ОР #0-201 ТНЕК С 
- © ТО 45 

235 60 ТО 1000+УВ"100 

1000 1Р КО>НОВ+б ТНЕН 60 ТО 100 
1002 ГЕТ НО-НО-НОВ: `РОЕЕ 64115, Н 
о , 
1005 ТЕ ((РЕЕК Р=6 АНО НО:3) ОЕ 
(РЕБЕ 2-9 АИО НО-4}). АНР РЕЕК (ЕР 
+8)=0 ТНЕН |ЕТ 2$(1)="ДВЕРЬ ЗАК 
РЫТА. *: 60 10.50 

1010 1Р ((РЕЕБ Р;14 АНО 50-3) ОВ 
(РЕЕК Р-15 АНГ НО-4)) АН РЕЕЕ 
(2+7)=0 ТНЕН ТЕТ 9%(1) "ВОРОТА 
ЗАКРЫТЫ. *; 60 ТО 50 

1020 ЛЕ (РЕЕК Е=Т АШО РЕЕК (2+5) 
=1) ОВ (РЕЕК Р=15 АВО РЕБЕ (2+6) 
#1) ТНЕН (15 ; РЕПЕТ ДТ 10,16; 
РЪА$Н 1;"ж”: 60 50В' 8800: С18 : 
РЕЛНТ АТ 2,1; 

*ВЫ НЕОЖИДАННО СВАЛИЛИСЬ В ЯМУ, * 
АР 3,4; 

"КОТОРУР САНН ХЕ ЗДЕСЬ БЫКОПАЛИ“ 
:АТ 4,1; °И СЛОЯАЛЯ НОГУ. ": 
ВЕЕР 1, 2,28: РАбЗЕ 100: ВЕЕР, 5, 
15: 60 ТО 1602 

1090 ВАНФОНТЕ 05% 65005 

1092 ТР РЕЕГ 64115-0 ТНЕН ВЕР В 
$(1)=МТУДА ВАМ НЕ ПРОЙТИ. ": СОТ 
о 50 
1093 РОЖЕ Р.РЕЕК 64115 
1094 60 ТО 100 


РИТИТ ТЯ 
ВЕЕР. 1,20 


1800 ЪЕТ Е%(1)="В СЛЕДУЮЩЕН. БЫПУ 
СКЕ ""2К-РЕВЮ"" "+ ТО 50 

1900 1 (РЕБК Г:8 ОВ РЕБЕ Р:9) А 
ЯВ НО-#6 ЛЫЮ РЕБ (7+4) -0 ТНЕЕ 


РОКЕ {Р+4),1: БЕТ 211) -°0. К. ТЕ 
ПЕРЬ ДВЕРЬ ОТКРЫТА. *: 60 То. 30 
1902 ТЕ РЕЕК Р-18 АБО НО-21 АО 
РЕНК (Р-Т)-0 ТИБН 15Т 0% (1) "НЕ 
ОТЕРЫРАЮТСЯ, ЗАКРЫТЫ БЗНУТРИ. *: 
60 то 50 ‹ 

1905 ТЕ РЕЕК Р-15 АЗ ВОз21 АМ 
ТНЕЯ  РОКЕ (2+), 1: 


1910 1 С((РЕБЕ Р-8 ОВ РЕБЕ Р-9) 
АБО РЕЕК (+4) =} АНД №О:16} 08 
{((РЕЕК Е-14 СХ РЕЕК Р-15) АБО Р 
ЕЕК (Р+7}-1) АНО ИО:21)} ТНЕН 
ЕТ 93(1)-“ДА ВЕДЬ И ТАК УЕ м 
ЫТО!": 60 ТО 50 

3315 ТЕТ г%(1)=*В СЛЕДУЮЩЕН вы 
СЕБ "*2К-РЕВЮ" ="; 60 ТО 50 

7040 РЕТЯТ Т$ к 

7011 РАТЕТ м 
АБЫ НАХОДИТЕСЬ В ЧИСТОН Й АККУ-С 
АРАТНОЙ АНБАРЕ. ФЕРМЕР, 


АЛЮБЕТ СВОЕ ЛЕЛО. с 
то12 РЕТЕТ 8$ 

1019 БЕТОЕК 

1020 РАТИГ Т$ } 

7021 РЕТИТ м 


АЗАБРАВЗЕСЬ ПО ЛЕСТНИПЕ НАВЕРХ, С 
АВЫ ПОЦАЛИ КАК БЫ НА ОТКРЫТЫЙС 
АЧЕРДАК. СКОРЕЕ ЕГО МОЖНО ОПИ-С 


` АСАТЬ, КАК БОЛЬЖОЕ  ХРАНАЛЯАЩЕС 
АНАД КОНФЕНЕЯ, [- 
. 
ТО2ё РЫТИТ В$ 
71029 ВЕТОЕЕ 
7030 РЕТЯТ 7$ 
7031 РЕТГЯТ й 


АВЫ ВЫШЛИ НА ДВОР ФЕРНЫ. НЯКА-С 
АКЛХ ЖИВОТНЫХ НЕ ВИДНО. НА СЕ-С 


АВЕРЕ НАХОДИТСЯ АМБАР,_ № ЮГЕ -б 
А: ПОЛЕ. . с 
7032 РЕТИТ В 

71039 КЕТОКН 

7040 РЕТАТ 1%. 

7631 РАТЯТ ы 


АЧЕ-ТО. ВЗГЛЯД. с 
Тод2 РИТИТ В% 

7049 КЕТОВЯ 

7050 РЕТНТ 7% 

7051 РАТИТ м 


АКАЖЕТСЯ, ЧТО ЭТОя СТОлОВОиС 
'АКОМНАТОН ДАВНО НИКТО НЕ ПОЛЬ-С 
АЗОВАЛСЯ. НАВЕРНОЕ, т 
АНЕ ЖИВЕТ. 


7052 РЕТЕТ 8$ 

1059 БЕТОВН 

71060 РЕТЕТ т 

10641 РЕТЯТ Г 
АКОНЮЖНЯ СОВЕРВЕННО ПУСТА. НЕТС 
АДАЖЕ ХАРАКТЕБНОГО ЗАПАХА ЖИ-С 
АВОТНЫХ. ЛЕСТНИЩА ВЕЛЕТ НА ЧЕР-С 


АДАК,  БИДНЫ ТАКЖЕ СТУПЕНИ, С 
АСКРЫВАЮЩИЕСЯ ГЛЕ-ТО ВНИЗУ, Вб 
АТЕННОТЕ. [= 
” 

7062 РВТЕТ В 

7069 БЕТОКИ 

7070 РВТЕТ Т% 

ТОТ1 РРТЕТ ы 


АБЫ ВЫШЛИ В ОТКРЫТОЕ ПОЛЕ. ° ОНОС 


ИИ 


215 


АБДТИ В ЛЮБОН НАПРАВЛЕНИИ, 6 
* 

7072 РЕТЕТ В 

7079 БЕН ь ' 
1080 РЕТЯТ т® ‹ 
1081 РЕТИТ " 


АБН НАХОДЯТЕСЬ У ДЕЕРИ ФЕРНЕР-б 


АВАТЬСЯ. | 
1082 РЕТИТ 8$ 

7089 РЕТОЕН 

7090 РИТИТ т 

7091 РРГЕТ | 


1092 РЕТНТ Б% 
1099 ВЕТКЕ 

1100 РЕТИТ 1$ й 
1104 РИТЕТ * 


1402 РЕТЕТ 9% 
11909 ВЕТОЕЯ ^ 


7110 12 РЕК (0491 >99 ТВЕН РВ. 


НТ ТАВ 5; РАРЕВ Т; ТНК 0; "ЗДЕСЬ 
НИЧЕГО НЕ ВИДНО! ”; ВЕТОЮЯ 

7111 РИТИТ Т% 

1112 РЕТАТ Г ый 


7413 РЕТЕТ 6% 
7119 БЕТОКН 
1120 РАТИТ Т$® 


т 


71121 РАТЕТ А 


АЭТО ТУПИК. НОЖНО БЫЛО СЮДА ВО-6 


АОБЖЕ НЕ ПРЯХОЛИТЬ. , в 
7122 РАТИТ В$ 

7129 ветоен 

7130 ВВТиТ. Т% 

1131 РЕТЕТ }: 


АНОЖНО ПРОЙТИ Я НА СЕВЕР. 6 
ы 

К 
7132 РАТЕТ В у 
7139 ВЕТОЮИ 
7140 РЕТЕТ 1%. р 
7141 РЕТЕТ . 
АДОРОГА УЦИРАЕТСЯ В ВОРОТА. ЗАВ]. 
АНИМИ. РАСПОЛОЖЕН  ПРИУСАЛЕБНЫЙЕ | 
АСАД. 6. 
7142 РЮТЕТ 8$ 
7349 ВЕТ 
7150 РЕЛЕТ т ии 
1151 РЫТТ к 


71152 РЕТИТ 8$ 


1159 ВЕТОБЯ 

8800 РОК Х--5 ТО 15 

8802 ВЕЕР .0г,Х: НЕХТ Х 

8804 РОБ Х-14 ТО -5 ЗТЕР -1 

8806 ВЕЕР .0г,х: НЕХТ Х 

8808 БЕТОН 

9940 ВЕН СТАРТ ЯГРЫ 

9950 1ОАБ "зузхет"сСорЕ 

9955 ШОАО "0Ъ3ес+3” РАТА 030) 
9956 ЕТ Е-64280: 1ЕТ 0-64319: ь 
ЕТ 55-64440 

9957 ЪЕТ НАХ-РЕЕХ 64118: 
-РЕЕК 64119 

9958 ТЕТ РН5-256=РЕЕК 68123+РЕЕК 
6412г 

9959 ЕТ 5АУЕ-256"РЕЕК 64117+РЕЕ 
К 64116: ГЕТ ГЕН-256=РЕЕК 64121+ 
РЕЕЕ 64120 

9960 ТЕТ ПМОУ-256"РЕЕК 64125+РЕЕ 
К 64124 

9961 РОКЕ 64130.09 

9965 ПМ 8$ (4, 32) 

9970 РОК Х=1 ТО 8: ТЕТ 9$(Х, 1) -* 
=”: НЕТ Х ; 
9975 ВОБРЕВ 0: 
ЕТСНТ 1: 915 
9976 РЕТИТ АТ 8, 10; "ПОДГОТОВКА. . 


БЕТ НОВ 


РАРЕВ 0: ТНК 6: В 


9980 БАНРОМТЕЕ 05К 65058 

9984 ВЕЗТОВЕ 9987 

9985 РОКЕ 23615.88: РОКЕ 23676, 2 
55: РОК Х=05Е "А" ТО 05 "А"+63 
9956 БЕАР 2: РОКЕ Х,2: ВЕЕР . 005 
‚20: НЕХТ Х 

9987 РАТА 128, 128, 128, 128, 128, 12 
8, 128, 1268,0,0,0, 0,0, 0,0, 255, 128, 
128, 128, 128, 128, 128, 128, 255,255, 
128, 128, 128, 128, 128, 128, 128, 255, 
1,1, 1,1,1,1,1,1,1,1,1,1,1,1,255, 
1,1,1,1,1,1,1,1, 255, 0,0, 0, 0, 0, 0, 
с 

9988 ТЕТ Т$="ОНННИНИННИННИНННННН 


9990 БАУЕ “аачепуиге” тлнЕ 9940 
9991 С15 

9993 РЕТЕТ ВЕТСНТ 1; АТ 8,0; 
"ОТНОТАИТЕ ЛЕНТУ ДЛЯ ВЕРИФИКАЦИИ 


9998 БЕЕР ‚1,20: РАОЗЕ 50 
9995 РЕЛИТ АТ 12.0; я 

НАЖНИТЕ ЛЮБУЮ КЛАВИМУ, КОГДА 
БУДЕТЕ ГОТОВЫ. ": .РАЦЗЕ 0 
9996 УЕЕТРЯ "адуепиге” 
9999 ВОВБЕЕ Т: РАРЕБ Т: ТНК 0 

Набрав первую часть демонстра- 
ционной программы, сохраните ее 
командой КИН 9990 на. ленту_В 
{сразу хе за Листингом_3), и 
пенту назад не отматывайте. 

Пока с вводом программ доста- 
точно, а сейчас некоторые поясне- 
ния к листинган 1-4. 


Работа с листингани. 
Загрузите программу с ленты_А, 
запустите ее и в ответ на. запросы 
програмны введите: 23,4, 9,4, 22,2, 
13,2,15,0,7Т (немного ниже ны да- 


ЮтгрУЗкУ надо произвести на азен- 
тУ_В, (следом за Листингами Зин 
4). 


Теперь мы будем работать с 
Лентой_В. Отнотайте ее в начало и 
загрузите. После окончания за- 
грузки основной Бейсик-врогранмы 
демонстрационной ‘игры’ (Лист_4). 
она стартует со строки 9940, 
загружая блок кодов и данные. 
После этого начнется подготовка 
данных © чем свидетельствует 
табличка на экране, а затем ‘игра 
начинается. 

Вы уже можете начать иссдедо- 
вание игровой ситуации. ° Можете 
пройти ‘по всем локацияи, все по- 
смотреть. на Вас никто не будет 
нападать, правда Вы не смолете 
делать никаких действий, кроне 
“ОТКРЫТЬ", но этого доляно быть 
достаточно для того, чтобы отла- 
дить БЕНСИК-программу (листинг_4) 
и удалить из нее все ошибки, 
допушенныеё при наборе. 


Головная програнма АВ5. 

Посае старта головная програн- 
ма АВ5 выдает серию экранных“ ' за- 
просов, по которым надо ввести 
необходиные данные. Проследите 
по демонстрации, как и в каков 
формате вводятся данные по этим 
запросам, а мы сейчас их подробно 
рассмотрим. После каздого заго- 
ловка раздела стоит число в скоб- 
ках, обозначающее, что доджно 
вводиться на этот запрос в демон- 
страции. 


1. Количество прочих глаголов. 
(23). Эти глаголы заносятся в 
строки БАТА 1003... 1999 «Лис- 
тинг_г2} Например: 


ТАТА “ОТКРЫТЬ”, 9, "ОТПЕРЕТЬ", 10 


Фориат: глагол (полностью) + 
присвоенный ему номер. Поскольку 
нонера с 0...по 8 уже присвоены 
стандартным конандан, то первая 
пользовательская команда (глагол) 
начинается с номера 9. Слова си- 


нонимы, такие как ГАСЕТЬ, ‹ ПОГА- ` 


СИТЬ, ° имеющие одинаковое дейст- 
вие, но разное написание, вво- 
дятся порознь, но ин присваива- 
ется один и тот же вонер. Тем не 
ненее, в ответ на запрос "Коли- 
чество глаголов?” их надо считать 
как отдельные слова. 

В системе АВЗ применяется, сле- 
дуюший Формат ввода команды: пер- 
вое саово считается глаголом, 
последнее - существительным или 
направлением (в случае перемьше- 
ния). Ножно в отдельных случаях 
ввод осушествлять и одним словом 
(буквой), но для реализации этого 
надо, чтобы это слово (буква) бы- 
о занесено и в список гааголов и 
в список существительных (ны еше 
верненся к этому моменту позд- 
нее). 

Основные глаголы заданы в 
строке. 1000 Настер-копии програн- 
мы АВБ (Листинг 1). основные 
сушествительные - в`‘строке 2190 
этого же листинга. 

Такие  девствия, как ИДТИ НА 
ВОСТОК. ‘нохио вводить также и 
ИДТЯ НА В. яли ИДТИ В, или ВОС- 
ТОЕ, или только буквой в, а также 


(или просто И), 
другие - те, которые одновременно 
заданы и в строке 1000 и в строке 
2190. А вот гларолы ВЗЯТЬ или 
ПОЛОЖИТЬ не могут использоваться 
отдельно, без сушествительного и, 
поэтому, они, не заданы в строке 
2190. 

На тот случай. если Вы захоти- 
те изменить основные глаголы, за- 
данные в Листивге_1, 


В СТроке 1000 отражено также в 
строке 126 этого. листинга. Это 
число - 28. Если будете изменять 
данные в строке 1000,  прокоитро- 
лируйтЕ и ЧисБо в строке 126. 
Аналогично и лдя ‘строки г190 - 
полное число слов в этой строке 
отражено чисаовыми параметрами в 
строкая 503 и 130. Это число - 
21, 


г. Символы идентификации ко- 
манды (3). Даля того. чтобы поль- 
зователю яе приходилось полностью 
набирать длиниье сасва (и не дай 
Бог при этом сделать ошибку. 
программа ножет идентифицировать 
команду не по всену`слову, а по 
нескольким первым синволам, На- 
пример, вместо команды ПРЫГАТЬ 
кожно дать команду ПРЫГ (если ус- 
тановлено число 4) или ПРЫ (если 
установлено 3). Это число ноет 
быть задано в дизпазоне от $ до 
7. Обычное число -4 или 5. для 
детей - 4, для взрослых програныы 
посложнее, ‘можно задать 5, так 
как при большом числе слов воз- 
ножны ситуации, когда первые # 
буквы разных слов совпадают. Для 
числа 5 - это происходит значи- 
тельно реже. Число 3 еше как-то 
приенлено для неслохны авглий- 
ских программ, но В русском языке 
существуют приставки, 


слов и очень возможны отибки. 


3. Количество объектов (9). 
Это количество объектов в про- 
грамме, которые могут быть ИНВЕН- 
ТАРЕМ, т.е. которые пользователь 
нохет брать, переносить с, места 
на место или как-то использовать. 
Подробности, как заносить список 
этих объектов в листинги, смотри- 
те в комментариях к пункту 6. 


д. Символы идентификации объ- 
екта (43. Это то же, чю иша, 
но для второй части команды - для 
сушествительних или ваправления. 
Эти числа ногут и различаться, но 


пользуется. 


$. Максимальная длина описания 
объекта 1ге). это количество сям- 
вводов, которое может занимать са- 
мое днинное описание объекта (на- 
пример, ПЛЕД, НАДЕТЫЙ НА. ПЛЕЧИ); 


6. количество объектов. спо- 


собных изменять свое 
ходу игры (2). Этот 
отношение к объектам типа "ФАКЕЛ" 
|- “ГОРЯЩИИ ФАКЕЛ” в т.н. Данные 
на эти объекты заносятся в строки 
2000 .., 2018 (си, Листинг. & 
демонстрационной програнны), на- 


описание по 


АТА “ФАКЕЛ”, 2. "НАЛЕНЬКИЙ ФАКЕЛ”, 
“ГОРЯЩИЙ ФАКЕЛ” 


Это были объекты 1 иг, 


яваяющихся инвентарем, 
надо задавать число 9, хотя в 
строках 2000-2028 заданы только Т 
предметов. Кроме строк 2000.и 
2001 (оъекты. которые могут изме- 
няться), остальной инвентарь, ко- 
"горый не может изненять свое со- 
стояние, задан в строках 
2020-2188 в Формате: 


"ОАТА "ШКАТУЛКА", 3, “ДЕРЕВЯННАЯ 


ШКАТУЛКА" 

7. Другие слова, распознавае- 
ные программой (13). Эти слова 
заданы в строках с 2191. Первый 


присваиваемый им номер рассчиты- 
вается по Форнуле: 

(количество объектов) * Т 
Поэтому в  денонстрационной 
програмне первое слово ДВЕРЬ 
ымеет номер 16. 


8. Максимальное число объек- 
тов, которые слноврененно нохно 
взять ий иметь при себе (2). 


9. Общее число локаций (15). 


ли Вы хотите, 


10. В демонстрационном принере 
вэто ие используется, поэтому вве- 
ден 0. 


пункт имеет ° 


11. Стартовая локация (7). это 
номер локации. в которой начина- 
ется игра. } А 


Возможные перемешения. 

Со СТРОКИ 3000 (до строки 
3999) в Листинге_г находится таб- 
лица расположения локаций, она же 
определяет и возмохность взаимных 
перемещений нехду локациями. Пер- 
вое число в строке БАТА - это но- 
мер локации, Всего их 15 (в дан- 
ной демонстрационной программе), 
ИЕ расположение и наименование 
для демонстрационной  програнны 
показано на плане (Рис. 1}, 

Формат задания допустимых пе- 
ременений следующий. Первая. цифра 
в строке БАТА - это номер лока- 
‘иии. Далее идут номера других ло- 
калий, в которые ношно попасть из 
данной, если идти в разных напра- 
влениях. Всего 6 направлений, по- 
порядку соответственно СЕВЕР, ЭГ, 
ВОСТОК, ЗАПАД, ВВЕРХ и ВНИЗ. Так, 
например, для 1 локации возможен 
только переход в 3 локацию при 
двилении на ЮГ: 

РАТА 1,0.3,0.0,0.0 
а дая Т локации - допустимы 4 
направаения: 

ТАТА Т, 3, 13, 8,6, 0.0 


в 3 локацию, если идти на СЕВЕР, 
в 13 А мия юг, 

в 8 эл =И/- ВОСТОК, 
вб змеи К: ЗАПАД. 


Расположение объектов. 

й, наконец, в строке 4000 за- 
дается искодное расположение объ- 
ектов, являющихся инвентарем. 
Фориат записи такой. По порядку, 
начиная с объекта номер 1 (ПЛЕД), 
задаются номера локаций, в кото- 
рых этот предмет находится. Если 
преднет в данный момент не виден, 
то заносится 0. Всего в строке 
БРАТА будет столько цифр, о сколько 
задано объектов, яваяющихся ин- 
вентарем (для нашей денонстраци- 
онной программы - 9). 

РАТА 4, 10,0,1.0,0,0,0.0 


План расположения локаций 


Это означает. что ПЛЕД распо- 
ложен в 4 локации, ФАКЕЛ - в 10 
локации, ШКАТУЛКА - пока не видна 
и тд, для. всех 9 предметов. 
являющихся инвентарен (включая н 
те, которые изменяют свое состо- 
яние в процессе игры}. Если Вы 
захотите, чтобы вначале игры ка- 
кой-нибудь объект накодился У Вас 
в руках, то надо для него задать 
нонер 99 - это будет соответст- 
вовать "объект взят“. 


| Загрузчик. 

листинг_3  яваяется 
ком. Его Функции - переустановка 
КАМТОР, загрузка русского сии- 
вольного набора и его активиза- 
пия, а также загрузка основной | 
Бейсик-программы демонстрационной 
игры (Листинг_8). 


Демонстрационная програмна. 

Автостарт программы происходит 
со строки 9940, где после загруз- 
ки кодового блока и блока данных, 
начинается задание параметров, 
сохраненных в кодовом блоке, за- 
даются массивы для переменных и 
т.д. Затем задаются символы 5- 
графики А-Н. Последние слумат 
для изображения ранок, оконтури- 
ваших текст. Они встречаются в 
тексте программы в кавычках. Весь 
текст за редким исключением (сим- 
волы "У" или "М") набирается по- 
русски, а встречающиеся символы с 
“А” по “Н” (например, в строке 
9988, СТРОКИ С 1000 и др.) - это 
символы С-графики, изображающие 
раики. , 

Подготовка искодных данных за- 
канчивается строкой 9989, где уп- 
равление передается на начало ис- 
полнения программы - строку 100. 
В процессе отладки, когда Вы 6У- 
дете останавливать  програмну, 
вновь стартовать ее модно, подав 
конанду С0 ТО 100, но не кон 100. 


«Окончание - в следующем 
номере) 
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(С) Натвеев Ю,л., 1993 Г. 


‘СТРАТЕГИЯ, КАПИТАНА 
КРЕНОНА 
{по нотирам програнны: 
ВЕВЕЙ, ЗТАВ) 


Часть 2 
СТОЛКНОВЕНИЕ 


‚ Они снотрели на белый, ‘осие- 
пительно яркий диск Венеры, кото- 
рый занинал добрую половину 06- 
ЗорНого экрана. У ‘самой кронки 
диска, в Фиодетовой дынке, ги- 
гантскин алназом сверкал в сод- 
вечных лучах орбитальный комплекс 
"Венера-центр”, окруженный целой 
Флотилией грузовых и пассажирс- 
ких Корабщей разносбразнык Типов 
д нарок, 

Позет близился к кончу. Чёрез 
Час коснический лайнер “ВИкинг” 


вия гравитационного поля комплек- 
са. Кренон сидел в пол-оборота к 
экрану и часто поглядывая на вну- 
Ка, наблюдая за его реакдией на 
великолепный космический ‘пейзах;, 
созданный природой и чепонеком. 

'- Здорово: - не отрывая глаз 
от ‚Экрана 'с восзишением сказад 
юноша. - Это не то, что ва надих 
тренажерах в иколе. 

`  Кренон похлопал внука ‘по опле- 
ЧУ: 


= Ничего. Учись пока, скоро 
сам летать будень, 
- Скорей бы, - вздохнуи буду- 


пилот сверхскоростных звезд- 
вых кораблей Он развернулся в 
кресле и ХИТРО пПРИШУРрИЛСЯ. — - 
мы скоро прилетин, а 
ты еле не рассказал мне про вату 
Встречу с инопланетянани. 

Кренон посмотрел на часы. Че- 
рез два часа ови будут на Венере, 
В гостях у его друГа детства, до- 
ва кейлони, и тогда ему трудно 
будет найти свободную  нинутУ, 
Чтобы спокойно рассказать, внуку о 
той трагической встрече с ковар- 
ными звездными монстрами. 


Это случилось во вренена вели- 
ких завоеваний человечества, Рас- 
ширялись границы обнтания, откры- 
вались новые миры, строились ог- 
|ромные звездные лайнеры, снособ- 
ные переносить все большее  коли- 
чество землян на дальние косни- 
ческие колонии. человеческая 
чивилизация заняла достойное нес- 
то во Вселенной и была одной из 
самых Молодых и быстрорастуших. 
Космическое пространство на’ ве- 
сятки. парсеков от Солнца было 
досконально изучено и тшательно 
исследовано. белых пятен остава- 
лось все меньше, однако... 


Эта первобытная планета ему 
сразу ве не понравилась. Вполне 
подходящая для жизни, 
кин-то не вполне понятный  причи- 
нам, еше долгое время оставалась 
неизученной. Странно, что зеная, 


должен был достичь границы дейст-' 


она по ка- 


исрытивающая постоянную нехватку 
ПРИГОлНЫХ для хИзыи планет, так 
вяло нроводида исследования на 
Зеро. В назвавие планеты перво- 
открыватели влохили ДВОЙНОЙ 
снысл: с одной СТОРОНЫ | ЭТОТ мир 
некоторое. время действительно 
был перевадочной базой для круп- 
вых мехзвездных экспедиций,  сво- 
его рода "точкой отсчета” новых 
завоеваний. С другой стороны, не 
знушакжие оптимизна скудная рас- 
тительность и серенький зивотный 
нир. еле умешавшиеся на единст- 
венном материке, который скорее 
походил на остров, онываеный со 
всех сторон холодным  океанон. 
Планета. неё опзаваала надежд кос- 
мобйойогов и ‘серьезные иссаедо- 
ватеци с’ разочарованием унывали 
руки. 

‚ Один единственный город, по- 
строенный колонистани, распола- 
гался на юге материка. Там же на- 
ходился и космопорт. север, из- 
за своей труднодостуиности, бып 
назоизучен и злесь оставались об- 
ширные зенли, где еше не ступала 
нога человека. 

Периодически ‘из числа колонис- 
тов Форнировались экспедиции для 
изучения природы материка,  кото- 
рые с каждым разом уходили все 
дальше и дальше на Север. хизнь 
па Зеро текла ‘своим черекон и, 
казалось, начто не когло покодё- 
бать ее спокойствие и размерен- 
ность. Однако вскоре произошло 
непредвиденное. 

В один ясный, 
прервалась связь с экспедицией 
профессора Длонсона, который был 
ведущим специапистон по Флоре и 
Фауне дикого Севера планеты, Спа- 
сательный фтряд, собранный наспех 
из добровольцев и в срочном по- 
рядке отправленный на поиски, 
бесследно нсчез на следующие сут- 
ки. Тогда ‘руководство колонии и 
обратилось за помошью в Зональный 
центр Космической Безопасности. 

капитан Кренов возглавил де- 
сантный отряд из шестналиати че- 
ловек. В его подчинения были не- 
плохо подготовленные десантники. 
Многие из них ухе прошли корОшУЮ 


холодный день 


`закалку в поисковых и спасатель- 


ных операдияк. 

Получив задание, отряд капита- 
на Кренона немедленво приступил к 
его выполнению. Город выделил де- 
сантникам легкий винтолет, на ко- 
тором сразу из космопорта их до- 
ставили в район’ поиска пропавиея 
экспедиции. } 

Надо сказать, что северная 
часть материка буквально утопала 
в смердяших болотах, а небольшие 
участки суши покрывали непроходи- 
ные заросли ползучих лиан. и 60- 
лотного тростника, Иногда здесь 
можно было встретить не очень вы- 
сокие пальнообразные деревья с 
толетымя сочвыни пистьяни ядови- 
то-фиолетового цвета: живности 
здесь быно немного. если не счи- 
тать болотных крыс размером с ко- 
рову, да местных крокодилов с 


даиниыий эдехтрическики шупальда- 
ми. И с тени и с другими встреча 


не сулида ничего хорощего: остры- 
ми, словно лезвие бритвы,  клыка- 
ми, болотные крысы ногли, пожа- 


дуй. перегрызть стальной канат в 
РУКУ ТОЛЩИНОЙ, а 06 электрических 
крокодилах, которых колонисты на- 
зывали свамперами, ин говорить не 
ПРИКОДИЛОСЬ. 

Отряд ше цепью. Вот ухе вто- 
рые сутки, используя светосабли, 
они продирались сквозь заросли 
лиан. -От, сырого воздуха’ напол- 
ненного зловониями болотных испа- 
рений, мутило, а ноги деревенели 
от постоянного сопротивления вяз- 
кой хлюпающей хихи. 

В два часа пополудни Кренон 
связался с ‘Центром и додожна о! * 
результатах первых суток поисков. 
Получив необходимые ‹ИБСтТрУКкиИм, 
он решил дать отдохнуть уставшим 
десантникан: ; 

Отряд расположился на’ неболь- 
шой поляне, окруженной со всех| 
сторон густым ‘кустарником ‘На 
привале они обменялись мнениями, 
Рыхеволосый Зира Кама скептичес- 
ки относился к приказу Центрай. 
продолжить поиски. Он про 
забрызганное грязью лазерное 
рУхЬе И УГРЮНО бубнил что-то про 
свамперов и крыс. В той или иной 
степени его поддерживали 
трое: Джекки Доннелли, 
Варки и Дон Кейлови. 

=. Ин там, легко рассуждать, - 
ворчал Марки, - Пойдите туна, пой- 
дите сюда... Пусть сами  подышат 
местным аронатон. Этого профес- 


сора наверняка давно сожрали 
свамперы. а мы тут илен сави не 
знаен что. 


= да ладно тебе, - одернул его 
дон  кейлони,  уловив  нрачный 
взгляд Кренона. - Скоро вернемся, 
не вечно зе нам ’здесь блуждать. 
Правха, кавитан? 

кренон нногоэзвачительно посмо- 
трел на Дона и, расстегивая крю- 
чки комбинезона, повернулся к 
диане Вудлей - врачу отряда: 

- Больные есть? у 

7 Все здоровы, - ответила Диа- 
на. 

- Тогда какого дьявола мне 
здесь закатывают ‘истерику?  - 
вскипел капитан, ‘поднимаясь с.на- 
ДУВНОГО ПОКОдНОГО Кресла, давая 
тем саныи понять, что любые споры 
закончены. - Значит так. здесь 
разбиваем постоянный лагерь. Со 
нной продолжат поиски десять ‘че- 
ловек. остальные, включая врача, 
остаются в лагере до нашего `воз- 
врашения. Вопросыт.. } 

- Бто остается? - спросил Люк 
Сопо. ° 

- 410? Я разве 
Кренон зактнался. - В аагере ос- 
танутся кайрал Хикс, Дэниел Дар, 
Хадсон, Диана Вудлей и Лазарь 
Шарки. займетесь баагоустройст- 
вом лагеря. Ну и ужин хороший 
приготовьте. Ны к вечеру вернен- 
ся. 


не сказал? - 


- Смотрите только сами себя 
свамперам не скориите, - добавия 
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Кренон оставлял в дагере саных 
молодых десантников, рассчитывая 
‚шишь на опытных партнеров. 

Спустя полчаса груйпа из один- 
наднати человек продолжила поис- 
ки. Тогда они еше не знали, что в 
лагерь ин не суждено будет вер- 
нуться, а некоторые из них и во- 
все навсегда останутся в этих 
проклятых Богом болотах, 

Когда в воздухе прогремели вы- 
стрелы, разрывая привычную тиши- 

Кренон остановился и прислу- 
шался. Шедщий рядом с ним дон 
Кейлони ловкин двихением перевел 
лазерное ружье в боевое положение 
и вопросительно посмотрел на не- 
го. командир десантников включил 
рацию: й 
- Кто стрелял? Прием... 

Какое*то вреня в эФире царила 
мертвая тишина. Все замерли в 
ожидании ответа. Затен на связь 
вышел Сью Ноу. Его хриплый,  веч- 
но простуженный голос трудно бы- 
ло с кем-нибудь спутать: 

- Это я. По-моему, ны забрели 
в гости к болотным крысам. Одна 
меня только что чуть не слопала, 
Вы там смотрите в оба. Не нравит- 
ся ине все это. 

- Слушайте ной приказ, - 
тельно сказал Кренон. - Держитесь 
блихе ДРУГ К ДРУГУ. Оружие ПРИ- 
вести в боевую готовность. 

Он поскотрел налево и увидел 
как к вим с доном кейлони идут 
хенли и Курт Левин. Справа при- 
близились Люк Соло, Джин Дигриз и 

Кренои подал знак ру- 

давая понять, что дистанция 

‘стада оптимальной, и оии продол- 
Жили ПУТЬ. 

Вскоре ин вновь пришлось прео- 
долевать непроходимые заросли 
Гползучих лиан. Дон обнахжил свето- 
саблю. Неожиданно справа замелес- 
тели упругие стебли и прямо перед’ 
ними, обжигая горячим дыханиеи, 
появилась огромная серая морда 
болотной крысы. С черной.  покры- 
той жесткой шетиной  клыкастой 
пасти стекала желтая пена. Гото- 
вясь к прыхку. крыса попятилась и 
угРОохаюте приподнялась на задние 
когтистые лапы. Все произошло на- 
столько быстро, что дон даже не 
успел ударить химника светосаб- 
лей. Кренон, шедший следом, от- 
прыгнул В СТОРОНУ и Два раза на- 
хаа на пусковую кнопку  Фотонного 

После первого выс- 


реши- 


агрессор, 

‘траву налиновой ‘кровью, в пред- 
смертных конвульсиях завалился 
ва бок. Длинный, похожий на ка- 
нат.  облезаый хвост крысы нес- 
колько секунд судорожно метался 
по траве, пока не занер, 

- Спасибо, друг. - Дон благо- 
дарно исснотрен на капитана. 

У кревона дрожали руки, но он 
старался не подавать виду: 

- Иден. .. . 


Нестное светило стояло почти в’ 


зените, 


не ощущалось. Толиман - так назы- 
валась звезда, вокруг которой 
врашалась планета. очень похожая 
ва Солнце, эта звезда, олнако, не 
могла согреть Зеро, из-за обилия 
космической пыли. плотным облаком 
прикрыравшей планету от света. 
Вероятно в дадекон будущем из 
этого скопления пыли образуется 
спутник Зеро и тогда света станет 
несомвенно больше и жизнь ва пла- 
нете начнет развиваться бурными 
темпами. А пока, скорее похожая 
на царство теней, планета остава- 
лась холодным шариком, населен- 
ным опасными хишниками,  выкивши- 
ми в хестокой схватке с природой. 

С этими мыслями Кренон пересек 
небольшое болотце и вышел. на 06- 
шиРное сухое пространство, покры- 
тое низкой травой и мхом. То, что 
он увидел, никак не вписывалось в 
ранки его представлений об этой 
планете. Прямо по центру поляны, 
образовывая правильную  окрух- 
ность, стояли несколько тшательно 
отполированный булыжников высотой 
с человеческий рост. В центре ок- 
рУЖнОоСТи располагался гладкий 
плоский камень красного цвета 
таких разнеров, что ва нем могли 
без особого труда ушеститься пара 
ВЗРОСЛЫХ болОТНЫх КРЫС. ПРОСТРАН- 
ство вокруг этого странного соо- 
ружения было усеяно костями. Кар- 
тинка из древних Фильмов про кро- 
вохадных туземцев. Кренон ‘застыл 
в нерешительности. Он не заметил. 
как сзади тихо подошли дон Кейло- 
ни и Курт Левин. 

- Что скажешь,  командир?- 
спросил дон, ловким движением 
убирая светосаблю в ножны. 

Кренон не ответил. Дон котеп 
еше что-то спросить, но его слова 
потонули в треске близких выстре- 
лов. Стредяли сразу из нескольких 
стволов. Потом они услышали чьи- 
то выкрики и ругательства. Курт 
левин. не говоря ни слова, выхва- 
тил из кобуры лазерный пистолет и 
пончался через всю поляну на звук 
выстрелов. Еренон уже успел по- 
нять, что отряд столкнулся с це- 
лын полчишем болотных крыс. Когда 
все стихло на связь вышел Леон 
Троцкий; 

- У вас все в порядке. зЗавали- 
ди парочку крысенышей. Никто не 
пострадал... Капитан. мы на 6е- 
регу ручья. Переходить? 

- Подождите, = КБренон смотрел 
на джина Дигриза, который стоял 
вдалеке, на противоположном конце 
поляны и подавал какие-то знаки. 
- Джин, вижу тебя. Что случилось? 

- Там кто-то есть, - Дигриз по- 
казывал РУКОЙ на север. в сторо- 
Ву РУЧЬЯ. - На крыс вроде не по- 
хохе. 

- Я тоже заметил какое-то дви- 
хение. - Это был голос Сью Ноу, 
который замыкал цепь десантников. 

‘ Элиер Креной внимательно по- 
снотрел вокруг. Странное соорухе- 
ие из камней и, замеченвое нно- 
гими двихение на другом `берегу 
ручья, заставляли задуматься. В 
голове вихрем пронеслись кровавые 


- дут Дон, 


экспедицией профессора Джонсона. 


и < колонистами, ушедшими на ее 
воиски. 


Удивительным было то, что ни в 


одном справочнике по этой планете ‹ 


не было пи слова о какой-либо, 
пусть даяе примитивной, Форме ра- 
зУмНОЙй жизни. Видимо, недаром 
Джонсон уделял такое пристальное 
энимание северной ‚части матери-| | 
ка. Перспектива оказаться на ре-|. 
пигиознон обряде аборигенов в ка- 

честве жертвы, приносимой В угоду!’ 
нестному божеству, Кренона конеч- 

но ше ие устраивала. Но и отсту- 


пать ему совсем не хотелось. он. 


успокаивая себя ‘тем, что воору- 
женным и хоровю обученным солда- 
тан ие составит особого ‚труда 
разобраться с  доисторическимий. 
туземцами, стояшими на несонненной\ 
более низком уровне развития. Ну 
разве ногут спорить с лазерным 
оружием каменные топоры? 

Кренон котел было уже отдать 
Приказ собраться всен на поляне 
как в воздухе рядом с ним со сви- 
стом пронеслась стреда и глубоко 
воткнулась в ствол одиноко стоя- 
шей фиолетовой пальмы в пяти ша- 
гах от него. Невидимый лучник 
прятался в небольшой рошё ниже по 
РУЧЬЮ, ‚ 

- Быстрей сюда!- Это кричал 
дон Кейлони. который вовремя со- 
риентировался и уже успел спря- 
таться за ближайшими кустами. 
Вознохно, его окрик спас Кренону 
жизнь: вторая стрела просвистела, 
рассекая воздух. прямо над тем 
клочкон земли, на котором только 
что стоял капитан. ЭФир заполни- 
ли голоса и крики десантвиков. 
Стрелы летели с противоположного 
берега РУЧЬЯ сразу из нескольких 
мест. Похоже, что лучников было 
иного, может быть десяток, а тои 
два. 


- Командир, говорит дяекки до- 
ннелли. У нас тут ранили Сью ву. 
Я осмотрел стреду. Облита какой- 
то гадостью. Похоже на яд.., 

- Я в порядке, - скрипя зубами’ 


перебил напарника Сью. - 
тоаько кисть руки. 

- Вы как хотите, а я открываю 
огонь, - 

ЭФире женский голос. 

Васкез - нолодая горячая девушка, 
только недавео закончившая Школу 
Космических десантников, но по 
УРОВНЮ боевой подготовки не усту- 
павшая многим сослуживцам - мух- 
чинан. 

- ФВаскез, успокойся, - сказал 
Кренон, виимательно разглядывая 
противоположный берег. - Абориге- 
нов надо отвдечь. Леон Троцкий 
возглавит группу, которая попро- 
бует обойти их с тыла, С нин пой- 
КУРТ, Люк Соло и Зира 
Кама. пройдете направо вверх по 
ручью, перейдете на тот берег и 
атакуете тузенлев с тыла. 


Задета 


позицию. я, 
пойдем следом за ними и, 
чего, поддерхжии огнем, Васкез, 


тесь пока в УКрытии и смотрите 
в оба, чтобы нас самих не обошли. 
Задача ясна? 

Вопросов не было. Кренон хло- 
шнул по плечу притаивиегося рядом 
хейлони: 

= С Богон! 

дон короткими  перебежками от 
куста к кусту стад пробираться к 
леону Троцкому. За спиной, не 
сказав ви слова, прошныгнул и 
Курт Левин. . 

Кренон подождал пока к ненх 
подойдут Зира Кама и Хенли, а 
затен быстро перебежал ближе к 
РУЧЬЮ, Который ‘НИРНО хУрЧчал по 
ТУ СТОРОНУ. поляны. За ним после- 
|довали остальные. Выбрав удачную 
позицию за полуразвалившимся ва- 
пуном, утопаршин в болотной жи- 
же, Креной осмотре, противополох- 
ный берег ручья. освовательно за- 
Росший высокой травой и кустарни- 
ком. Пальмовая роша, из. которой 
вылетела первая стрела. накоди- 
лась девее, виже по ручьф. ниче- 
го подозрительного тан не наблю- 
далось. Видимо, туземцы были хо- 
Рошими воинани и удачно использо- 
вали естественную среду для мас- 
КИРОВКИ. 

- Левон, отзовись, - Кренон ‘не 
©'трывал глаз от пальновой ропи. 

- Все в порядке, - доложил 
Троцкий. - Только что видели сван- 
пера, Быстро плавает, ничего не 
скажешь. Правда, ны его все равно 
обогнали. ‘Так что. когда пойдете 
через ручей, будьте? осторожны - 
дедушка крокодил остался голод- 
ным. 

- Учтем обязательно, - 
креновн. 

Тишина уже действовала на нер- 
вы. Казалось, что не быдо никакой 
атаки тузенцев, не свистели ядо- 
витые стрелы. Но внутреннее чутье 
подсказывало. что враг рядом и 
пристально следит за кахжлым их 
жвижениеи. Бренон посмотрел нале- 
во и увидел, как из плотной стены 
болотного тростника выскочил Дле- 
кки доннелди и, чуть пригнувшись, 
побежал к берегу ручья. В этот 
момент капитан десантников и за- 
нетил аборигена. Сзачала как-то 
подозрительно зашевелился разве- 
систый куст на противоположном 
берегу прямб напротив. пересекав- 
шего поляну Джекки, а затем, сло- 
вно из-под земли, гоявилось ОНО. 
Кренон находился в удобной пози- 
ций. под угаон к существу, и ему 
Удалось хорошо рассвотреть его. 
Высокого роста, передвигавшийся 
ва двух мускуУЛлиСТыЕ ногах, по- 
КРЫТЫХ СОРОЙ чешуей, монстр. ско- 
рее моходил на динозавра из-за 
своей продолговатой, с 


ответил 


ним разунное существо. но массив- 
ный УК В МУСКУЛИСТЫЕ руках и 


сами за себя. 
Абориген собирался стрелять по 
бегушему десантнику и Кренону 


требовалось во что бы то ни стало 
опередить его. Он о прицедился в 
голову и, в тот моневт. когда 
нонстр уже натягивал тетиву, вы- 
стрелил. Неприятель = дервулся, 
словно от удара током, однако на 
яогах устояа и попытался соря- 
таться за кустом, но о второй ЛУЧ 
насквозь прочег покрытый чешуей 
череп. Кренон был неприятно удив- 
лен увидев, что монстр не свалил- 
ся ‘после первого выстрела, а дазе 
попытался скрыться. Такой степе- 
ньр зашиты не облалали даже бро- 
нехилеты зенлян. Кренои помакая 
рукой в ответ на благодарственное 
приветствие доннелам, который ус- 
пешно добрался до зарослей трост- 
ника у самого берега, 


°’ч Командир, - вышея на связь 
Троцкий, - я видел, как. ты его 
уложил, но похоже это тоаько 


начаво. Я 

Над болотами пронесаось эко 
выстрелов. Кренон на слух опреде- 
лил, что стреляли из Фотонноге 
излучателя и из лазерного нисто- 
нета. Видино, группа Троцкого 
столкнулась с аборигенани. 

Под прикрытием Джекки Дониелли 
Кренон, Хенли и Зира Кана в нгно- 
вение ока перебрались на другой 
берег. 

Впереди за деревьини они 'уви- 
дели двух аборигенов. отступав- 
ших под ношным натиском десантни- 
ков. Кренон и его партнеры нахо- 
дились в очень выгодной позиции 
и ин не составило труда отпра- 
вить незадачливых лучников к пра- 
отнам. 

Когда все стихло капитан вы- 
шед в эфир: 

- Леон, 
к вам. 

Из-за деревьев появились Фигу- 
ры десантников. Кренон направийся 
к вим. На Леона Троцкого он сразу 
обратил внимание. Тот был явно 
чем-то озабочен и, когда капитан 
положен к нему, Троцкий колча по- 
казай в сторону голубой подоски 
небольшой реки, которая отделяла 
их от... Впрочем, Кревой не сразу 
понял, что он там увидел. В ред- 
ких просветах пальмового деса, 
начинавтегося сразу за рекой, бы- 
ли видны какие-то постройки и со- 


не стреляйте. Ны иден 


оружения. 
- Похоже. это их погово, - ска- 
зал Троцкий. - Что будем делать? 


- Вообще-то это уже ие по на- 
шей динин, - заметил Зира’ Кана: - 
Нет никакого снысла туда  совать- 
ся. 

- Надо идти. - Кренон был непо- 


колебим. - И ны должны выяснить 
все, чтобы те, кто придет посае 
нас, могли здесь спокойно ‘рабо- 
тать. 

Он вкаючна передатчик: 

- Васкез, как у. вас? 

= Тут правии диана, Хикс и 
Хадсон. Они услышали стрельбу н 


поэтону поспешили к ван. 

- Командир, - вмешался капрал 
Хикс. - Мы можен чем-нибудь по- 
ночь? | 


- Вызывайте из лагеря  остадь- 
ных. Ны нашди логово : пануа- 
сов. Все ищем туда. Ваша группа 
пойдет по девому фланг? через ус- 
тье реки. Направление точно на 
север. Заодно  прикроете“ нас. 
Старший групиы - капрал Хикс. 
Все, кто еше’ не перешел ручей, 
присоединяются к ван. Понятно? 

Капрал Хикс не ответил.  Внес- 
то этого по лесу прокатилось эхо 
выстрелов. 

-’Я думаю, они разберутся, - 
пробормотал Кренон. - Пошли. 

Где-то совсен рядон просвисте- 
па стрепа. 
КРИК и, обернуася. 
движений лежал окровавленный де- 
сантник. Это был Люк Сово. Стрела 
угодмла ену в висок. 

-_Убит. - выдохнул зира Кана, 
склонившись над ‘телом. 

Еява он успел произыести это 
слово, как над его головой.  сши- 
бая ветки кустов, пролетели пу- 
ли. Зира парЕНУЛСЯ на зеклю и 
замер. Вся группа ‘затаилась в 
ожидании. ‘На’ время все `стихло. 
Кренон прятался за толстым. ство- 
лои старой пальмы. Это было что- 
то новенькое: туземцы, как оказа-| 
лось имели огнестрельное оружие, 
"Вот тебе и каменные топоры, " - 
подумал командир десантников, 
присаушиваясь к каядону вороку. 


- Одного я вижу, - прошептал 
стоявший рядом дон  Кейлони. - 
Попробую. .. 


Он не договориа. На их ГРУППУ 
свова обрушился град пуль и 
стрел. Аборигены засели у ‘саного 
берега реки м, видимо, никого не 
собирались пропускать на другую 
СТоРОкУ. Но Дону удалось исполь- 
зовать секувдную. паузу: его ла- 
зерное ружье выстрелило в тот мо- 
нент, когла один из аборигенов 
попытался проскочить мехду дере- 
вьями. Выстрел оказался точным. 
Вассивное тело монстра покачну- 
лось и, под хруст лонаеных веток, 
завалилось на землю. Вдохкновлен- 
ные удачей кеблони, десантники 
открыли огонь по заросаям трост- 
ника, -за которын прятались ту- 
зениы. Под хорошим прикрытием ла- 
зерных лучей Курт Левия добрался 
до трупа ‘аборигена, убитого дДо- 
ном и ‘тан подобрал снертоносное 
оружие внеземного проискохдения. 

когда десантники прекратили 
обстрел. вражескик позмдий, Курт 
показал орухие инопланетян Крено- 
ну. ; 

- Так это. хе терминатор! - 
воскликнул капитан, нзяв в. руки 
ружье; у 

Бурт утвердительно кивнул. 
Всем опытным десантникан было 
известно это ношное оружие, кото- 
рое по своим характеристикан ног- 
ло сравниться, пожалуй, даже с 
Фотонным излучателем. Терминатор 
стреляя разрывными пуляни, напол- 
ненными кислотой. В нагазин поме- 
шалось до двухсотпятидесяти пат- 
ронов, ЧТо яваялось неоспоримым 
преимушеством перед нногинй  дру- 
гими внланы оружия. Помико этого 
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. Пружье имело , оптический прицел с 

ивстроенным прибором ночного виде- 
ния и еще массу всякого рода до- 
стоинств. Впервые . терминаторы 
обнаружили на`одной давно вымер- 


‘там, был найден целый арсенал вся- 
\когоф рода вооружений. Ццивидиза- 
ция, оставившая это наследство, 
перестала сушествовать задолго 
до появления первого Человека на 
Земле и. вообщен-то, не достигла 
больших высот. в освоении Вселен- 
ной из-за глобальной термоядерной 
войны. практически уничтоживлей 
планету. Кто дал орулию название 
\гернинатор никто уже не. помнил, 
|но оно было во всех учебниках по 


| воорузениям. у 
- Боюсь, что ны их ве за тек 
приняли; - Всдух подумал Кренон, 


[отдавая ипопланетное оружие Курту 
Левину. 

- Насколько ‘мне известно, в 
системе Сириуса цивилизация ‘была 
|гуманоидной, а эти нонстры ничего 
[общего с ними не имеют. - Курт по- 


- А это ух пусть ученые  реша- 

хак ‘тернинаторы попали ‘к 
этим...- Кренон не нашел подходя- 
шего вазвания для существ, се ко- 
"ГОРЫНИ ОНИ СТОЛКНУЛИСЬ, 

В продолжение этого разговора 
они двигались К реке, за которой 
находилось догово монстров. Нес- 
Колько Раз ин примлось вступать 
в-перестрелку с тузфнцами, воору- 
женными терминаторами и лукани. 
С лучниками все было достаточно 
просто, а ‘вот с обладателяни ору- 


лось ПОВОЗИТЬСЯ. 
| Когда они добрались до огрон- 
[ного каненного строения,  изунле- 
нию | их не было предела. Непра- 
'вильной Формы, с нногочисленными 
походившими скорее на 
старинных крепостей, 
строение действительно напомина- 
ще призенистую крепость, каких 
|на Земле, впрочем, никогда не 
|строили. То, что издалека им ка- 
залось многочисленными постройка- 
ми, на самон деде оказалось одним 
единственным домом, иневшин  нес- 
колько прилегавших друг к другу 
'флигелей. ‘Ухохенная плошадь перед 
договом НоНСтРОВ была пустынной. 
Интересным было еще и то, что у 
| этого дома не было дверей, в при- 
вычнон понимании. Вместо них в 
стенах чернели. проходы, похожие 
|скорее на норы диких животных. 
Группа капитана Кренона при- 
близилась к строению с правой 
под прикрытием камен- 
ных стен, направилась ко входу. 
остановившись возле норы, ведущей 
Кренон Вышел на связь с 
группой капрала Хикса. и 
без предисло- 
пвий сообщил Хикс. -. Мне удалось 
‘прорваться и я сейчас иду к вам. 
- диана, - позвал Кренон. - от- 


- Погибла диана, - прохрипел 
Сью Шоу. - Сванперы убили. Ова 
была ранена и не усшеаа перейти 
ручей. .. Васкез, ‘прикрой меня. 


КОНПЬЮТЕРНАЯ НОВЕЛЛА 


Прогренели залпы далеких выс- 
трелов. Всем было ясно. что груп- 
пе капрала Хикса пришлось туго. 
Но лишь благодаря им Кренон и его 
партнеры о получили . возможность 
побраться до логова монстров: 

капитан подожиал пока затихиут 
выстрелы, а затем. снова вышел в 
эфир: й 

- Все кто меня слышат - 
витесь. 

- Дэниел Дар на связи. Ны с 
Шарки вызвали спасательный ко- 
рабль. Он уже вылетел. Сейчас 
иден к ван по вашему’ следу; 

- Хорошо. 

- Капитан. это джин. Мы с Вас- 
кез и с Хадсонок пытаемся вы- 
рваться из окружения. Как слышно? 
Прием. 

- Слышу вас. Сью, 
Приен, у 

Сьх Моу на связь не вышел. `На- 
прасно Кренон вызывал его. Бидино 
ему так и не примлось перейти 
злосчастный ручей. Никто больше 
не видел Сьр с того рокового, но- 
мента, когда он, под прикрытием 
Васкез, ‹ попытался прорваться 
сквозь окружение. 

- Говорит дДжекки доннелли. У 
неня все в порядке, я подхожу к 
реке. 

- Ны иден в гости к нонстран, - 


отзо- 


ты где?. - 


сообщил для всех Кренон и, повер- 
вувшись к десантникам, которые 
стояли рядом, добавил: - НУ что 
=, ПОСНОТРИМ, как они нас встре- 


тят,.. 
В небе сгувались сумерки, ко- 
гда они вошли в дон. Прямо у вко- 
да их встречали два нонстра с 
трезубцами в сильных руках. Впро- 
чен, для десантников не составило 
особого труда быстро с нини рас- 
правиться. за спинами монстров 
прятались детеныши этих  загадоч- 
ных существ. Когда Кренон вошел 
в просторное понешение с Фотонным 
излучателем наперевес, детеныши 
бросились врассыпную. : 

- Курт и хенли налево, осталь- 
ные за мной, - скомандовал Кренон, 

каненный пол и стены небольшо- 
го зала, в котором они оказались, 
были расписаны причудливыми узо- 
рами. Справа от них, у стены пря- 
мо сквозь пол рос небольшой куст 
какого-то растения с  мирокими 
плотными листьями, а на противо- 
положной стороне они увидели два 
отронных яйца, из которых  по-ви- 
димому и вылуплялись аборигены. 
Каждое яйно пежало отдельно в не- 
большон углублении с подстилкой 
ИЗ СУХОЙ травы. 

Оснотр зада занял всего нес- 
колько секунд, но как только це- 
сантники приблизились к своеоб- 
разному инкубатору, произошло то, 
чего ‘так опасался Кренон. в 
ШИрОКОМ ПРОХОДЕ В соседнее  поне- 
шение появилась громадная тварь, 
только отдаленно  напоминавшая 
ИОНСТРОВ, С КОоТОоРЫНИ ОНИ воевали. 
скрюченное  туловише существа, 
покрытое серым панцирем,  вен- 
чала гигантская голова с чешуй- 
чатой нордой. Из продолговатого 


рыбьего рта торчали клыки, а 
большие выпуклые глаза налинового 


цвета зло снотрели из под свисав-| о 


ших мешками век. Уродливые тонкие 
руки были сложены на покатой гру-1 
ди. Тварь передвигалась на двух 
жирных коротких ногах, 


сомневий это быпа матка нонстРов. 
десантники открыли огонь. Лазер- 
ные' лучи шипя вгрызались в проч- 
ный панцирь, оставляя на’‘серон 
теле черные выжленные пятна. Но; 
похоже, мамаше этих тварей, ‘лучи 
лазерных ружей и пистолетов не 
доставияли особых неудобств. Под 
лавиной огня матка ухитрилась не- 
сколько раз. выпаювуть кисаотной 
слюной, едва не зацепив кого-то 
из десантников. Каменная стена, в 
которую попааа тварь в считанные 
секунды превратилась в пыль. Их 
спасало только то, что ‘расстоя- 
ние; на которое долетала’ кисаота, 
было небольшим и, выдерживая без- 
опасную дистанцию, они достаточно 
спокойно вели обстрел. Положение 
осложнялось, однако, тем, что де- 
теныши монстров не остались (в 
стороне во время этой схватки, а 
бросились на помошь своей намаше, 
Они были 6ез орухия. но их  креп- 
кие зубы без особого труда ‘ногли 
перегрызть горло любому человеку. 
От клыков одного детеныша по- 
страдал Хенли. Он  перезаряхал 
пистолет, когда к нему сзади под- 
крался детеныш и, запрыгнув на 
спину десантнику, вцепился клы- 
кани в шею. от ненинуемой смерти 
хенли спас Леон Троцкий, одним 
выстрелом  УЛоживШий монстра: 
Битва ‘закончилась неожиданно: 
После очередного залпа матка, 
обстрелянная со всех сторон,  из- 
дала предсмертный крик’ и  опроки- 
нулась навзничь, звонко ударив- 
шись панцирем о каменный пол. 
Разобраться с отдельными затшит- 
никами королевы племени было ухе 
нетрудно. Группа Кренона прошла 
вглубь опустевшего логова и с 
радостью встретила тан до ‘зубов 
вооруженных инопланетным оружием 
Хикса, Васкез, Хадсона’ и джина 
Дигриза. 

- А где джекки Доннелли? - по- 
интересовался Кренон у Васкез. 

- На корабле. 

- За нами уже прилетели? - он 
выглянул в окво и действительно 
увидел стальную кромадину кораб- 
ля, удачно посаженного прямо У 
выхода из жилива монстров. 

Кренон связался с  Дэниелом, 
который вместе с Шарки в эти ми- 
нуты уже пересек поляну перед 
доном н сейчас направлялся к’ ко- 
рабаю. дэниел ответил носае не- 
долгого молчания: 

- Нан надо поторапливаться. Ны 
только что видели целый отряд ту- 
зенцев, который пришел с юга. они 
видино вернулись с охоты и сейчас 
направляются сюда. 

Как в подтверждение этих слов, 
со стороны реки прогремели выс- 
трелы. р 

- Хватит нан 
снертей, 


бессмысленных 
всем быстро ва корабль! 
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- ВЫКрикнул. Кренон, 
десантников к выходу. 
они пересекли просторный кори- 
дор и оказались в понешении рас- 
стрелянной. королевы ‚аборигенов. 
Здесь они.снова увидели подунет- 
рРовые яйца, в которых развивались 
зародыши монстров, 

= Наверное их нужно прихватить 
< ‘собой,- высказал ниение Дон 


подталкивая 


"- Конечно, пусть ученые поло- 
|нают. головы, - поддержал его Троц- 
кий. 

Кренон с ними согласился и 
приказал. взять с собой несколько 
яиц. Повесив рузья за спину. Дон, 
Хадсон -и.Зира Кака подняли по од- 
ному яйцу и. последовали за всеми 
к Выходу. А у корабля уже шла пе- 
рестрелка и всем стадо ясно. что 
выйти без боя из дома ин не удас- 
ся. 

'У трапа корабля лежал сражен- 
ный пуляни Лазарь Шарки. Раненый 
дэниел Дар с перекошенным от боли 
личом прятался. за ‚угдон ‘дома. 

- Вы прикроен ‘вас, - ‚сказал 
Кренон застывыин в нерешительнос- 
Г котрые несаи тя- 
подобранные в коннате 


Это были самые трудные минуты 
в его жизни. Один за другим  де- 
сантники перебегали опасную зову, 
разделявшую выход и трап ‘корабля. 


На его глазая, нё добежав до тра- 
ра двух шагов, ‘замертво рухнул 
на землю Зира кана, настигнутый 
пулей. яйцо, выпавшее из его рук, 
осталось лехать на траве, мешая 
проходу ДРУГИМ. ‘В эти последние 
НИНУТЫ был ранен и сам кренон. 
Выбросив бесполезный  Фотонный 
изаучатель с ‘опустевнии нагази- 
ном, Элнер Кренон рванул к трапу. 
Пули зацепили его в тот момент, 
когда капитан бежал вверх по сту- 


‚ венькан. Все уже были на борту, и 


как только Кренон, тяжело дыша 
ввалился в люк, корабль стал мед- 
женио отрываться от земли, 

долго еше он не мог забыть зту 
высадку на Зеро. Иногда по ночан 
еку снились кошнарные сны, в ко- 
торых он опять вел свой отряд в 
логово монстров. а из зарослей 
болотного тростника погибшие Зира 
кама, Сью, Люк.Соло и Лазарь. Шар- 
ки укоризненно снотрели ему в 
снину и молчали. После этой исто- 
рии Кренон ушел. из отряда и. по- 
дался на небольшой частный ко- 
рабль, капитан которого был даль- 
вин родственникон  Кренона. И дол- 
гие годы он провел, занимаясь 
межпланетной торговлей. Многих 
из своего отряда он больше так и 
не увидел. Кто-то погиб на дале- 
ких планетах, а некоторые, как и 
он. оставили слуябу и поселились 


в разных концах Галактики. 


виервые за последние годы Кре- 
нон выбрался, Чтобы › навестить 
своего друга Дона Кейлони. кото- 
рый к этону времени уже возглав- 
лял Центр Коснической Безопаснос- 
ти Солнечной системы. Впервые он 
так отчетливо вспомнил события 
на Зеро и рассказал © НИХ ‘внуку. 
Но он не смог удовлетворить любо- 
питства юноши; поскольку не знал 
всех подробностей расследования 
тибели профессора Джонсона. 


г дед, ну откуда тогда у. этих 
МОНСТРОВ взялось инопланетное 
оружие? 7 


- Одно время ходили слухи, что 
эти существа все-таки были даль- 
ними родственниками гунаноидов с 
Сириуса, но по каким-то причинам 
они пошли по другому нути разви- 
тия. Возможно, главную роль здесь 
сыграла термоядерная война, раз- 
разившаяся на их родной планете. 

- А как они тогда оказались на 
Зеро? 

Кренон встал из кресла и, за- 
стегивая костюм, устало поснотрел 
на внука: 

= Ты знаешь, спроси это лучше 
у дяди дона, когда мы прилетин. 

‚ Он посмотрел на экран. Их ко- 
рабль ухе. недаленно входил в шлю- 
зовые ворота стыковочного ‚отсека 
станции "Венера - Центр”... 


В эти октябрьские дни “ИНФОР- 
|КОНУ" ‘исполнилось. четыре. года. 
В связи.с этим мы предприняли ряд 
важных шагов, для которых, как 
настадо. врекя. 

„ к " и 


На днях принято решение (и 
соответствующие меры), чтобы 
"2Х-РЕБЮ” стал’ в будушем году 
полноценным изданием с полигра- 
Фической точки зрения. У него 
будет стандартный книжный Форнат, 
высококачественная печать, кра- 
сочная обложка, большее количес- 
„тво странид и значительно уве- 
дичится тирах. В отличие от 
прошлых лет ны ве бущем искус- 
ственно сдерживать тени’ его ‘`рас- 
пространения. Стиль и ‘содержание 
останутся тени зе. В соответствии 
< пожеланияни читателей больше 
внимания будет уделяться вопросам 
музыки, графики и работы в диско- 
вых систенах. К концу года плани- 
руется начать освешение работы 
*Спектруна” в сетях. 

Благодаря качественному поли- 
графическому исполнению кахдого 
номера ны откаженся от Традици- 
оной практики выпуска в конце 
года годового сборника. — Итак, 
годовой сборник "2Х-РЕВЮ-93” ста- 
нет последним. $ 

® " и 


= ПОСЛЕДНИЕ ИЗВЕСТИЯ | 


Объявленное в прошлом выпуске 
акционерное общество “ИНФОРКОН- 
ПРЕСС” прошло ‹ Государственную 
регистрацию и уже работает. ‘°За- 
канчивается подготовка первого 
номера электронного чурнала “РС- 
РЕВЮ", посвяшенного чисто игро- 
вой тематике для ТВЧ-совнестиных 
компьютеров. объен, содержание и 
оФорнление этого журнала пока 
являются, беспрецедентными для 
нашей страны. } 

Редакция нового журнала бу- 
дет представлена читателян в 
первом выпуске, который пойдет В 
распространение 01. 01. 94г. 

Журнал будет распространяться 
по каналам собственной сети реги- 


ональных — дистрибуторов Фирны 
без зашиты от копирования. ‚Под- 
робности сн. в "2Х-РЕВЮ"  Н 1-8 


за этот год. 

Подготовлены условия для ПРо- 
дажи ограниченного количества 
экземпляров этого издания в пода- 
РОЧНОм исполнении (в красочном 
альбоме) через специализированные 
компьютерные салоны г.Москвы по 
престижно высоким ценан 
1-12 $ за номер). Эта мера приня- 
та для поддержки региональных 
‘ДИСТРИбУТОРОВ. Наличие в Москве 


` престижно высокого ценового уров- 


ня будет способствовать успеху их 


(порядка. 


деятельности в регионах. 

* & « 

Вышел из печати и поступил в 

рассылку владельцам именных сер- 

тификатов второй тон "Графики 
Спектрума": 

* к * 

В ближайшие дни выходит из 

печати книга ”30 часов БЕЙСИКа". 


" „ “ 

Заключено соглашение нехду 
Фирнани “СЛОТ" и “ИНФОРКОМ” 06 
эксклюзивном освешении в 


*2Х-РЕВЮ-94" дисковой операцион- 
ной системы для "“Спектруна” - 
т5кгаро$5. 

Разработан план совместных ме- 
роприятий по продвижению этой 
системы на РЫНКИ программных 
средств СНГ. Эти маги согласованы 
с владельцем авторских прав на 
систену, компанией ТэзкгабоЕт, 
г. С. -Петербург и получили поддер- 
хку. (Фирна “СЛОТ”, г. Москва. яв- 
ляется Генеральным дистрибутором 
компании 1зкгазоРтТ). 

Подготовлена и передана в пе- 
чать книга, посвяшенная ваботе 
с этой системой. 

Систему 15-1005. пакеты прРи- 
кладных программ, разработанные 
под нее и сопутствующую литерату- 
ру МОЖНО будет приобретать как У 
фирм ТзКга$0+4 и "СЛОТ", так и шо 
каналам ”ИНФОРКОНа". ‘ 


2г0о 


РЕВ 


ЯН. 18 1009) 


*ЕНФОРКОН" — 121019, 


ры 


В ШКОЛЕ 


В последнее время нами статьи 
из рубрики "Спехктрун в школе“ 
предиазначаяись в основном для 
старшеклассвиков. Но ведь есай в 
Вашей школе есть кабинет информа- 
тики, то, наверное, и малышам бы- 
до бы интересно в него заглянуть. 
Предельно простая програнна, 
которую мы приводим сегодня.  по- 
служит для развлечения и приобще- 
ния К компьютеру тех, кто только- 
только учится считать по десяти. 

Суть программы состоит в том, 
Что на экране на некоторое’ время 
изображаются несколько фигурок ‘и 
малыш должен сосчитать, сколько 
их и налать соответствуювую кла- 
эму на компьютере. `В качестве 
Фигурок мы приняли любимых детьми 
*черпашек-нинлзя“, изобразив их с 
воношью четырех символов \Ле-гра- 
Фики. Несиотря на свою очевидную 
простоту, эта программа  мозет 
иметь вполне реальный успёх; если 


ввести’ в нее элементы 
мультипдикапин и красиво озву- 
чить. Так что дерзайте, все в Ва- 
шиЕ Руках. ] 

Конструкция одного "героя" 
сделана из четырех синволов 005 
и ‘ммест разнер ’16#16 пикселов. 
Символы располагаются следующии 
образок: 

А” 1 

гс} Со} 

Дия того, чтобы отличить син- 
волы 06 в програмне от обычных 
символов, мы взяли их в квальат- 
ные скобки. Вам. конечно, никаких 
скобок набирать при наборе про- 
граммы не вадо (вало только пе- 
рейти в графический рехин -  САР5 
ЗНТРТ + 9 — КУРСОР "6". 

$0 ВЕН "«СОСЧИТАЙКАНЕ 

20 ЦЕТ ма =310 

25 ГЕТ роуфог:140 

30 КЕМ Ввод символов графики 
пользователя. 


Восква, Г-19. 


а/я 16 


РОЕ п-0 ТО 31 

КЕАО а 

РОКЕ 052 “а” а 
МЕТ п . 

ВАТА 1,1: 3.15 

РАТА 31, 59, 63, 15 
ФАТА 128, 159, 134; 248 
РАТА 252, 198, 194, 128 


РАТА 55, ТО, 134.12 

РАТА 12, 12, 24, 15 

РАТА 224, 112,458, 38 

АТА 96, 96, 112,0 

КЕМ запустите набранные 
строки конандой КУН, после 


чего можете продоляать набор 


програниы. 


100 ЕТ а$=* (АВ) “ 
110 ЕТ ъ$:" (507 " 
120 ОТИ х(10):; ПИЯ у(10) 


130 ВОЕПЕР 1: 


РАРЕБ Т: 12: 


ВЕТЕНТ 1 


140 ВЕМ РОЗКОГ. 

150 515 

160 т Сол: 1+1 49 Яо) 

{70 ВЕН Расположение черепашек 
180 ТЕТ (1) =2=1тЫТ (16 ИНО) 

190 БЕТ у(1)-а* ТНТ 10*РЯЮ) 

&00 РОВ п-2 ТО сома 

210 ТЕТ Ж(п} =2 41 (16. ВИО) 


ЪЕТ у (п) =2*ТНТ (10% ВЫ) 


230 РОЕ К-1 ТО п-1 


250 НЕХТ к: 


ТР (п) =Х(К) АБО (УК) 


ТНЕН ГЕТ п-п-1: 

ВЕН Если у нас случайво 
совпали координаты позиции 
печати двух черепашек, то 
играющий на экране увидит 
только одну и потоиу этот 
варигнт надо исключать. 
НЕХТ п 


260 ВЕЗ Печать *черепашек” 
210 РОЕ п:1 ТО со 
280 РЕТЕГ АТ уп), хп); а 


282 ТЕТ уп) - У} +1 

285 РЕТНТ АТ уп), х(п); $ 

290 МЕХТ п 

300 РЕТНТ 1НЕ $; АТ 20,10; 
т 

310 ЕЕИ ма1 

320 ТЕ ТНКЕУ$-"" ТНЕВ 60 ТО 


ма1\: ВЕН здесь между 
кавычками не додано быть 
пробела 


330 ТЕ ТНЕЕТ® <> 5ТЕФ соалА 


ЕО Ван аа 


ТНЕЕ ВЕЕР . 5,0: 
ВЕЕР 1, -28: 
60`® май 
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‚ езд до ост. 


Внинанио` читателей! 

Ны продоижаен публиковать ад- 
реса пунктов. в которых можно ' ря 
обрести наши материалы. 

Г. НОСКВА. ул. Новый Арбат, 
19-а отделенье связи, 
операционного зада. 

Г. ИОСКВА, ралиормнок в Митино, 
Проези до ‘ст. нетро Тушинская иди 
чюездок до пл. Трикокажная (Рижское 
ваправа. }. Суббота, воскр. 9 - 14: 
Киоск # 2-31. 

Г. МОСЖВА, радиорынок в Царицы- 
но. проезк до ст. метро Парицыяо. 
Суббота. воскр. 9 - 14. 

г. БЕЛГОРОД, магазин 
ВАРЫ", ул. Левина, 32. 

г, БЕЛРОЗОЙ, Октябрьская 84, 
кв. 163. "СТУДИЯ КОМПЬЮТЕР". 7 

г. ВЛАДИВОСТОК, Океанский про- 
снект, 130;  магазия` “ПАПОРАВА“, 
Проезд зранваей до ост. Некрасов- 
ская, 

г. ВОРОНЫХ, Студия комньютерных! 
вгр ЗАН-ЗАВ, Нагазин-сааоя 
ТРОНИКА®, Тед. 14-00-13. 

г. ДНЕПРОПЕТРОВСК, тд.  ШМевчен- 
ко, 34. Фирма “ЭКОС". 

г. ЕКАТЕРИНБУРГ, магазин "СПЕК- 
ТРУН", Главный проспект, 99. 

г. ЮЕБСК, радиорынок "Козий 
парк”. 

Г. КЕМЕРОВО. нагазин "ТЕХНИЧЕС- 
БАЯ ЕНИГА", ул. Весенняя, 24. 

Г. КЕНЕРОВО, нагазин "ОРБИТА", 
ИР, Ленина, 133. 

г. КИРОВ, "Дом науки и техн. 
Магазин-салон "МАРС”, уд. ПРоизвОод- 
ственная, д.гт. 

г. КРАСНОЯРСК, радиозынок,  про- 
"Затон", ‘766. ‚ вскр. 

г. НАБЕРЕЖНЫЕ ЧЕЛНЫ, Татарстан, 
Новый Город, салон-магазин *ИРИН- 
ТЕР", 

г. НЕК, НОВГОРОД, ИНМА "Ф-ИЛЮС”, 
Магазин “ФОТОЛЮБИТЕЛЬ", ул.  Горь- 
кого, 146, 

Г. ОРЕНБУРГ, | нагазия "ВОЕННАЯ 
КНИГА”, ул. Советская.’ 

г, НРОКОПЬЕБСК, Бемерозской 06. 
Тырган, магазин “ОДЕЖДА”, Фирма 
"РОНЗТ". 

г. РЫБИНСК, ул. Гоголя. #; 

ТТЦ ГНО”, 

г. ХАБАРОВСК, уд. Запарина 65, 
нагазин "ФИЛАТЕЛИЯ”. 

Г. (ЧЕБОКСАРЫ, маг. 
НИХ Фирка “НОЗА“, ул... 
ная, д.6. 

Г. ЯРОСЛАВЛЬ. нагазин. “РАДИО- 
СПОРТ-ТУРИЗИ", Ленинградский пр-т, 


Д.Р. 


1-ый этах 


ие 


“ЭКСПРЕСС”, 
Принокзаль- 


380 ВЕМ Правильный ответ 
$350 РЪАБН 1; 51.5 

360 ЕОВ п=1 ТО 10 

.310 ВЕЕР. 33.12 

380 . 33, 24 
а, п 

200 РЪАЗЯ 0 

410 60 ТО ро\ог 


ИР АН. Меня ЧАЫ 


} 
з 
| 
4 


ЭТУСТАТЕ 
.о@о 


«Окончание» 4 
Начзло см. нас. 69-74, 90-96, 
134 - 138, 180 - 186. 
ГААЗВА 9. 


ВВОД И ВЫВОД ИНФОРНАЦИИ 


до СИЕ ‘пор мы расснатривали 
только одий метод ввода инФорна- 
ции ‘$ Конвьютер - РЕАМЛЬТ и 
‘Ицесви 2е Учитызать черелалью 

графику) Только олин метод вывола 
инфорнапий - РЕТЯТ. В этой главе 
Цны . рассмотрим некоторые нетопы, 
которые дадут программисту новые 
вознолности для ‘ввода/вывода, 
хотя и ценой более сложного про- 
траннировавия. р 
КЕАБСНАВ хдет, когда пользова- 
принимает один символ с клавиату- 
ры и выдает его в качестве, выход- 
ного результата. После нахатия 
хлавяшя не надо нажинать  ЕВТЕХ, 
иРинЯтый символ не изображается 
на экране, ввод символа не сопро- 


ния”. Попробуйте: 
НАКЕ "СНАВАСТЕК. КЕАРСНАЮ 
Нажмите ЕНТЕЕ - систена ожида- 
т нахатия любой клавиши. Нажните 
любую клавишу. На экране появится 
приглашение ”?” - это означает, 
что ЛОГо-систена вернулась в ко- 
мандный режим. 
Вы можете проверить, что за 
синвол был введен: 
РЕТНТ : СНАКАСТЕЕ 
Это обычный приен, когда надо 
Узнать, что за каавиша была наха- 
жа. Вот, папринер, програима, с 
помошью которой Вы мохете ‘управ- 
мять двихением черепашки по экра- 


[О ОЕАМ 
НАКЕ "СНАКАСТЕК БЕАБСНАЕ м 
ТР :СНАРАСТЕЮ = "Ро (РОКУАЯЮО 5) 
1 :СНАКАСТЕК = "В (ВАСЕ 51 
ТР :СНАКАСТЕК = “К (ВУСНТ 10} 
1: СНАВАСТЕК - “1 ШЕЕТ 10) 
17 :СНАВАСТЕХ = "5 (5ТОР1 
РЕАм. 

ЕЖЕ 


Функция ЫЕБАОСНАК бывает очень 
полезной, когда вместо символов 
Вы работаете с их кодани. Коды 
1ет называают 
‘Ашег1сай 5фапаага 
е ог  Ичогвай1оп  Имег- 
свалае). Колы с о по 31 использу- 
вугся компьютером в качестве упра- 
вляюших при сперациях звода/выво- 
да (например для перемещения кур- 
сора} и не являются печатиыни, 
т.е. их нельзя изобразить на эк- 
ране, хотя они и ваияют на то, 
как изображаются пругне (печат- 
ные) коды. Коды с З2-го по 42т - 
(буквы, цифры, 
допожнительно 
"Спектрун” ине- 
ет еще рад кодов для сииполов, 


тель 'нахнет какую-либо клавишу, . 


зождается изображением “поиглаше- 


и 


Так, коды 128 - 143 представляют 
снивохи блочной графики, ‘а симво- 
ды 144 - 164 - это синволы графи- 
ки пользоватеня. 

Вы комете узнать, какому сим- 
волу. какой код соответствует с 
помомью следующей несложной про- 
гранкы. 

ТО ЗНОМАЗСТТ 

НАЖЕ “СНАХАСТЕВ ВЕАЮСНАВ 

РЕТИТ АБСТТ : СНАЮАСТЕЕ 

ЗНОМАЗСТТ } 

ЕО 

создав такую процедуру. Вы 
монете дать команду ЗНОМАЗСТТ и, 
зажав любую клавишу, увидеть на 
экране кой этого символа, 

Противополохное действие имеет 
команиг СНАЮ. Оха переводит код 
от 32 до 143 в соответствующий 
графический символ. 


Так, РЕТНТ СНАЮ 65 даст: 
А 
Нохно ` использовать команду 


СНАР совнестно с командой . АЗСТТ. 


Нижерриведенная пропедура будет 


шифровать ту инфорнацию, которую 
Вы введете с клавиатуры. 
ТО СОНРО5Е 

НАКЕ "СОБЕ АЗСТТ ВЕАБСНАЮ 

ТР :СОБЕ = 13 Г5ТОР} 

ТУРЕ СНАЮ (:СОРЕ + 1) 

СОНРОЗЕ 
ЕНО у 

Процедура прекратит свою 
работу, когда будет,  нахата 


клавиша ЕНТЕЮ (ее код = 13). 

Если Вам не надо ожидать наха- 
тия клавиши, то Вы можете исполь- 
зовать функцию КЕУР. Она проверя- 
ет Факт нахатия какой-либо клави- 
ши и выдает ТВОЕ или РА.5Е в за- 
висиности от того, ‘имело или нет 


` место, такое событие. 


Вот еше одна програмна лля 
черепаюки, отличакснаяся тен, что 
нехду нахлатияни клавиш черепашка 
продолжает свое движение. 
то овАЧё 

ТР КЕТР (ПОТ 

РОВМАКР 5 

ОвАчг \ 
то. ротт 
НАКЕ “СНАВАСТЕВ КЕАБСНАЕ 
ТР :СНАЮАСТЕК =“И (ЮТСНТ 90} 
ТР :СНАРАСТЕЮ =*2 (ШЕЕТ 90} 


ЕНО 

Елавишами М и 7 Вы теперь но- 
хете управлять лвижением черепаш- 
ки во экраву. 

Символы от 148 до 168 включи- 
тельно могут задаваться непосред- 
ственно пользователем. © том, как 
это сделать, рассказано в ин- 
СТРУКЦИИ К КОМПЬЮТЕРУ (и В книгах 
инФОРКОНа). Но для того, чтобы 
задать эти синволы, в спределен- 
ные адреса памяти конпьютера надо 
внести свои значения. В языке 
ЛОГО дая этой цели служит команда 
- РЕРОБТТ ., Но будьте осторожны 
при работе с этой командой. она 
напрямую неняет содеряиное ячеек 
памяти компьютера, ЛОГО-система 
не в состоянии проверить правиль- 
ность Ваших действий и, если Вы 
станете использовать эту команду 
без четкого понимания того, что и 
зачем Вы делаете, есть больтая 
вероятность того, что Вы иохете 


разрущить созданные Ваки и храня- 
виеся в памяти компьютера проце- 
ДУРЫ. 
Цара нижевриведенных процедур 
демонстрирует задание нового сим-| 
вода графики пользователя путем 
помещения в ‘память  конльютера 
{начиная с адреса 64215) 
из восьни чисел, 
педяют конструкцию нового  симво- 
да. . 

ТО РЕРСНАЮ ;СН :АГТЗТ 

ТЕ ОВ НОТ КОНВЕЕР :СН ВОТ 

15ТР МИЗТ ($5ТОР]` 

ТЕ ОВ :СН<1484 :СН>164 15ТОР} 

БОБЕР :АГЛЗТ 0 
ЕН 
ТО РОРЕЕ :АБТЗТ :СООЕТ 

ТЕ ЕНРТУР :АГЛЗТ 15ТОР} 

‚ РЕРОБТТ 64216 + :СНи8 + 

:СОУНТ РЕ5Т АТ 

РОРЕР БОТЕТЕЗТ : АТ 

СООТ +1 
ЕО 

дия того, чтобы определить, | 
какими должны быть эти восень 
чисел, задающие КОНСТРУКЯИЮ 
снивола, Вам. придется почитать 
соответствующую ‘литературу или 
поэкспериментировать. Так, вапри-| 
мер, следующая групна чисел за- 
даст символ’ 144 в виде стрелки, 
направленной вниз: 

РЕРСНАЯ 144 (16 16 16 16 146 8% 
56 16} 

Дая управления выводом текста 
на экран’ компьютера тоже сушес- 
твует ряд полезных процедур и мы 
последовательно их рассмотрим. 

ЗЕТСУЕ5ОЕ - прининает в качес-| 
тве входных параметров список из 
двух чисел и помешает курсор в 
соответствующую позицию экрана. С 
этой позиции и начнется в после- 
дующем печать выводиного текста. 
Пероое число списка указывает на 
номер экранного столбца (от 0 до 
31), а второе число - на номер 
экранной строки (от 0 до 21). де- 
вому верхнему углу соответствуют! 
координаты (0,0). 

5ЕТТС ’(5ЕТ Тех Со1ог) тоже 
приникает на входе два числа. 
Первое число задает цвет Фона 
{аналог оператора — БЕИЙСИКА м 
РАРЕК), а второе число задает 
цвет символов (аналог ТИХ). Обыч- 
ная ситуация для резина печати 
черный (‘по белону - (1.01. Вы 
можете поэкспериментировать со 
следующей процедурой: 

ТО ТЕЗТСОЕ, 

ТЕЯТСВЕЕН 

ЗЕТСУВ 112 10} 

БЕТТС 11 61 

РЕТИТ ТНЕЛО. ТНЕВЕ] 

НАКЕ “С КЕАШСНАЕ 

БЕТТС [7.01 
ЕН 

В последних строках организо- 
вано окидание накатия клавиши для 
восстановления нормальных цветов. 

Паракетр яркости Фона, 


инеть при себе один параметр, ко-} 
торый нохет быть равен © или 1. | 
ВЕТСНТ {1 - повышенная яркость, 
ВЕТСНТ 0 - обычный режин. 

Конанда ТНУЕВЗЕ включает режии 
печати символов в инвертированной! 
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виде, т.е. цвет символов стано- 
вится цветом Фона и наоборот, 
Команда ЕЁЬАЗН включает режим 
мигания символов. когда попере- 
менно цвета символов и Фона меня- 
ются местани. 
Конанда НОЕМАТ, отбивает эффект 
команд ВЕТСНТ,  ТНУЕРЗЕ. РЕАЗН и 
восстанавливает исходный  режин 
печати текста, 

для тех. кто хочет посмотреть 
эти команды в работе, предлагает- 
ся следующий пример: 
"ГО РАНСУНАИЕ 
РЕТЫТ (МНАТ 15 УО0Е НАНЕ?} 


ТР :Еб=:В6 {ООТРОТ ВНОСО] 
[ОИТРОТ :Рб] 

ЕНО 

Здесь процедура ВНОСо, не 

только генерирует случайное число 

пля установки цвета печатаемого 

сообщения, но еще и проверяет, не 

совпадает ли выбранный цвет сим- 

волов с ранее установленным цве- 

том Фона и, если это так, то вы- 

зов ВЫПСОЬ повторяется до тех 

пор, пока эти цвета. не станут 

разныни. 

А вот еше один пример для де- 

монстрации приведенной выше тех- 

Ники. Группа процедур обрабаты- 

вает результаты матчей небольшой 

Футбольной лиги. Главная проце- 

дура организует списки и печатает 

в цвете заголовки будушей табли- 

цы. Затем вызывается процедура 

НЕАТСО1., которая печатает заго- 

ловки столбцов, а потом процедура 

РОТЕАН, обрабатывающая результаты 

для каждой команды. 

"ГО ГЕАСОЕ 

НАКЕ "ТЕАМ5 (5РАВТАК П1НАНО 

АУАНСАКР РЕОСКЕЗЗ] 

НАКЕ “С015 [РУ ОШ РТ5} 

ТЕХТ5СКЕЕН 

ЗЕТСУЕ5ОВ [9 01 

ЗЕТТС [5 0} 

ТТРЕ П.ЕАСОЕ ТАВЕЕ] 

ЗЕТСУВ5О0В 10 г} 

ЗЕТТС {7 3} 


Процедура НЕАЮСО выбирает 
данные из списка заголовков коло- 
нок и печатает эти заголовки в 
нУзНоЙй Позиции экрана с помошью 
конанды ЗЕТСУЕ5ОЕ. Работа продол- 
жается, пока все пять заголовков 


не будут распечатаны. 
ТО НЕАБСОТ, : СО, 

ТЕ :С9.>25 5ТОР 

ЗЕТСО&5ОЕ ЗЕНТЕНСЕ [3*:СО1, + 

1112 

ТУРЕ ТТЕК :С01, :С01.$ 

НЕААРСОГ ;СОГ, + 1 
ЕНО 

Процедура ПОТЕАН — определяет 
номер строки, в которой печатают- 
ся результаты для данной конанды 
(он зависит от номера команды в 
списке команд). Она принимает из 
списка название команды, а затем 
принимает от пользователя с кла- 
виатуры количество сыграных игр 
{Р), количество побед (9) и ни- 
чьих (0), При этом она использует 
еше одну процедуру - СЕТНОМ, 

Первыми ДВУМЯ входными пара- 
метрани СЕТНОМ являются координа- 
ты позиции экрана, в которой доа- 
жна состояться печачь. Третий 
ВХОДНОЙ параметр поначалу - пус- 
тое слово’ оно будет содержать 
число, введенное пользователем. 

Количество проигрышей команды 
1.) и набранные ею очки (РТ$) 
вводить не надо, сни ногут быть 
рассчитаны  саной программой. 
Предполагается, что победа оценй- 
вается двумя’ очками, а ничья - 


ТЕ : ТЕАННО>СО0НТ :ТЕАМЗ (5ТОР] 
НАКЕ “ЬТМЕ 2; ТЕМНО + 2 
ЗЕТСОЕ$ОВ ЗЕНТЕНСЕ © ;11НЕ 
ТУРЕ ТТЕМ :ТЕАМНО ;ТЕАМ$ 

НАКЕ "РЕАУЕО СЕТНОН 14 :1ТНЕ " 
НАКЕ "МОН СЕТНОМ 17 ТЕ " 
НАКЕ "ОВАМН СЕТНОМ 20 :Г1МЕ " 


НАКЕ “ТОСТ. :РЬАУЕР - :\ОН - 
: ОВАУН 

ЗЕТСОКЗОВ ЗЕНТЕНСЕ 23 :11НЕ 

ТУРЕ :105Т 

КАКЕ "РОТНТ5 2": \ЮН + : ОБАМЫ 


ЗЕТСОЕ5ОВ ЗЕНТЕНСЕ 26 :11МЕ 

ТУРЕ :РОТЧТ5 

РОТЕАН :ТЕАМНО + 1 
ЕНО 

Прежде, чем рассмотреть проце- 
дуру СЕТНОН. мы рассмотрим еше 
одну связанную с ней пропедуру 


СЕТРТб. Она принимает цифру с 
клавиатуры, а возвращает и эту 
ЦИФРУ и ее код А5Си. Она 


перецает также колы ЕНТЕЕ (13) и 
РЕЪЕТЕ (12), если соответствующие 
клавиши нажаты. Если же нахата 
любая другая клавиша, процедура 
ее игнорирует и вызов повторяет- 
ся. цифрам от нуля до 9 соответ- 
СТВУЮТ КОДЫ АБСТТ от 48 до 57. 
ТО СЕТО!С 

НАКЕ ”016 ВЕАРСНАЕ 

НАКЕ "СОБЕ АЗСТТ :216 

ТР ОЕ :СОРЕ = 13 :СОБЕ = 12 

[5ТОР} 
ТР ОК :С00Е‹48 :СОБЕ>57Т 
ГСЕТР! С} 

ЕН 

Теперь рассмотрим процедуру 
СЕТНОН. Начинается она довольно 
странно. Сначала устанавливается 
КУРСОР В ПОЗИЦИЮ, соответствующую 
ее первым двум входным паранет- 
рам, после чего печатается ее 
третий параметр, хоть он и пустой 
при первом вызове. Зто нужно по- 
тому. что процедура работает ре- 
КУррентно и в процессе ее работы 
третий параметр будет изненяться. 

В качестве курсора для печати 


= ЯЗЫКИ — ПРОГРАННИРОВАНИЯ -— — в. 
используем мигающий вопроситель- 


ный знак. Это легко рёализуется 
следующими строкани: 


Р.А5Н 
ТУРЕ *? 
НОКНАЕ 
Цифра, введенная пользовате- 
лем, поставаяется из. процедуры 


СЕТОГС. Оттуда же ногут постулить 
И КОДЫ ЕНТЕЕ или ОЕТЕТЕ. При по- 
явлении этих кодов следует убрать 
вопросительный знак из ‘текущей 
позиции. в противном случае он 
продолжает мигать. Удаление во- 
просительного знака исполняется 
печатью на его месте пробела! 
(символ 32). Могут быть проблемы 
с точным определением местополо- 
жения вопросительного знака. Са-| 
мый лучший слособ - пойти к нача-| 
лу вводимого числа‘ (мы знаем где! 
это начало) и снова напечатать| 
число, а за нин уже пробел - на| 
несте вопросительного знака. 

БЕТСОЕЗОЕ ЗЕНТЕНСЕ :Х :У 

ТУРЕ КО 

ТУРЕ СНАВ 32 

Продедура СЕТО:С ножет выдать 
три возножных результата: была 
нажата цифра с кодом от 48 до 51,1 
либо. клавита ЕНТЕЕ (код 13) либо 
РЕТЕТЕ (кой 12). 

ЕСЛИ это цифра, 
надо напечатать, 


то ее просто 
побавив к ранее 
напечатанным  пифран вводимого 
числа. В нидеследуешен примере 
предполагается, что числа имеют! 
не более двух знаков и ири попыт- 
ке ввести третью нифру она “игно- 
рируется. | 
1Е АНО :СОРЕ>13 (СОНТ : НО) ‹2 

НАКЕ “НО ОКО :НО :0тС 

Если нажата клавиша ЕНТЕЕ и, 
если число не пустое, то ны ножем 
напечатать это чиспо. 

Если нахата клавиша ПЕЪЕТЕ, То 
мы должны удалить последний  син- 
вол числа, используя ВУТЬАЗТ. Но 
и В этом случае сначала надо удо- 
стовериться, что число не явяяет- 
ся пустым словом. И если Вы рас- 
смотрите нижеприведенную процеду-й 
РУ, То увидите в ней несколько! 
необычную строку: 

ТЕ ЕМРТУР :НО [МАКЕ "НО"} 


Калется, что в ней нет необхо-| 
димости, но это не так. дело в 
том, что когда мы  приненяеи 


ВОТЬАЗТ к слову, В котором есть! 
только один символ, то рассчиты- 
ваен получить пустое слово, но 
вместо него получаен 
список, с которым конанда МОвр, | 
помешающая очередную цифру в 
число не сможет работать. 


вустой список в пустое слово, 
ТО СЕТНОМ :Х :у в 
ЗЕТСОЕ5ОВ ЗЕНТЕНСЕ ;Х :У 
ТУРЕ : НО 
ЕЪАЗН 
ТУРЕ "? 
НОЮНААТ, 
СЕТЬ: С у 
ЗЕТСОЕ5ОВ ЗЕНТЕНСЕ :Х :У 
ТУРЕ : НО 
ТУРЕ СНАВ 32 
ТЕ АНО :СОРЕ = 13 (НОТ ЕНРТУР 
ВО) ГООТРУТ :80} 
ТЕ АНР :СОБЕ = 12 (НОТ ЕМРТУР № 
:65О) ГНАКЕ “НО БОТЪАЗТ : НО} 
ТР ЕКРТУР :НО (МАКЕ “ВО"} е 
ТЕР АНО :С00Е>13 (СООНТ, : НО) ‹2 
НАХЕ "НО \ОРО :5О : 016 
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уисяе обеж больше, чен было сыг- 
ано игр, в результате чего число 
поражений станет отрилательным. 
овершенетвованию вет предела, но 
; Ван ‘теперь поляна 


*спектрун® может выдавать зву- 
вые сигналы. Это делается с ао- 


10.5. ВТоРОё Число - высота воти, 


Это число доажно быть в диапазоне 
от -60 до +69. Следующая процеду- 
ра превратит клавиатуру Вашего 
компьютера в здектроорган. — Но 
играть ва нем весьма сложно. 
| КЕУВОАКО ^ 
НАКЕ “КЕЙ (АЗСТТ РЕАРСИАВ) -65 
ТЕ АНО :КЕ\>-69: КЕУ<ТО 

(50046 БЕНТЕНСЕ 0.5 ;КЕУ] 
КЕУВОАКО 
ТЕН . | 
Сыграть список нот 
длительности Вы можете с 


равной 
помовью 


Б5О0\ЯЮ ЗЕНТЕНСЕ 1 РТЕЗТ : ЛЬЕТ 
РЬАУ БОТРЕЕЗТ,; АЕТЬТ 

НО и 
Полутон - это звуковой интер- 


знаете, как 
складывается музыкальный ряд из 
полутонов, То Попробуйте сыграть 
следующую гамму "до. нахор°. 

РЫАУ 1024 51911 12} 

К сожалению, ‘способ задания 
ЗВУКОВ с ПоНОоШЬьЮ ‘команды 50ИНО 
ючень далек от общепринятой нот- 
можно нали- 
которая сделает 
за. нас необходиное преобразова- 
ние. Для этого служит следуещаая 
приведенная, нами процедура. Пер- 


ет, задает тени музыкальной мело- 
дии. Это продолжительность звуча- 
ния (в секундах) ноты, 
вость Которой пРИНЯТа нами ‘за 
единмау. Затен процедура прини- 
Мает список нот и размешает их в 
предварительно созданном списке 
ЗЪ15Т, после чего исполняется ие- 
лодия, ‹ 
ГО НОЗТС 
НАКЕ "НОТЕТ.Т5Т (РО. РО ВЕ КЕ 
НТ РА РАЗ 50 508 ТА БАЙ 
$1 00'} 
НАКЕ "УУТЕ 
РЕТНТ (ТЕНР?} 
РЕ1НТ {ВВЕДИТЕ НОТЫ по ОДНОЙ, 
А-НАЧАЛА ДЛИТЕЛЬНОСТЬ: 
СЕТНУ5 > 
РЬАУ :561Т5Т 
ЕНО ! 
Процедура СЕТНЫ$ прининает с 
клавиатуры список из двух чисел. 


т.д, 


Первое число - длительность нолы, 


Предполагается, что самая корот- 
кая из ных имеет длину 1, а дай- 
тедьность прочий - 1, 2, 3.... и 


реальная ие длительность (в 
секуидах) букет зависеть от вве- 
денного Вани параметра ТЕМР. 

Высоту ноты букет определять 
ее Базнание - Ро. Бе, м! ит.д. 

Процедуре СЕТМ$ вужна еще од- 
ва  оспоногательная — процедура 
РТНГ, которая вайдет объект в 
списке. Первые два входных пара- 
нетра пля процедуры Р1НО - это 
имёна объекта и списка, а третий 
параметр - ‘стартовый номер, с 
которого начинается отсчет в 
сёнске. Если ны хотим, ’ чтобы 
первой потой была “ДО” лервой 
октавы, то полодин этот параметр 
РАВНИИ НУЮ, 
ТО -бЕТ5 

НАКЕ “ЛОТЕ КЕАТЕ.15Т 

ТЕ ЕНРТУР :ВОТЕ (ТОР) 

КАКЕ "РОБ :ТЕНРУРТИ5Т. : НОТЕ 

МАЕЕ "РТТСН РИО ТАЗТ : НОТЕ 

:НОТЕТЗТ 0 
НАКЕ "Э11УТ БРИТ 115Т : РОВ 
ЗАТОН ЯЫ5Т 

бЕТИУ$ 

ЕНО 


ТО РТУР :ОВУЕСТ А15Т :Н 
ТЕ ЕНРТУР МАТ ПОПТРОТ 0} 
1Р :ОВУЕСТ = Е1В5Т : АТ 


ГООТРУТ {И} 
ООТРИТ БТИ :ОВЛЕСТ БОТЕТИ5Т 
АТ В +1 


ЕН 

и, наконец, сано испоанение 
нУзыки реализует процедура РЁАУ. 
Она отличается от ранее приведеи- 
ной процедуры с тен хё иценем 
РЬАЯ ‚только тен. что полагает 
кахдый эленент своего входного 
списка тозе списком, состоящим из 
пвух заементов, которые затен 
передаются команде 50080. 
ТО РЬАУ АУТ 

ТР ЕМРТУР :АРТЗТ (5ТОР} 

ЗО0ЕО ЕТЕЗТ : МТ 

РЫАУ БОТЕТЕЗТ ; АТ 
ЕНО 

введя все пропедуры, попробуй- 
те програнму в деле: 


ТЕР? 

70,3 

ВВЕДИТЕ НОТЫ по ОДНОИ, 

ДЛИТЕЛЬНОСТЬ 

3250 

2800’ 

2251 

З2ьА 

3450 

за2ьл^ 

9151 

3100° 

защ 

зем 

з2гА 

З25Е 

3680 

Когда закойчите, нахните ЕНТЕЕ 
и после короткой паузы нузыка за- 
играет, Один/ раз введя  недодию, 
Вы смохете воспроизвести ее вся- 
кий раз, как’ захотите с пононьр 
конанды: 


СНАЧАЛА 


РЫАУ с З113Т 


тата АВСр ов Вы 


ЕСЛИ ЧТО-ТО НЕ ПОЛУЧАЕТСЯ 


Мы начнек с того, что скахен 
несколько  успокоительных — спов 
кто только что нонял, 


‘тают. 
знать о программировании и о! 
конпьютерах - это то, что нерабо- 
тосвособность - это ЕСТЕСТВЕННОЕ 
состояние любой компьютерной про- 
гранны. 

` Неопытного програмниста легко 
отличить от опытного, Новичок не- 
приятно удивляется, когда только 


зедает работать с первого _ раза. 
ОпытныЯ программист всегда удир- 
аяется, когда она с первого ‘раза 
работает как надо и начинает ис-\| 
кать в нзй скрытые подвохи, 

Ножно сказать, Что при вро-| 
гранмировании ва языке лого Вас 
ДУТ два разных типа ошибок. Если 
Вы сделали ошибку при написании 
конанд и ЛОГО не понимает, что Вы 
хотите сделать. Вы поаучите сооб-| 
шение об ошибке. В других случаях 
ЛОГО понимает, что Вы хотели сде- 
зать н выполняет Ващи коканды, но 
результат вы получаете совсем не 
тот, который Ваи необходин. | 

нетощика отыскания и исправде- 
пия ошибок и в Тони в другон 
случае очень покоза. Хотя первый! 
тип отибок проще поддается нс- 
праваению, поскольку люГо-систена! 
сана уже сказала’ Вам в своем со- 
общении что ей не ‘нравится и в 
какой прошедуре она наткнулась на 
препятствие. В этом смысле лого 
удобнее Многих других языков про- 
гранмиронания, поскольку его со- 
общения как правило более осныс- 
дленны и содержательны, чем в дру-} 
гих языках. Тен ие ненее. все> 
таки эти сообщения были написаны? 
создателями языка задолго До то- 
го, как Вы начааи писать свою 
програниу. Ин как бы пришлось 
предугадать” Ваши возножные оши- 
бки. Это не всегда можно сделать 
точно, Потону не удивляйтесь, ес-\ 
ли эти сообщения будут . не. абсо-| 
лючно точны ‘в одределении Ваших 
ошибок. ‚ 

Деду ножет поночь краткий об- 
зор некоторых . наиболее часто 
встречающихся ошибок и сообщений. 
Наприкер: | 
1. нуош чой’Е зау умвах 

40 40 м14Ъ АБС» 
{Вы не указали, что 
делать с АВСЬ) 

Такое сообщеные `пегко объяс- 
вить. Покиите, что всякая опера- 
ция, вылающая какой-то результат, | 
слева должна иметь имя  конанлы, 
которая принет этот результат. В} 
нашен примере операция произвела 
слово АВСЬ и дибо отсутствует. ко- 
манда, которая примет этот ре-| 
зультат в качестве входного пара-\ 
нетра, либо она есть, но это не 
тот входной параметр, ‘который дая 
нее приенлем. . | 

Рассмотрин. пример. ‹Предиоло- 
хин. что некоторая процедура’ 
ЗАУАВСР видазт в качестве резуйь-! 
запижеле такую 


ен и 
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СТРОКУ: 


РЕТНТ "ВЕЗЪУЕТ 5АУАВСВ 
В результате Вы получите при- 
веденное выше сообщение об ошиб- 
ке. Дело в том, что команда РЕТИТ 
ожидает ‘только один параметр в 
качестве входного и он здесь есть 
= "БЕЗИИТ. Никакого указания, 
глать с АБСЬ, 


использовать конакду ЗЕЕТЕНСЕ. 
дабы конавиа РЕТИТ ногла распеча- 
тывать несколько данных. 


2. Мох епопав 1пррфз 40 АВСОи 
(недостает входных паранетров 
лия АВСО} 


Если Вы рассмотрите определе- 
ние процедуры АВСР, то должны 05- 
нарухжить, что она ожидает большое 
число еколных параметров, чен Вы 
ей дали. Ножет бить, это будет 
выглядеть и неочевикным, но метод 
анализа строк ЛОГО, который ны 
привели в Главе 3 Ван должен по- 
вочь. 


3$. "ХУД доезп”4 ОЧАрШ 40 АВСРи 
{ХУ2 не выдает данные для 
АВС) 

Эта ошибка возникает, тогда, 
когда операция АВС применяется к 
некоторой конанде ХУ7 (не яваяр- 
шейся операцией), которая не вы- 
дает выходного результата, необ- 
зоОдимОГО ДлЯ успешной работы 
АВСР, 


4. "Тоо шапу 11314е рагеп\ез13* 
®(слишком много скобок). 

Эта ошибка происходит, когда 
Ваш список имеет ‹ слишком иного 
ВВУТРенних КРУГЛЫХ скобок, В 
большинстве случаев присутствие 
такой ошибки нохет так напугать 
програмкиста, что он вообще 67- 
дет стараться обходиться без 
таких скобок, хотя это тоже из- 
‚аишняя крайность. 


5. "ХУ7 40езп’1 11Ке АВСОЕ 
‚ аз 1ири&* . 
{ХУ2 не принимает АВСБЕ 
в качестве входного параметра}, 


Эта ошибка может происходить в 
двух случаях. Либо ‘результат 
АВСОЕ неприемлем дая ХУ7. т.к. он 
имеет не тот тип (это, например, 
число, а должен быть список}: 

ЗЕТСОВ 10 15 . 
Либо результат имеет  правиль- 
вый тип, но не находится в допус- 
тиных пределах: 

ЗЕТСУЕ [10 45} 

При появлении такой ошибки Вам 
следует внимательно вручную про- 
верить что именно Ваша процедуру 
©южидает в качестве входного пара- 
метра. 
Сообщение 06 этой ощибке монет 
иметь весьма  обескурахивающий 
ви, наприиер: 

*ХУ7 доезй”& 11ще аз 1прити 

Здесь выпало слово АВСОЕ - зто 
потому, что результат АВСОЕ явпя- 
ется в данном случае пустым спо- 
вом. 


6, «Мох епоцЕв зрасе 10 ргосееа* 
‘(Не хватает рабочего 
пространства). 
Это сообщение © том, что на- 
ступиха нехватка оперативной нпа- 


няти конпьютера для продолжения 
дальнейших вычислений. В такой 
ситуадии можно попробовать при- 
нять предохранительные меры. Один 
из приенов - запустить процедуру 
РЕСТСЬЕ. Эта команда выполнит то, 
что на компьютерном жаргоне назы- 
вают "уборкой мусора". Оца разы- 
шет области памяти, выделенные в 
свое время для каких-то операций, 
в Которых более нет необходимости 
и освободит дополнитёльный объем 
памяти. Может быть, эта Ннера и не 
приведет к какому-то положитель- 
вому результату. поскольку  вреня 
от времени система сама произво- 
дит "уборку мусора" ‘автоматичес- 
ки. 

Другой, более радикальный при- 
ем - удалить из памяти те проце- 
дуры, которые Вам более не нужны. 

Но команду ВЕСУСЬЕ ножно ис- 
пользовать и для повышения быс- 
тродействия Ваших програми, Пос- 
кольку автоматическая "уборка ну- 
сора" может занимать некоторое 
вреня, то работа программы ‚может 
быть задержана. В разных частях 
программы, в разных процедурах ‘у 
Вас могут быть разные требования 
по скорости. Поэтому инеет смысл 
санону поставить РЕСУСЬЕ в тех 
местак, где Вы можете позволить 
себе охидание, а не дожидаться, 
пока автонатика вачнет заниматься 
этин делом в тех местах, где для 
Вас это не удобно. 

Теперь ны рассмотрим ряд прие- 
нов, с помошью которых отыскивают 
и устраняют ошибки в программах. 
В качестве примера мы вернемся к 
одной из ранее расснотренных про- 
цедур - это процедура СЕТНИУМ из 
Главы 9. Процедура предназначена 
для ввода двузначных чисел и изо- 
бражения нигаюшего курсора в  эк- 
ранной позиции с координатами х и 
У. Процедура СЕТНИИ использует В 
рабсте процедуру СЕТЬ{С, рассно- 
тренную в предыдущей Главе. 
то сЕТОС 

МАКЕ "ПТС КЕАБСНАК 
МАКЕ "СОБ АЗСЛТ ; 016 

ТР ОР :СОБЕ-13 :СОБЕ-1а15ТОР) 

ТР ОВ :С00Е<48. :СОЕ> 51 (СЕТОГС1 
ЕНО 

испытание процедуры  СЕТОС 
прошло нормально. При этом  нахи- 
нались различные цифровые клавиши 
и процедура правильно  распечаты- 
вала значения 016 и СОБЕ. _ 

После этого испытания была на- 
брана (так. как показано ниле) 
процедура сЕТНОН. 

ТО СЕТМУН :Х :9 : 
ЗЕТСУР 5Е :Х {У 
ТУРЕ :НО 
РАЗН 
ТУРЕ"? 
НРЕНА, 
СЕТЬ: 
1Е АННО ;©00Е-13 НОТ ЕМРТУР НО 
{ООТРОТ : 80] 

ТР АНО :СС0Е-12 НОТ ЕНРТУР :НО 
[ВАЕЕ *ВО БАТЬА$Т : ЕО] 

ТЕ АБО :С00Е>13 СОФЫТ :ВО<2 
ТНАЕЕ “НО \ЮРО :НО : 016} 

ОБТРУТ СЕТВОН :Х :У 0 
ЕНО й 

Может быть Вам будет интересно 
набрать эту процедуру и просле- 
дить этапы отладки. 

Первое тестирование процедуры 


`выполнялось конанлой: Е 


РВТИТ СЕТНОМ 10 10" 
Все проюло норнально и мигаю- 
ший вопросительный знак был напе- 
чатан в’ позиции‘ с координатами 
[10 10}. Но при попытке нажать 
клавишу 3 появилось сообщение ‘об 
ошибке: 
5 1$ пО& ТВОЕ ог РЫ.ЗЕ 1% СЕТНОМ | 
{5 не имеет зыачения "ИСТИНА" или 
"ЛОЖЬ" в пропедуре СЕТНИВ). 

Единственно, где в процедуре 
СЕТНИХ могут участвовать догичес- 
кие значения ТВОЕ или РАГЗЕ - это 
ТРИ СТРОКИ` 1"... Неясно только, 
какая хе из трех работает непра- 
ВИЛЬНО. 

для выяснения этого вопроса в 
процедуру СЕТНИН были ‘встроены 
три отладочные строки печати пос- 
ле казлой из строк ТЕ, 

РВНТ "11 

РЕТНТ "Та 

РВТТ "13 г 

После этого вновь была нахата 
клавиша "3* ‘и был получен следуют 
щий результат: 
и 
те 
5 1$ по& ТБОЕ ог РАБЗЕ 10 СЕТНОН 

Теперь стало ясно, что первые 
две СТРОКИ 1! проходят нормально 
и неприятности происходят в 
третьей строке. Три вспомогатель< 
ные’ отаадочные строки РЕТЕТ были 
удалены, во перед последним 1 
были поставлены две новые кон- 
трольные строки: 
РЕТИТ : СОРЕ 
РЕТИТ СОУНТ НО 

Пропедура была запушена еше 
раз и вновь нахата каавиша *3*, 
Результат был Такин: $ 


51 

о 

$ 1$ ПО& ТВОЕ ог РАЬЗЕ 11 СЕТНОН 
итак, 51 - это кол символа 

"3", ао - это количестве симво- 


лов в переменной НО (в этот но- 
нент времени). Так откуда зе поя- 
вилось число 5? Дия проверки бы- 
ли опять изненены две строки кон- 
трольной печати, 
РЕТЕГ :С00Е> 13 
РЕТНТ СООТ :НО‹2 \ 

Вторая строка даша неожиданный 
результат: 

< 40ез поф ке аз паре й 

Обратин внинание на то, что 
единственный случай, когда коман- 
да "<" ноет получить пустое сло- 
во в качестве входного параметра, 
может быть только тогда, когда 
внесто СОШКТ :Н0 будет стоять 
ПРОСТО :НО. Итак, может быть все 
дело просто в порядке исполнения 
операций в этой строке? 

тогда решение будет в исполь- 
зовании круглых скобок так; 
снаачаяа выполнялась 
СОПНТ : НО, а потом ее результат 
сравнивался бы с числом 2. 

ТЕ АБО :СОБЕ>15 (СОЧНТ : НО) ‹а 

[ВАКЕ *НО УОЯС ; ИО ; 011 

Итак, что же произошло? Снача- 
ла почену-то при сравнении пусто- 
го спова :НО и числа & прошел ре- 
зультат РАГЗЕ (видимо, это некор- 
ректное сравнение}, а потон СоПНт 


. РАБЗЕ дал число 5 (по количеству 


символов в слове РА.5Е), которое 
конечно не ножет служить коррект- 
ным вводом для послецующей опера- 
ции АНП. 

Теперь процедура работает нор- 
нально?  Нахав клавиши "3" и "2", 


а 


8 3эк.390 


ее ри 
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мы получим на экране *32” и мига- 
щий знак вопроса. После нахатия 
ЕЯТЕЮ на экране появится число 
32, как результат работы команды 
РЕТЫТ. Прочие тесты показывают, 
что прочие клавиши игнорирУЮТСЯ и 
более двух цифр ввести в число не 
удается, 

Но нан яадо еше проверить 
работу ОЕГЕТЕ. запустим процедуру 
еше раз. нажмем клавишу "2”. На 
экране появится: 

2? 

Теперь нажнен БЕБЕТЕ и на эк- 
ране появится: 
9? 

внимательное исследование по- 
Казало, что левый знак вопроса 
появился после стирания цифры 2 
ма ее месте, там ему и положено 
быть, а правый знак вопроса - это 
который остался там с прош- 

раза - его не должно бы 
Прежде чем стирать цифру 2 
вопросительный знак должен 
быть погашен печатью поверх него 
пробела. 06 этон ны говорили в 
предыдушей главе. 

После исправления и этой ‚ошиб- 
ки нажатие ка цифру "2" дает: 

Е? 
А стирание - РЕБЕТЕ дает: 

? 
‹ Отлично! теперь для проверки 
нажнен на цифру "3"... и получин 
новое сообщение об ошибке: 

ога доезп’& 11е 1) 

2$ арий 1п СЕТНОН 
{конавла МОБР не принимает [1 в 
качестве входного паранетра в 
пропедуре СЕТНОН) 

локализовать эту ошибку не- 


сложно, поскольку в процедуре 
СЕТВОН команда \ОЕР встречается 
только один раз. Но сообщение 


вполне определенно указывает, что 
в качестве параметра команды У\ОРр 
а пустой спи- 
Более того, мы обнаружи- 
пи, что проявляется эта ошибка 
только после использования РЕГЕТЕ 
и потому может быть не строка, в 
которой стоит МОЕО является при- 
чиной ошибки, а та строка,  кото- 
рая реализует операцию БЕБЕТЕ. 
теперь ножно поэксперименти- 
ровать: 
НАКЕ "НО 2 
НАКЕ “НО ВОТЬАБТ :НО 
И попробуйте дать команду 
РЕТНТ : НО 
В качестве результата Вы по- 
учите пустую строку. что и сле- 
А теперь попро- 


и Вы получите сообщение об ошибке 
такое же, как в предыдушей пропё- 
Уре. Теперь надо вспоннить об 
еше одной полезной конанде вныво- 
да, © которой ны до сих пор не 
ГОВОРИЛИ. Ны рассказывали только 
© РЕТЕТ и ТУРЕ, а есть еше коная- 
да 5НОмМ. Она отличается тем. что 
показываает списки вместе с ва- 
ружными скобками - очень нолезная 


п 

Вот и открыта причина необыч- 
ного поведения процедуры, После 
применения БОТЬАЗТ к слову, со0- 
лержамену только один символ, мы 
получили не пустое слово, а пус- 


той список. Это Фактически сис- 
темная ошибка. Не исключено, что 
в той версии языка, с которой 
работаете Вы, эта ошибка уме 
пиквидирована, но для пас она 
послужила наглядным пПрИНером 
технологии отладки програнм. 

Способ обкода этой ошибки был 
нами продемонстрирован в преды- 
душей главе и здесь мы не будем 
ПОВТОРЯТЬСЯ. . ь 

Нохно сделать первые выводы. 
Во-первых, отлаживайте свои про- 
педуры порознь. ЛОГО любезно со- 
общает Вам. в какой процедуре 
произошла ошибка, но первопричина 
может быть в ДРУГОЙ процедуре. 
Напримег. причиной отибки может 
быть неправильнс переданный па- 
раметр, полученный из другой пРо- 
педуры, Поэтому ‘прежде чем под- 
каючать одну процедуру к другой, 
постарайтесь выполнить в ней все 
возможные проверки. Может быть, 
Вам потребуется ваписать специ- 
альные тестирующие процедуры для 
тестирования отдельных фрагментов 
будушей сложной структуры. 

Например, если Вы пишете про- 
грамну для карточной игры, то 
прежде чем подключать к комплексу 
процедуру, которая будет сдавать 
карты из колоды в случайном по- 
рядке, полезно написать тестирую- 
шУЮю процедуру, которая будет про- 
сто распечатывать значения карт 
из колоды и убедиться, что они 
действительно идут в случайном 
порядке. | 

Если Вы убедитесь. что в этой 
процедуре все в порядке, то стол- 
кнувшись впоследствии с проблема- 
ми в вышестоятей пропелуре, Вы 
сможете сказать себе “Здесь я все 
проверил, здесь ошибку можно не 
искать, будем искать ее во вновь 
добавленных Фрагментах”. Хотя, 
конечно полностью исключить веро- 
ятность ошибки удается не всегда. 

другой метод поиска ошибок - 
трассирование (трейсинг). он со- 
стоит в прослеживании шаг за ша- 
гом того, что делает программа. 
Этот метод является наиболее вах- 
ным в тех случаях, когда програн- 
ма “зависает”, т.е. она работает. 
но не выдает никаких результатов 
на экран. Возникает внечатление, 
что она "не работает”. 

Трейсинг можно делать двумя 
разными способами. Самый простой 
- сщедать так, чтобы в начале 
каждой процедуры стоял оператор 
печати имени этой. процедуры. Тог- 
да даже при "зависании" программы 
Вы сможете увидеть, в какой про- 
цедуре или в каких процедурах это 
"зависание" произошло. Подобный 
трейсинг делать очень просто, а 
36$Фект он дает большой. Когда 
программа отлажена, то лишние 
СТРОКИ Печати можно убрать. 

Другой прием трейсинга - сос- 
тоит в прослеживании не, процедур, 
а переменных. Это следующая линия 
атаки, когда Вы. в принципе уже 
установили, в каких процедурах 
происходит сбой. В этом случае Вы 
в нескольких местах этих процедур 
ставите печать вазных переменных 
(переменной) и по характеру их 
(ее) изменения выясняете конкрет- 
но точку, вызывающую зависание. 

Если Вы столкнетесь с тем, что 


‘ ные операторы. Удобныи таким опе- 


трассирующие операторы ведут пе-! 
чать на экране так быстро, что ней 
удается визуально отследить и по-' 
нять, что делает програмна, то в 
паре с операторами печати надо 
поставить и замедляющие  отладоч- 


ратором является ВЕАБСНАЕ, кото- 
рый приостановит работу до тех 
ПОР, пока Вы не нахмете клавишу. 

Вы можете написать и 
трассирующую процедуру, 


СОРУБЕР - выполняет повую ко- 


как со списком, 
исполняеной процедурой. 

РЕРТЧЕ - выполняет обратное! 
действие - ‘конвертирует список 
ИНСТРУКЦИЙ в  исполняемую проце- 
ДУРУ. 

Теперь мы можем создать ‘трас-| 
СируюшУую ПРОЦедуру ТВАСЕ, которая! 
будет перед тем, как исполнять) 
очередную СТРОКУ  отлахиваеной! 
процедуры, распечатывать ее со- 
держиное на. экране. Вызывается! 
она так: | 


РВОС - имя отлачиваемой пропе- 
дуры. Отладочные строки будут! 
печататься только тогда, когда. 
исполняется эта процедура РБОС. 
ТО ТВАСЕ : АРВОС Е 

ТР ОЕРТШЕОР УОЕР ”. :АРКОС 

ГРЕТИТ ЗЕНТЕНСЕ сАРВОС 
ГАБРЕАОУ ТКАСЕО] 5ТОР? 
ТР НОТ РЕРТНЕОР :АРВОС 
СРЕТИТ ЗЕНТЕНСЕ : АРВОС 
[НОТ А РКОСЕБОКЕ]} 5ТОР? 

СОРУРЕР МОЕО ". :АРВОС :АРЕОС 

НАКЕ :АРКОС ТЕХТ ; АРКОС 

НАКЕ “.Р 115Т ЕТЕЗТ ТНТ 

:АРЕОС ЗЕНТЕНСЕ “РЕТНТ 
МОЕР_ СНАК 34 :АРКОС 

ТВЕЗТ ВОТРЕТЕЗТ ТНЕНС :АРВОС 

ФЕРЕТНЕ ;АРКОС :.Р 
ЕНО 
ТО. ТВЕЗТ, : АЬТЗТ 

ТР ЕИРТУР :АГТЗТ (5ТОР1 

НАКЕ ”.Р БРОТ 115Т "РЕТНТ 

ЕТВЗТ АСТ :.Р 
НАКЕ ".Р 1РОТ РТЕЗТ : АМТ. :.Р 
НАКЕ ”.Р ГРОТ НАКЕ ". ВЕАБСНАВ 


М 
ТВЕЗТ ВОТЕТАЗТ : А 15Т 
ЕН 
ТО ЧНТВАСЕ :АРБОС 


1? НО РЕРТНЕОР МОК “. :АРЕОС 
(5ТОР} | 

СОРУРЕЕ :АРКОС МОЕ ". :АРКОС || 

ЕБАЗЕ МОЕ “. :АРБОС | 


Ножет быть Вы, если захотите. 


ментировать. Нохет, 
читься. так, 


нехваткой оперативной памяти кон-| 
пьютера. Но, к счастью, необходи-| 
ность в таких отладочных процеду-| 
рах почти не возвмкает. В реаль-| 
ной практике вполне достаточно! 
тех общих принципов отладки, на 
которые мы уже указали. | 
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РАБОТА В НАМИННЫХ КОДАХ 


Листинг. 1. 
Программа СкО5$ на БЕЙСИКе (с сокрашениями}. 


Перевод с английского 
Пашорина В. И. 

Редактирование текста 
*ЕНФОРКОИ". 


внимание: Синволы графики пользователя ПЛЖ] в тексте 
программы взяты в квадратные скобки 1...} 
. Они набираются в графическом рехжине, 


20 СГЕЛВ 32243: 60 ТО 80 


окончание, 25 ВЕЕР .01,Ь-а 
Начало сн. с. 9-12, 48-61, 30 РК1ЫТ ОУЕБ 1; РАРЕЮ 8; ТНК 8: АТ а, у2; "[С}]”: КЕТОРЫ 
91-103, 139-148, 187-189, 40 РЕТНТ АТ 11,5; "Р1еазе ма14" 


50... 140 - запись кодов процедуры ВО, через цикл РОК... НЕХТ 
< помошью КЕАТ. .. ВАТА и РОКЕ. 

150 ТЕТ аэРЕЕК 23615 + 256*РЕЕК 23676 

160 РОБ Ъ-а ТО а+16Т: ВЕАБ с: РОКЕ Ь, с: НЕХТ с 

данные по конструкции 


символов 0С-граФики 


10. ПЕРЕВОД БЕЕСЯК-ПРОГРАМНЫ В 
НАМИННЫЕ КОДЫ 
Если Вы пошли ло этой главы 
< ясным пониманием всего прочи- 


Ны полагаем, 
Вы уше умеете  програмниро- 
вать на этом языке. 

Весьма важно перед созданием 
любой ПРОГРАаННы отработать ее ал- 
ГОРИТН В ВИШе СТРУКТУРНОЙ схемы. 
Это обяегчит выполнение перевода 
ВАЗТС-пРоГРАаммы В нашинные коды. 
Ны займемся переводом в машинные 
колы  игРОВОЙ — БЕИСИК-врограмны 
"СвО55", что позволит приобрести 
навыки дия перевода прочих соб- 
ственных програнн. 


Идея ИГРОВОЙ програмны 
"С80$5" состоит в том, чтобы уп- 
равляя перенешением человечка 


вернуть его помой целым и невре- 
диным, ‚ несмотря на обилие Ой 
возможных препятствий «Лист; _ 
Главная программа ми в 
себя инициализацию программных 
переменных, вывод на экран ин- 
струкции пользоватеию и ЦИКа 
перемевсния человечка по. экрану с 
определением его ‘текушего ноло- 
хения. Существует двё точки  вы- 
хода из этого цикла: 

} 1. Если человечек сталкива- 
ется с препятствиен, то осущес- 
твляется переход к процедуре т 


то игра заканчивается, в 
ПРОТИВНОМ случае осуществляется 


програнны. 

г. Выход -к процедуре  НОНЕ; 
Здесь производится проверка числа 
занятых домов, а затен ‘увеличива- 
ется эначение скорости перемеше- 


осуществляется к основному циклу 
главной програнны. 

БЕИСИК-ПРОГРАамма довольно про- 
ста, хотя для задания 906, пвета 
и звука. 
перемещения экрана используются 
Фрагменты в машинных кодах. так 
как на БЕЙСИКе это выполиялось бы 
крайне недленно.  Нашинные Коды 
вводятся в програниу через опера- 
Хорошо разберитесь с 
работой БЕИСИК-программы, ПОТОМУ 
что’ ‘ны переходим к построчному 


переход к основному циклу главной 


а также попиксельного . 


ЧЕТ а-Е2: РОВ Ъ-25 ТО 35: 


танного, те примите позировлония, 270 ПАТА,. . {168 байтов) 
280 РЕТЫТ АТ 11,3; “Бо уой марф 1184г 1013?"; 
АТ 13.11; "(у)е3"; АТ 15.11; "(п о" 


ТЕТ аз=ТЫКЕУ$: 17. аз-“” ТНЕН С0 10 г90 
1 аз<>“у" ТНЕН СО ТО 400 
С1.5: РАТЕТ АТ 0, 11; "ОВУЕСТ": РЕТИТ: 
РЕЛНЫТ "То вш14е а [С] асгозз а гоад апа а 
г1уег, ауо141пв ГАВ} [СОЕ} (2) 1605] 1Тт01”; 
РЕТЫТ "А ГОР) Ра4го1з Че сепАга! 131апа. *: 
РРТЫТ “Тьеге аге & НОНМЕЗ +0 Бе #111еч. 

1.е. варз 1п +епсе гннн) ини“ 
РЕТНТ "Опсе а11 4 НОМЕЗ аге #11164 1ве 
зрее@ м111 1псгеазе, ап ежга 
$Р14ег 13 аадеа апа 4Ве НОМЕЗ м111 
ешрфу" 
*РГезз апу кеу" 


РВТВТ: 
РЕТНТ: 


РЕТЯТ: 


РЬТИТ АТ 18, 9: 
РАОЗЕ 0 

С1,5: РЕТНТ АТ 1, 11; 
РЕТЕТ " 1 
РЕТЫТ АТ 11,6; 


*СОКТКО!.5": РЕТИТ 
<0>"; ЕЬАБН 1 
ЕЪАЗН 0;" 2345618"; 


РЕАЗН 1; "9"; РЪАЗН О; ”_”; РЪАЗН 1; “0”; 
ЕЪАЗН 0 , 
РКЕГЕТ АТ 18,5; "Ргезз апу Кеу 10 РЕЛУ“ 


РАЦЗЕ 0 
ВЕТСНТ 1: 
ЪЕТ. В1=0 
РЕТНТ РАРЕК 4; АТ 10,0;" 

ГЕТ 119е3:9: ЕТ зсоге-0: ГЕТ воше=0; 
РОКЕ 32425,201: РОКЕ 32450, 201: РОКЕ 32469, 201 


РАРЕЕ 5; ВОЕРЕЮ 5: (1,5 
[ОР] 


О РЕТИТ АТ 0,0; РАРЕК 4; "[НННН!”; РАРЕЮ Т;" *; 
РАРЕК 4; "ГЫНЕНЕН] РАРЕК Т;" 
РАРЕК 3; “СЫНиНННЫ. РАРЕК О 
РАРЕХ 4; “[ИНИНИНН]"; РАРЕЕ Т;" "; 


РАРЕВ 4; 
ТР роше‹>0 ТНЕЯ ©0 ТО’`660 


РЕТЫТ РАРЕК 4; ТК. 5; ыы 
РЕТЯТ " (ОЕЕЕ5 ОРЕЕ5  ОБРЗВ 0555 ны 
РЕТЯТ ТНК 7; "г ни ИНН ИМИ 


РРТИТ ТК 2; 
РЕТНТ ТНК 7; 
РЕТНТ ТИК 1; 
РЕТИТ тк 7; 
РЕТЯТ 

РЬТЫТ РАРЕВ 4; 
РЬТИТ РАРЕР 0; 
РЕТИТ РАРЕК 0; 
РЕТЫТ РАРЕХ 0; 
РЕТЫТ РАРЕК 0; 
РЕТИТ. РАРЕВ 0; 
РЕТКТ РАРЕК 0; 
РЕТИТ РАРЕВ 0; 
РВТИТ РАРЕБ 0; 
РЕТЫТ РАРЕВ 4; 
РЕТИТ РАРЕВ 4; 
РЕТНТ РАРЕБ 1; ТНК Т;” ЗСОКЕ ";АТ 21,11; 
“ УЕЗ "; РАРЕБ 1; ТНК Т; ^ Н! $5СО0БЕ " 
ТЕТ 1:20: ГЕТ У1=16: РЕТ х2=х1: ЦЕТ УЁ-У! 
РЕТЕТ РАРЕК 6; 1ЫК 8; АТ 1.91; " * 
КАНРОНТ2Е 05В 32295 

ТР ЗСВЕЕН$ (х2,у2)-" " ТНЕН СО ТО 880 

60 598 25: 60 508 25: НЕХТЬ 
РОЕ азхг ТО г0 $ТЕР_ а: СО 508 25: 60 $0В 25: НЕХТ а 


сосря 


“Г АВ Е АВ 


НЕЯ "; РАРЕВ 5; 


им, 32 


ТЫК.7Т; АТ 11, о: МНЕНИЯ ЕНННИННННННЫННИННН ^ 


* ГАННННЕКННННЕННН НН яННЕНННЫНЫ } * 


Тик ©; 


ака = == = 


еа7 


” 

СТРОКА 20, ЭТа строка не нужна 
й окончательной версии, так как 
сна устанавливает верхнюю границу 
[Е для БЕЙСИК-ПрогрРанны. 
Я 25 и 30. Это две строки 
подлрогранмы, вызызаеной в стро- 
ках 700 и 730. Размемение ее в 
начальных строках необходино дая 
сокращения времени пойска при вы- 
зове. этой подпрограмны, так как 
исегда поиск НУЖНЫЕ подпрограми 

начальных 


ввести фрагменты програкны в ко- 
дах с помомью РОКЕ требуется вре- 


написанной полнос- 
давать такое сообще- 

конечно, нет необходимости. 
СТРОКИ 50... 140. Это строки 
мля ввода через РОКЕ процедуры 
> Рог", обеспечивающей — попик- 
сельное снешение изображения на 
экране. понятно, что для про- 
граммы в машинных кодак эту опе- 
рацию выполнять также не нужно, 
так как эти колы будут записаны в 


‚270. Это первые 
которые нуждаются‘ в пре- 
образований для перехода к про- 
Грамме в машинных кодах. здесь 
осуществляется запись в область 
всех графических элементов 
пользователя. Так как этот учас- 
ток памяти занимает 168 байтов, 
го и в строках БАТА записаны 
чисеа, определяющих Форну 50С. 
В дальнейщен, коиечно, для за- 
ания ИБС ны будем непосредствен- 
записывать в участок памяти 


с адреса 28001, а затен’ перейлем 
их в участок памяти 006,  исполь- 


переменной 

(23675); а в регистровую пару НЬ 
- начальный адрёс данных, харак- 
теризующих Форму ПОС. Процедура 
пересылки, написанная в нажинных 
одак, раямешается сразу же за 
данными 168 байтами. Вызов этой 
рроцедуры поэтому производится по 
команде ВАНООМТ2Е 05Е 24159. 


ЗЕЕ НЯ 
сНчВазяя 
зз=еаячя 
ЯНейнан 


[рлвотА в мАвиННЫХ кодах 


780 БЕТ }1968-119е8-1: РРТЫТ АТ 21.16; 11963 


150 ЦЕТ жё:20 
750 ТЕ 119е8 <> О`ТНЕН 60 ТО 680 
ТЕ В1 ›>зсоге ТНЕН 60 ТО 790 


БЕТ №1 = зсоге: РЕТНТ АТ 21,27; 
РЕТШТ ЕЫАЗН 1; РАРЕК Т; АТ 12.0; 
РЕТЫТАТ 14,0; "Аво&Жвег заюе? 


{7} ез3 


1 


шо” 


ТР 1НКЕУ$ = “п” ТНЕБ ВАНООНТИЕ 058 0 


ТЕ ТИКЕУ® <> "У" ТИБЯ 60 ТО.640 
: вто 40 


РЕТИТ РАРЕК 5: АТ 21,1; 
ТР $2<>0 ТНЕН 60 ТО 050 


РЕТЫТ РАРЕВ 8: ТНК 8; АТ #1, у1;" ®: РЮТЫТ АТ кг, 2; "161" 
920: РОР а=1 ТО 8: ВЕАР Ь,с 


ВЕЕР Ъ.с: НЕХТ а 


ТАТА. 1,11,.1,11,.6, 16,. 05, 11.. 


05, 16,. 05, 11,. 05, 16,1,20 


Е? воте-воте+1: ВЕТ зсогё-3соге+50; РЕТИТ АТ 21.7; зсоге 
ТР Воде/4<>ТНТ(ЪоЮе/4} ТНЕЯ 60 ТО 6650 


ТЕ ЭОШе=4 ТНЕН РОКЕ 32425, 0 
ТР Ьоте -8 ТНЕН РОКЕ 32450,0 
12 воте=$2 ТНЕН РОКЕ 32859, 0 
12 в0те>36. ТНЕЬ 60 ТО 450 
ТЕТ а=ЕНО*30 

ТЕТ аза+1 

1Е а531 ТНЕН БЕТ а:0 
ТР ЗСВЕКИ$ (10, а) = 

Те 5СВЕЕЫ$ (10, а+1) 
РЕТИТ РАРЕВ В; АТ 10, а; 


ТНЕН С0.ТО 1000 
” ТНЕМ 60 ТО 1000 
"(ОР)" 


КЕЗТСГ" 920: РОВ а:! ТО 8: ВЕАЮ Ь, с: ВЕЕР Ь,с: НЕХТ а 


0 то 450 


РЕТЫТ РАРЕВ 8; ТИК 8; АТ хё, тё; 


ТЕТ $1=52: ЪЕТ 71:2 


* 161” 


ТР ТИКЕУ$ <> "1” ТНЕН СО ТО 1100 


ВЕЕР. 001,33 


БЕТ х2=хе-2: ЕТ зсоге-3соге+5: РЫШИТ АТ 21,7; зсоге 
ЪЕТ уё=у2+(1НКЕУЗ-"0” АМ уё<>31) -(1НКЕУ$="9” АНО уё‹>0) 


60 то 670 


8583313 
ЗН я 
ЯЗ 


= 
© 
я 
м 


азазезнЕзяя 
8 
8 
з 


ячяч-=Зачачя 
Яя 25858 


8 
з 


Ьр р, (5СТВ) 


СТРОКА 280. Сообщение, выводи- 
ное на экран по команде РЕТНТ В 
этой строке, можно выводить на 
экран, используя процедуру ПЗУ, 
находимуюся по адресу 8252 
(г03сн). _Нашинные коды этой про- 
цедуры записаны в участке 5ЕАг... 
ЭЕАР, а сам текст. сообщения - В 
участке 5ЕТТ... 5ЕА! (Иистинг-4). ` 


Печать сообщения: 

5ЕТТН 

РЕРБ 16 ОБ 03 44 бЕ 20 Т9 бЕ 
БЕРВ 15 20 171 6! бЕ 14 го 69 
БЕРВ 6Е 13 14 Т2 Т5 63 14 69 
РЕРВ бР бЕ 13 ЗЕ 16 00 0В 28 
БЕРВ.Т9 29 65 13 16 ОР ОВ 28 
РЕЕВТ6Е 29 бР 


ЕО БЕ, 5ЕТТН 
гр вс. оо2вн 
СА. г03СН 


228 


СТРОКИ 290 и 295. Эти СТРОКИ 
необходины, чтобы приостановить 
выполнение программы до тех пор, 
пока не будет нажата клавиша. Ес- 
ли будет нажата клавиша “у”, то 
на экране появится инструкция по 
правилан игры. Если яе будет на- 
хата любая йругая клавива, то 
произойдет переход к адресу 
608АН. Машинные коды,  соответст- 
вУЮЩие этим строкам, зависаны по 
адресу с 5ЕВОН по 5ЕВЕН (Лист. 5) 


Проверка нахатия клавими “У”. 


НАТ 

ВТ 5, (17+0\) 
к 7, -07 

10 А, {5СОЗНУ 
СР 79 

ТР #7, 608 АН 


Перевод 
коды 


ур А. 02 
СлЫ. 1601Н 
СА, ОрбВН 
3 5ЕТЗН 


СТРОКИ 300:2..; 350. Для вывода 
сообщений на экран снова буден 
использовать. процедуру вывода 
на экран последовательности син- 
волов ПЗУ, коды которых записаны 
В участок памяти с именем АТА, 
Коды символов Первого сообщения 
находятся в памяти с. 5ЕСАН по 
5ЕТан, а второго сообщения в 
БЕВАН. .. 5ЕРУН. Процедуры хе выво- 
да РЕТМТ РАТА вакодятся соответ- 


ственно 5ЕТЗН, ‚, 5РВЗН и РАН, . 
600гН слистинг_Т). 

В ячейках с 6003Н по 600СН ва- 
холятсч машинные коды,  реапизую- 
име команду РЛОБЕ 0. Не’ забывай- 
те, что бит 5 ‘переменной 23611 
{1У+1) должен быть сброшен (оли- 
плание вахатия клавиши). 


Печать сообщений, пауза. 


00 ОВ 5Р 42 ЗА 45 43 
00 00 58 бЕ 20 67 15 
64 65 20 61 20 96 го 
63 72 6Е 13 13 20 61 
72 бР 651 54 20 51 6Е 
20 61 72 69 76 65 та 
61 16 бР 69 64 59 6Е 
20 90 91 20 92 93 94 
95 20 АО А1 А1 ла 20 
А8 ОР 00 41 20 9Е 9 
70 61 74 72 62 6С 73 
78 68 65 20 63 65 6Е 
72 61 66 20 59 тз 6С 
бЕ 64 2Е Ор Ор 54 68 
72 65 20 61 Т2 65 го 
20 48 АЕ 40 85 53 го 
бР 20 62 65 20 66 59 
6С 65 64 2Е 20 69 2Е 
2Е 20 67 61 10 13 20 
бЕ 20 66 65 6Е 63 65 
9р_ 90 95 20 90 99 90 


} 


р А, 0ё - 
САМ. 16018 
О РЕ, БЕСАН 
1) ВС, ООАЭН 


65 
48 
55 
20 
55 
59 
2с 
12 
та 
65 
68 
4) 45 20 
55 50 ТА 
50 та 73 
т9 го 565 


То РЕ, 5ЕВАН 
ьр вс, 00т6н 
САЫ.. 203СН 
ВЕБ 5, (1+01) 
НАБТ 

ЕТ 5, (11+01) 
58 2, -07 


СТРОКА 3710 : 1 (15. В участке 
памяти с 600Е по 6012 записаны 
машинные коды процедуры очистки 
экрана. Здесь’ приненяется  дрУГоЙ 
способ; основанный на применении 
пронедуры ПЗУ ОБААН. которая очи- 
шазт столько строк экрана (считая 
снизу), сколько установлено в ре- 
гистАе В (Листинг_6). 


Очистка экрана. 


16 б0ЕН 

(124590 10 В, 18И 
21592 САЫ. ОБЧАН 

124595 = р 6076Н 


СТРОЕН 310:2,.. 390, Колы сии- 
волов. выводимых на экран, запи- 
саны в участкё намяти 6046Н... 
60Т5Н. а сама же процедура печати 
находится ‘в адресах - б0т6н... 
бОТЕН. здесь опять ме инеются 
нажинные коды, реализующие коман- 
дУ РАШЗЕ О (Пастинг_ 9). 


Шечать сообщений, пауза. 


07 08 #3 47 4Е 58 52 
53 00 00 20 20 20 
5Е 20 20 го 
20 20 20 20 
36 30 42 01 
112 20 32 
34 20 20 36 

38 30 01 39 

12 0: лг 00 

50 72 73 ТЗ 

719 25 65 19 
20 50 41 59 


ОЕ. 6016Н 
1.0 ВС. 0050Н 
САМ, а03сн 
ВЕБ 5, (11+01) 
НАТ 
ВТ 5, (1У+01) 
38 2, -07 


СТРОКА 100. В первом главе о5- 
суждадся порядок перевода всех 
операторов этой СТРОКИ в Нашиивые 
колы; вызов процедуры (1.3 здесь 
необходим для установки на экране 
соответствующих атрибутов, как и 
В БЕЙСИЕ-програние. Машинные колы 
зависани в участке 508АН. ‚. 609 БН. 


Установка атрибутов. 


О А, 05 
САБ, г29ви 
ЦР А, 56Н 

12 (5С80), А 
10 А, 92 
САМ, 16015 


СТРОКА 410. В этоя строке, це- 
ременной В!, ивляющейся показате- 
лен достигнутого уровня. присваи- 


вается нулевое начальное значе-. 


ниё.  Подагая, что эваченне этой 
перененяой не может быть больше 
65535, выделим я буфере принтера 
2 байта для хранения значения 
этой перененной. Соответствующие 
этому оператору навинные колы 
залисаны в участке панятя 509си 
„бон. 


инициализация переменной Ъ1. 
609СН 
2йтза 1 м, 0000 
24135 12 45в00Н), нь 
АН 38 +а5Н 


СТРОКА 420. коды символов сообще- 
ния, выводиного на экран, запнса- 
ны в адресах боАлН, ‚. 60С8Ы. Про- 
цедура печати - 60С9н... боо6н. 


печать строки. 


боАЗН 
ФЕЕВ 11 04 16 0А 00 20 20 20 
ПЕРН 20 20 20 20 20 20 20 г0 
ФЕРВ 20 20 20 20 9Е 9Е 20 26 
БЕКУ 20 20 20 20 20 20 20 20 
РЕРВ 20 20 20 20 20 


223 


430, 
определяются. исхойные = значения 
количества "жизней", занятых до- 


СТРОКА В этой  6троке 


нон и до уровня, 

значения ятанятся в буфере 

принтера по следующим адресам: 
количество "жизней" - 5802 
достигнутый уровень - 5803/4 


количество домов - 5805 
Нашиные колы, соответствующие 
ЭТОЙ СТРОКО, , 


см. бОРТН. .. БОЕЗН. 


17 А, 09. 
тл5воанН), А 
14) НЬ, 0000 
р (503), НЬ 


_ ХОВ А 
10 (5805), А 


подпрограимы ЬТНЕ ВО. Нашинные | 
коды см. 


БОББИ, „. 603. 


$ 


10 А, СЭН 
ГР (ТЕАОН), А 
рр ТЕСЕН А 
р (ТЕБЗН), А 
42 6129. 


СТРОКА 450. Коды символов этой 
строки и процедура нечати: 


печать строки. 


СТРОКА 455. В этой строке прове-| 
ряется количество ‘домов и, если 
оно равно вудю. то осушестваяется 
перекой к строке 660, Для реали- 
задии этой строки в нашинных  ко- 
дай необходимо извлечь содержимое 
ячейки 5в05Ы, гие записано Коли- 
чество домов, записать это значе- 
ние В регистр А и использовать 
дая проверки на вулевоё значение 
команду АНО `А, Если Флаг нуля 
(2580; после этой операции не 
будет установлен, то осушествля- 
ется переход к процедуре РЕТНТ 
ОТЗРЬАУ. `ЕСли че этот Флаг не 
включен, то эта процедура ПРОШУС-| ф 


кается и начинается игра. намин- дет иметь следующий вид: 


ные коды, соответствующие этой ты 
строке, записавы в ячейках 30 30 30 30 инициализация координат героя. 
ИО 1ЗТН. .. 6140Н. 30 30 39 30 
-- ей 20 го го го Го НЕ, 1014Н 
Проверка переменной поте. го го 97 98 тр «5ВОбН), НЫ 
го го го 9т Тр (5ВО8Н), НЕ 
#151 37Н 20 го г0 го 
1124887 О А, (5ВО5Н) 07 гр го гв этого примера понятно, 
121890 —— АНО А гр гр го гр что использовать десятичную сис- 
и1 24891 „ЛР НЕ, 63 ЕН гр гро гр гв тему счисления для записи корди- 
||24894 ФР 6З02Н гр го го г5 нат в регистровую пару НЕ не удо- 
те : 20 10 06 9А бно, т.к. ТРУДНО будет предста- 
СТРОКИ 460... 640. Нашинные ко- 91 98 20 г0 вить положение объекта на экране. 


|, соответствующие этим строкан, го 20 95 го 
|занимают. большой объем. паняти. ЭА 9В го го 
‘коды всех символов сообщений этих 20 го 99 11 
устрок записаны в участке памяти эр 90 90 9 
6141Н...65Р71Н, а процедура печати 90 9) 90 9% 


СТРОКА 670. Поскольку здесь 
необходимо выводить на 
только один символ, то 
использовать команду Е5Т 10Н. 


- б3ЗБ2нН. .. 63ЕН, 9 9 печать герол. 
ыы 90 90 90 9 54гтн 
Внипиадхзария экрана. 04 го 26 го 25639 10 А, 02 


6144Н 20 20 го го 
|| РЕРВ 11 04 10 05 6С 8С вс 3С 20 20 20 25 
| РЕЕВ 8С 8С 8С 8С 8С &5С & 20 20 го го 
ОЕЕВ ВС 5С 8С 8С ВС 8С 8С 

ПТРЕРВ 68С 8С &С 8С 11 05 
ТГРЕЕВ 20 АО А1 А! Аг 20 г0 
1 РЕРВ АО А1 АЕ А1 Аг 20 20 
| РЕРВ 20 АО А! А1 Аа. 20 26 
Грег АО А1 А! Аг 20 20 20 


25641 
25644 
25646 
25647 
25649 
25650 
25652 
25653 
25655 
25656 
25658 
25659 
2566г 
25663 
25566 
25667 
25669 


САМ, 1601Н 
ЬР А, 11Н 
®5Т :0Н 

12) А, 08 

В5Т 1оН 

1 А, 10Н 
В5Т 10Н 

ТР А, 08 

Е5Т 10Н 

Тр А, 16Н 
В5Т 10Н 

ЪР А, {5ВОбН) 
Ю5Т 10Н 

1 А, (5ВОТН» 
Е5Т 10Н 

12 А, г0Н 
Е5Т 10Н 


6зогн } 

25554 1 А, 02 
25556 — САШ, 1601Н 
25559 1 Е, 6141 Н 
25552 1 ВС, бе91Н 
ПЕРВ 10 07 20 20 20 96 9С 25565 см гозСн 
РЕРВ 20 20 20 20 20 9С 9С 
 РЕРВ 9С 9С 20 РО 20 20 г0 
| ГОЕЕВ 9С 9С 20 20 20 20 го 
||овув 9С 10 02 2020 АЗ АЗ 


СТРОКА 650. Для реализации 
этой строки в машинных кодах не- 
обходимо предварительно преобра- 
ОЕРВ 20 20 20 20 АЗ 48 го зовать число, записанное в ячейке 
РЕРВ 20 20 20 АЗ АЧ го го 5вогН. для этого оно изваекается 
ФЕРВ 20 АЗ А 20 20 го го из этой ячейки, сунмируется с 
РЕРВ 20 АЗ 44 20 10 07. 9С числом 48 и результат записыва- 


ОЕРВ го 20,20 9С 20 го го 


9с 
го 
20 
го 
20 
м 
20 
20 
9С 
20 
9 
60 
20 
29 
20 
АЗ 
9 
9 
9 
9 
ов 
9 
90 
9 
о 
95 
93 


> 20 


го 
20 
гр 
гр 
гр 
20 
91 
го 
го 
10 
зо 


303 


ется в ячейку 6402. Нашинные коды 
этой операции 6ЗЕОН. .. 6ЗЕЭН. Коды 
символов сообщения для вывода на 
экран записаны в б3ЗЕАН...640РН, а 
пропелура печати - 6410Н... 6/4ЕН. 


Инициализация строки результата 


6ЗЕОН 
25568 ША, (5вогН) 
АПР А, 30 

10 (6401Н), А 


ЭК +26 


11 01 10 07 го 53 43 4Е 


52 45 20 16 15 0В го 80 
`Щ5 ЧЕ 20 11 05 10 00 39 
11 01 10 07 20 48 49 г) 
53 43 4Р 52 45 20 


р А, 02 
СА, 1601Н 
ГО ОЕ. 6ЗЕ1Н 
10 вс, 0026Н 
СА, 203СН 


СТРОКА 660. В этой строке 
определяются искодные координаты 
положения человечка на экране *! 
И 71, а также координаты его но- 
вого положения яг и уг. Для про- 
граммы в нашинных кодак эти коор- 
динаты хранятся также в буфере 
принтера; 

х1 - 5ВОбН г - 5возН 

71 - 5ВОТН уг - 5во9н 

для залиси в ‘буфер принтера 
координат лучше использовать 
шестнадцатиричную систену счис- 
ления. Тогда процедура записи 6у- 


250 


` передающую значение 


СТРОКА 680. В этой строке про- 
изводится вызов процедуры вом,, \ 
записанной в нашинных кодах с 
адреса ТЕгТН. Код, соответствую- 
щий этой строке: › 


Вызов процедуры кОМ.. 
6446Н 


25670 — САл, ТЕёТН 


СТРОКА 690. В этой строке про- 
веряется состояние символьной 
ячейки с координатами кё, уг. Для 
реализации этой строки в машинных 
кодах буден использовать пропеду- 
ру 5СВЕЕН&, описанную в главе 8, 
параметров 
исследуемой ячейки на стек каль- 
кулятора и затем в регистры А, 
В.С.0,Е. Для определения состоя- 
ния ячейки используен: 

Ь А, (ПЕ) 
СР гон } 
помните, что для продолжения 
програмны, посае использования 
калькуляторного' стека, 


исследуемой ячейке не пробел, 
осушествляется переход к процелу- 
ре НИТ, -которая начинается с ад- 
реса 6554А8Н. В ` БЕЙСИК-програмне 
соответственно переход к строке 
880. Нашинные коды, соответствую-1 
шие этой строке записаны в участ- 
ке 6499Н... 6%50Н. 


Проверка местоположения героя. 
10 вс, (5ВОЗН) 
СА, а538Н 
САМ, 2ВЕ1Н 


25683 1 А, (ПЕ) 
25684 РОЗН АР 
25585 СМЛ, 16ВЕН 
25688 — РОР АЕ 
25689 СР гон 


УР #2, 6548Н 


СТРОКА 880. В этой строке про- 
веряется: достиг ли человечек 
вершины экрана, \.е. дошел ли он 
до дома. В машинных кодах для 
этого записываем значение коорди- 
наты яг в регистр А: 

Тр А, (5808) 

и сравниваем это значение с ну- 
лем. Если это значение равно ну- 
лю, то выполняется переход к про- 
цедуре НОМЕ, которая начинается с 
аптеса 6бАбН. В БЕЙСИК-поограиме 
осуществляется 
переход к строке 1050. Нашинные 
соответствующие этой строке 
645ЕН. .. 6465Н. 


Проверка достиления “дома”. 


685ЕН 


25694 — 1. А, (5ВО8Н) 
25697 СР 00 
«ТР 7, ббАбН 


СТРОКА 1050. Здесь также для 
вывода на экран одного символа в 
позицию с координатани хе, уг 
использовать команду 
зон, как и в строке 6170. 
Нашинные коды - 6466Н... 548 4Н. 


печать героя в новой коордивате 


6466Н 

Р.А, 02. 
САМ, 1601Н 
ГР А, 11 

Е5Т 10Н 

12 А, 08 

Е5Т ЗОН 

ТО А, 10Н 
В5Т з0Н 

Ъ0 А, 08 

В5Т 10Н 

Ь А, 16Н 
Е5Т 10Н 

10 А, (5ВО8Н) 
В5Т 10Н 

Ь А, (5ВО9Н) 
Е5Т 10Н 


Запоминание новой координаты, 


6485Н 
25133 
25736 


р НЕ, (5ВОЗН) 
0 {5ВОбН) , НЬ 


лучше использовать не системную 
переменную ГАЗТ ЕЕУ, а непосред- 
ственно команду 1 А, (С). Причем, 
чтобы проверить нажата ли клавиша 
*1", достаточно проверить состоя- 
ние только клавиш "1"..."5" так, 


РАБОТА В НАЩИННЫХ &ОДАХ 


как это описано в главе 5. Машин- 
ные копы - 648ВН. .. Б49ЗН. 


Проверка нахатия клавиши "1". 


ба8вН 
25739 10 ВС, ЕТТЕН 
2574г ТВ А, (С) 
25744 ВТ 9,А 
25146 38 НЕ, +1С 
СТРОКА. 1080. Поскольку дли- 


тельность и тональность звукового 
сигнала принципиального значения 
не имеют, то для реализации этой 
строки в нашинных кодах достато- 
чно только вызвать процедуру ВЕЕР’ 
из ПЗУ - САМ, ОЗВБН. 


Генерапия звукового сигнала. 


6494Н 

25148. 10 нь, оозён 

25151 10 РЕ. 0005Н 

25154 — САМ. ОЗВ5Н 

СТРОКА 1090. Для записи этой 


СТРОКИ в машинных кодах необходи- 
но извлечь содержимое ячейки 5808 
и вычесть из этого значения число 
г, а результат вновь записать в 
Эту же ячейку. значение текушего 
счета, записанное в ячейках 
5803/4, увеличивается на 5 и 
вновь записывается в эти ячейки. 
Нащивные коды этих операций - 
6490Н. .. б4АРН. Для вывода на эк- 
ран текушего значения счета ис- 
пользуются процедуры 5ТАСЕ ВС и 
РЕТИТ УАБОЕ ОН ЗТАСЕ, но первона- 
чально определяются параметры 
РЕТНТ АТ. нашинные коды гы 
бАВаН... 64С8Н. 


Коррекция счета (зсоге). 


549ри 
25157 
25160 
25761 
25162 
25765 
25168 
25769 
25770 
25711 
г5ттг 
25173 
25776 
г25т7т 
257719 
25182 
25785 
25787 
25788 
25190 
25791 
25795 
25798 


1.0 А, (5В08Н) 
ОЕС А 

БЕС А 
` 2 (5ВОВН), А 
10 НЕ. (5ВОЗН) 
тяС нь 

тЕс нь 

тЯС нь 

тыс ни. 

тс нь _ 

Гр (5ВОЗН), нь 
НОР 

О А, 02 

САБ. 1604Н 
ТР А, 16Н 

10 А, 15Н 

В5Т 10Н 

1 А, ОТ 

Е5Т 1оН 

о БС, (5В0ЗН) 
см, гревн 
САМ. 20ЕЗН 


СТРОКА 1100. Опять хе, для 
чтения состояния клавиатуры и ус- 
тановки значевия уг. используем 
команду 18 А. (С). В програине в 
машинных кодах добавиена процеду- 
ра, которой нет в БЕЙСИК-програм- 
не. В участке памяти б4ЕгН... 
б4ЕАН записаны наминные коды, 
торые составляют процедуру про- 
верки нахатия клавиши "6". Если 
эта клавиша нажата, то осушест- 
вляется ВЫЕОдД из программы. На 


251 


ко-. 


этон гаавный цикл програнны :. 


канчивается. 

Если теперь Вы запустите эту 
программу, то. перенешение чело- 
вечка по экрану будет вастолько 
быстрым, что Вы не будете его за-| 
нечать. Поэтому необходимо в 
главный цикл программы в машинных 
кодах включить занедляющую ироне- 
ДУРУ. 

Этот же эффект можно получить, 
если в главный цикл включить по- 
полнительно процедуру нузыкально-' 
го сопровождения перемешения, Мл- 
Шинные коды этой процелУРы  -! 
68Е5Н. .. 650ВН. завершающей ко 
нандой главного цикла является 
конанда ФР 642Т, обеспечивающая 
переход на начало главного цикла. 
В БЕЙСИК-програиме это выполняет- 
ся переходом к строке 670. 


Опрос клавиатуры, нузыка. 
6асн 
25801 10 ВС. ЕЕРЕН 
25804 КА, (©) | 
25806 ВТ О,А 
25808 — Л Е. +ОЕН 
25810 1. ^, (5ВО9Н) 
25813 СРаЕ 
25815 №2, +01 
25811 ТИСА 
25818 10 (5ВО9Н).А 
25821 ЛР 64Е5Н 
25824 ВТ 1, А 
25826 — ЛЕ 2. ОЕ 
25828 10 А, (5ВО9Н 
25831 СР 00 | 
25833 1. +01 | 
25835 ПЕС А } 
25836 №0 (5ВО9Н), А 
25839 ЛР б4Р5Н 
6аР2Н й 
25842 ВТ 4.А | 
25881 ВЕТ? | 
б4Р5Н 
25845 10 В.0А 
25847 10 0Е. 6018Н й 
25850 10 и. 0001Н 
25853  РИЗИ НЬ | 
25854 РОЗН БЕ 
25855 РОЗН ВС 
25856 САМ, 0385 
25859 — РОР ВС 
25860 —РОР БЕ 
25861 —РОР Н, 
25853 ПСА 
25864 Пра, А 
25865 НОР 
25866 072 -ОР 
25868 р 642т 


ПРОЦЕДУРА НТ 
СТРОКА 700. В этой строке вво- 
цится вовая переменная а = Е?. 
Для того, чтобы сохранить значе- 
ние этой переменной, будем ис- 
пользовать свободную ячейку 5свон 
из области системных переменных. 
Переменная Ь цикла РОЯ/НЕХТ зави- 
сывается в регистр В: 
О В, 19Н (250) 
и в ячейку 5СВ1Н для использова-! 
ния в следующей процедуре. Нашин- 


ные коды, соответствующие этой 
строке - 6548Н...6561Н. Вызов 
процедуры, соответствующей БЕЗЧ- 


СиЕ-оператору 60 508 25, выпол- 


непосредственно связаны с этой нится в ячейке 5СВОН, то органи- 
Трокой СТРОКИ 25 и 50 и мы Рас-  зовать пика в нашинных кодах не СТРОЕЛ 770. В этой строке сра- 
смотран вх здесь совместно в еди-  представаяется особенно трулным.  внивается достигнутый счет в 
ном блоке. дяя этого необлонимо извлекать этой игре с лучшим, результатом 
СТРОКА 25. Для перевода этой это значение из этой ячейки, уве- прОовНых игр. Если новый результат 
Строим в машинные коль необходимо  дичивать его на & при кандом про- выше, то осуществляется переход к 
использовать калькуляторный стек,  хойё и сраваивать с числом 1АН строке 190. Эту операцию легко 
Куда зазисизается число 0.1 и хе- (200). машинные коды - 6562Н...  выпойнить для программы в .машин- 
зультат ошераныи Ъ-а. Вычитанке .., 657УН. ных кодах, используя команду 


довательвость нонава; цикл по а", и проверяя значение Фиага перено- 


‚› Ш дн САД, 650РН чен восле команды 58С, то выпол- 
898 1 СА, б50РН няется переход по адресу 65611Н. 
Затем. используя процедуру 2 А, 45С ВОН) Нашинные колы пая этой СТРОКИ - 
сразн перешисываем значение со 11С А ©59БН. .. б5АбН. 
стека в регистр А и вызываен про- ИС А 
цедуру ВЕЕР - САМ. ОЗРЗН. Нашин- 10 (5СВОИ)/А 
коды, соответствующие этой СР зан 
строке, `650Р...6521. 38 К. -12Н 


26011 ХОА. 
го Ш, (5возн) 


на экран состветственно в познцио СТРОКА 7490. В этой строке пиро- 
а, 2 используем команды 12 Ап и  изводится подсчёт числа "зизней”. 
. Нашиниме коды - 6522Н... — ДЕЯ реализадии этой строки в на- 
> шиввых кодах необходимо извлекать 
звачение из ячейки 5вогн,  умень- 
пать его на 1 ий результат опять СТРОКА 780. В этой строке ус- 
записывать э эту ячейку. для ны-  танавливается новое значение 
вода на экран этого значения‘ ие- лучшего результата и это значё- 
обжодино первоначально установить ние выводится на экран. В мащин- 
необкодымые параметры РЕЗНТ АТ. а НЫЕ кодах для выполнения этой 
затен к числу, записаннону в  опералии постаточно переписать 
ячейке эрогнН добавить 30Н(480) значения из ячеек 5803/41 в ячейки 
дая перевода его в кол АЗСЛТ. `5800/1. Дая. вывода на. экран ис- 
павинные коды о574Н, .”. б58ЕН. пользуем процедуры 5ТАСК УМЛЕ ТИ 
ВС и РЕТНТ ТОР УМДЕ ОБ СМхЛА- 
корреклия числа “жизней”. ТОВ 5ТАСЕ, предварительно устано- 
ИВ Параметры РЕТНТ АТ. Наминные 
$65145 , коды б5АТН. .. 66С2Н. 
25972 ТА, {5В0гН) 
25915 ПСА 
25976 12 (5502И), А 
25979 1 А, 02 
25981  СМл. 1601Н 
25984 ТА, 16 Н 
25985 — и5Т 10Н 
25987 10 А, 16бН 
25989 — в5т 10Н 
25990 10 А, 10Н 
25992 — В5Т 10Н 
25993 140 А, (5ВО2Н) 
25996 АБР ЗОН 
25998 Е5Т 1ОН , 


Расчет ь-а, генерация звука. 


25871  КЗТ 2вН ; Калькуаятог, 
$4 ЕА 25 ОТ ОА ЗР 35 


САБ, ОЭРВН 


печать "героя” 


25890 10 А. 0 
25892 СМ, 1в01Н 
25895 ФАН 
25897  в5т 4он 
25898 12.01 
25900  В5Т 10Н 
125901 10 А,11Н 
25903  взт 10н 
25904 №2 ^.08 
25906 — ВБР 10Н 
1125907 10 А, 0Н 
25909  Р5т 10Н 
10 А. 08 


Коррекция рекорда, 


26023 10 н.., (5ВОЗН) 
25026 10 (5ВООН) , НЬ 
26029 РИЗН НЬ 

26030 РОР ВС 

25031  САл, гран 
26034 10 ^.02 

26035 СА, 1504Н 
25039 10 А, 16Н 
26041 БТ 10Н 
26042 10 ^, 15Н 
26034  м5т 10н 
26045 10 А, 1ВН 
25087  в5т 10Н 
26038 — СМА, 20ЕЗН 
3% +4с 


СТРОКА 150, В этой строке пе- 
реписывается значение переменной 
ха так, чтобы хг = 19Н (200). 
нашинные коды 658РН... 6593Н. 


СТРОЕН 190 и 800. В ЭТИХ СтТРОо- 
Боррекция переменной ха. ках печатаются ‘сообщения. Коды 


символов находятся в 65051... 
558тН й 66105. а сама процедура печати - 
25999 1 А, 19Н 6611Н... 6619 Н. 


25001  ъ) извоан), А 


печать сообщений. 


СТРОКА 1650, `В этой строке вы- 
полняется условный переход. Если 
чисцо “жизней” ве равно 0, то вы- 
полияется возврат к началу гааз- 
ного пикла - строке 630. дая про- 
гранмы в машинных кодах. это це- 
рекод по адресу 6456Н. Нажиные 
кода, соответствующие этой строке 
- ‘659аН... 559АН. 


РЕРВ 12 01 11 07 15 05 00 20 
РЕРВ 20 20 20 20 20 2020 20 
БЕРВ 20 20 47 41 ар 15 20 20 
РЕРВ АР 56 45 52 20 20 20 20 
РЕЕБ 20 20 20 20 20 20.20 16 
ГЕЕВ ОБ 00 12 00 20 20 41 6Е 
РЕРВ 62 14 68 65 Та 20 67 61 
25944  САШ. Б5ОРН ФЕРВ 60 65 20 ЗЕ 20 28 19 29 
253ат РОР ВС РЕРВ 65 13 20 20 28 6Е 29 6Е 
25948 — ТИС В ПРоверка на конен *хизней”. РЕРВ 20 20 20 20 
25049 10 А,В 
2т9"с > 23 6594АН 
259= № Н2,-11 . 26004 10 А, (5вогН) 26129 10 ГЕ, 5565Н 
Ив Рае Ив 26007 АША 26132 о 10 ВС. 004СИ 
СТ. А 130, Поскольку зеремен- 25008 7 #2. баЯ6Н 
ная цикла эзой строки у нас хра- 


25928 № А, ‹5ВО8Н) 
25931 10 (СОН), А 
25934 1 ван 
25936 1ФАВ 

25931  РИ5Н ВС 
25938 1 (5СВ1), А 
25941 СМД, б5ОЕЕ 


СИ 


26295 12 РЕ, 6б9АН 
26298 1 5С.000С 
25301  СмМл, г03Сн 


СТРОКИ 840...850. В натинных 
кодах, соответствующих этим стро- 


ществляется соответствующий пере- : 
од. Если ни клавиша “у”, ни кла- СТРОКА 900. Эта строка в про- ИЛЬ ИГ ы 
Вита "п” не будут нажаты. то осу-  гранме в нашиниых кодах не вухна, СТРОКА 950. В этой строке вы- 
шествляется возврат к циклу охи- т.к. расположенные зпесь данные  полняется проверка: все ли 4 дома 
дания нахатия: клавиши, дИЯ МУЗЫКИ будут загружены непо- уже заняты. Есин нет, то осушес- 
Е средственно в память при загрузке  твляется переход к главному пик- 
наминного кода. лу. Програнна в Ннашинных кодах, 

СТРОКИ 910...920. Здесь через выполняютая эту операцию; проще, 
САБЫ. 666АН вызывается процедура чем строка ВАЗТС-программы. для 
для проигрыша торжественной этого постаточно записать в уе- 
мелодии. Сама мелодия распоржена  гистр А звачение из ячейки 5РО5Н 
в адресах 6656Н...6669Н. продеду-. и с помошью команды АНО 4 нас- 
ра - в 666АН...6699Н, а вызов  кировать все биты, кроме второго. 
выполняется из точки 66сон. Если в результате операции Флаг 
нуяя (2ЕБО) не будет установлен. 
то выполняется переход к главнону 
пиклу с помошью команды УР 641Е. 


Проверка нахатой клавиши, 


664АН 
26138 НМТ 

26139 ВТ 5, (1+0) 
26143 32% 2,-07 
26135 — ВЕБ 5, (1У+01) 
26119 1 А, (5СОВИ) 
26152 СР бЕН 

26154 7 52, +03 
26156 СМЛ, 0000 
26159 СР ТЭН 


Проверка 4-х домов. 
6бЕАН 


? СТРОКА 860. Перед тем, как вы- О А, (5В05Н) 
полнится переход к началу главно- 
го цикла по команде тр 60С9Н, пе- 


реписывается значение лучшего 


СТРОКИ 960...980. ЭТИ СТРОКИ 
И: позволяют увеличить Скорость 
тр нь, 665СН ИГРЫ, когда количество занятык 
ЕО А, (НО) понов достигает 4,8 иди 12. Это 
ьр466т8Н), А достигается путем исключения 
команд КЕТ из процедуры вОМ.. 
СТРОКА 985. В этой строке про- 
веряется, выше ли число занятых 
Езт авН ; калькулятор.. донов, чем 36. Если это так, то 
ЗА ЕС #С СС СС СС 38 пропускается процедура для добав- 
РОР Н. ления еше одного паука и осушест- 
БО А, ©НЬ) вляется переход к главному циклу. 
РОБИН НЫ для реализации этого в машинных 
СА, гревн кодах достаточно вычесть от зна- 
САМ, ОЗЕЗН чения переменной "Боше” число 371. 
РОР Ш, ЕСЛИ ПРИ этон Флаг переноса 
РОР_ ВС (САВРУ) не будет включен, то зна- 
тис нь чит число занятых домов >= 31. 
рлих он и выполняется переход по конанде 
БО А, 01 УР ЕС 6129. Нашинный код Е 
сАм, грезн бт14Н... бТ18Н. 
ЪО А, 1ан } 
сам, гдезн 
САБ. ОЗЕЗН 
ВЕТ 


26163 10 А; 02 
25165 СМА, 1601Н 
26168 Пол. МН 
26170. В5Т 10Н 
26171 10 А, 05 
26173  И5Т 10Н 
26174 10 А, 16Н 
126176 — в5т 1он 
26177 12 А15Н 
26119 вт 10н 
26180 1 А. 07 
25182  в5Т 10Н 
26183 10 А,20Н 
26185 ВТ 10Н 
26186 10 А,20Н 
20188 РТ 10Н 
26189 10 А, 20Н 
26191  БЭТ 10Н 
26192 №0 А, 20Н 
26194  к5т 10Н 
ЭР 0с9н 


26354 ХОЯ А 
26355 12 А, (5В05Н) 
26358 СР 04 
26360 — В. 2, +06 
26362 ХОБ А 

0 (ТЕАЭН), А 


СТРОКА 930. Изменение значений 
переменных воше и зсоге в машин- 
ПРОЦЕДУРА НОМЕ ных кодах см. 66СЗН. .. 66рТН, а 
И УЗИ вывод значения зсоге на ‘экран 
СТРОКА 890. Для нывода на эк- выполняется с использованием 
ран здесь также используется про-  пёчати числа. наховяшегося на 
цедура для печати символьной  вершияе стека калькулятора.  - 
Строки, но первоначально в данных  Маминные колы 6604Н. .. 66ЕЭН. 
этой строки перенисываются значе- 
Вия 1, 71, х2 и уг. 


Коррекция переменных. 


6б9АН. .. ббА5Н, перенос значений Л А, (5В05Н) 


переменных х!, 71,52 и уг - в 26310 ПСА 
бСАбН. . 66В1Н, а процедура печати 26311 Тр (5В05Н), А 
- в 66В2Н... ... 66ВЕН. 26314 то н, (5ВОЗН) 


26317 1 вЕ, 00З2Н 
26320 —АШЮ Н., Е 
10 (5ВОЗН), НЕ, 


Печать “героя”. 
669АН . 
РЕРВ 11 08 10 08 08 16 02 04 


Печать новых значений. 


РИ5Н: НЫ 
26325 10 А, 0 
25321‘ см, 1601Н 
26330 12 А, 16Н 
26332  Б5Т 10Н 
25333 1 А15Н 
Е5Т 10Н 


26278 10 #н., (5ВОбН) 
26281 1 (5697), и. 
2624 10 м,, (5В08Н) 
26287 10 (66АЗН), НЕ. 
10 А, 02 

САЫ, - 1601 Н 


255 И { 


следующей программе: 
ВУ А, С 
АКО Е 


Все операции выполняются с ис- 
ппользованиен кодов калькулятора. 
|Малинные коды - 6719Н... 6740Н. 


26463 ТЫС А 
25464 — РОЗН АР 
26465 10 В,А 
26466 — ШС, 0А 
26868 — САЫ, 2538Н 
см, 2вЕАН 


Генерация случайных чисел. 
6718Н 

126393 12 ВС, (5С76Н) 
`1]26397т  сАы, гоеви 

||26400 — В5Т 28; Калькулятор. 
12ЕЕВ А! ОР 34 ЗТ 16 04 34 80 
| |РЕРВ 481 00 00 80 32 02 А! 03 
РЕРВ 31 38 

26419  САШ, грАгн 

264аге 1 (5С76Н), БС 

26426 ‘ПЛА, С 

26427 — АННО зР 

50В 02 


32295 Ш, 16479 
32298 — СА. ЦЕЕТ 
32301 Ш Н., 16512 
32304 СМЛ, ТЕНТ 
32307 вн, 16512 
32310 — САЫ. ЕТЕНТ 
32313 1 нь. 16607 
32316 — САМ, БЕРТ 
32319 10 Н:. 18432 
з2згг САМ. ВТЕНТ 
32325 12 н.. 18832 
32328 САМ, ВТЕНТ 
32331 1, 18432 
32334 ° САШ, ВАСНТ 
32337 1, (23673) 
32340... 32346 - НОР 
згзат.  Аво оа 
32349 2,15 
32351 о НЕ, 18496 
32354  САШ, ВТСНТ 
323557 10 И. 18495 
32350  САШ, ВТСНТ 
32363 10 Ш, 184965 
323566 СМ, ВТСНТ 
32359 о 3816 

5 32371 р нь, 18527 
З2з1А о САШ, БЕРТ 
32377 12 н, 18527 
32380 СА. ЦЕЕТ 
32385, 10 №,, 18527 
32385 — СМА, ЦЕРТ 

16 32389 1 и.. 18560 
32392 СА, ВТСНТ 
32595 ши. 18560 
32398  САШ, В1СиТ 
32801 10 в, 18560 
32804 — САМ, ВТСИТ 
зезот ош, 18624 
32110 САМ, ЕТСНТ 
324813 фи. 20511 
32416 — СА, БЕРЕТ 
32419 о 10 н,, 20575 
Зе4гег о СА, БЕРТ 
32425 ВЕТ 
32425 1 в, 18560 
з24г9 о см, втент 
324532 о №., 18624 
32435 .САШ, РТСИТ 
32438 1 и... 20511 
32441 САМ, БЕРТ 
32484 10 нь, 20575 
зглз7т САМ, БЕЕТ 
32450 ВЕТ 
32451 10 Н., 16479 
32458 САМ, БЕЕТ 
З2157 1 и, 16612. 
32850. САМ. ВТЕНТ 
32463 ° 10 №, 18432 
32866 САМ, ЮТСИТ 


СТРОКА 1030. Значение перемен- 
ной “а” извлекается со стека и 
записывается в регистр А, а затем 
СТРОКА 1000. Все, что необхо- размешается в участке памяти с 
димо сделать, это увеличить на. 1 именем РАТА для следующего вывода 
значение переменной “а”. Натинный на экран процедурой РЕТИТ БРАТА. 
код - 6тАЗН. Нашинные коды 6ТТЧН. .. 6792Н, 
СТРОКА 1005. В этой строке ера АБ 
проверяется, не превышает ди 
значение переменной “а” величины 
31. ЕСсаи это так, то значение 
этой переменной обнуляется. 


Печать добавочного паука. 


6тттн 
26487. РОР АЕ 
26488 РЕС А 
26889 10 (6т8ен), А 
26492 8 +0Т 
РЕРВ 11 04 16 ОА 19 9Е 9Е 
26501 1 А, 02 
26503 СМЛ, 1501Н 
г 26506 10 ТЕ, 6ТТЕН 
СТРОКА 1010. Дия того, чтобы 25509 тр вс, 6007 
проверить свободна ли позиция 26512 — САМ. г03СН 
экрана с координатами (10; а}. АНЯ 
используется пропедура ЗСВЕЕН$, СТРОКА 1035, Здесь повторно. 
Для этого первоначально в регистр вызывается пропедура,  воспроиз- 
В записывается значение перенен-  водяшая ФанФары по команде СА. 
Ной “а”, а в регистр С - значение  666А. у 
ОАН (100), и вызываются процедуры СТРОКА 1040. Это строка безус- 
У5ТАСЕ УАЛЕ 18 ВС и 5СВЕЕН$, а  ловного перехода в начало цикла. 
затен параметры со стека переда- В нашинных кодах это выполняется 
ются в регистры А,В.С.р,Е. Те- по команде др 6129Н. 
шерь выполняется. проверка, 
ЗСКЕЕН$ (10, а) = 20Н. Если это Музыка и возврат. | 
так, то выполняется переход для 
проверки следующей позиции экрана 5  САЛ, б66АН 
по команде ЛЮ 6741. Нашинные ко- 3Р 6125Н 
ды, соответствующие этой строке, ‘` 
6747Н. .. 6ТЭЕН. Как видите. выполнять перевод 
БЕЙСЯК-програмиы в машинные коды 
ве так уж саочжно. Лучше иснользо- 
вать при написании ‘программ в 
нашиных кодах местнадлатиричную 
систему счисления, т.к. она более. 
нагаядна, если выполняется запись 
чисел сразу хе в  регистровую 
пару. 

Нам осталось только привести 
иашинный код для скроллинга 
экрана вираво-вдеро. Это код 
пропедуры ВО. 


Поиск свободного знаконеста. . 


наминный код процедуры ко. 


ов зг2г94. 

РТОНТ 32244 Ш С,8 В 
а 32гёб РОЗИ НЬ 
32241 Ш ПЕ, 31 


СТРОКА 1020. Эта строка повто- 32250 — АПО НЕ, БЕ 32469 ВЕТ 

ряет предыдущую, за исключениен 32251 О А, (НЫ) 32870 тов, 16879 
того, что значение переменной "а" З2г5г2 $5С НЕ, БЕ 32473 САЫ, БЕРТ 
увеличивается ва { перед вызовом з2г5д4 БРА. 32476 ° 10 м, 16607 
процедуры ЗСЕЕБЕН$. Обратите вни- 32255 ьр в, з2 32479 САБ. БЕРТ, 
мание, что значение переменной ва з2г5т ГО А, ША заавг ГО №. 18560 
"а" сохраняется перед вызовом 32258 ВРА 32185 ` СМЛ, Вент 
процедуры зСЕЕБЕН$® (РУЗН АР}, ЧТО- 32259 ЕО (НЫ А. 32488 ГО На, 18624 
бы его ножно было использовать в 32260 1 н, 32491 САМ. БТСНТ 
‘следующей процедуре. — Маминные 32261 БУ 12 32194 БЕТ 


коды бТ5ЕН. .. 6776Н. 


= 
Бан 


М931сС ВОХ Мак 301+ ЯБЯН 5011059 


ВОЕ :-201Г- @ УЕ Ге 
ССЫЙТЕЯЗ : СНП: 00;39:снйе 60139 


ВК 


Виесто вступления. 

испр 
дорогие КРУЗЬЯ! Эту объемную 
статью не хочется нредварять 
утонительным вступлением, но если 
Вас абсолютно не интересует 
музыка и. тем более, у Вас нет 
идей по работе с программой МНАН, 
мы все же просим Вас внимательно 
зпроснотреть статью. Дело в том. 
что здесь представлена такая 
гирлянда идей, полезных советов и 
которая 
млогие програнны, даже 
1если сни и не имеют отношения к 
музыке. 


Ее. =... 


*ИНФОРКОМ". 


(С) Алексеев А. Г., 1993г, 

МНАН! ТЬе Миз1с Вох. 

НОВЫЕ — БОЗНОХНОСТИ 
Этот музыкальный редактор на- 
верняка ухе ‘знаком читателян 
\"2х-РЕВЮ”. Он помогает не только 
‘освоить азы музыкальной гранот- 
но и придать особый блеск 


ет ин неповториный облик. 

“УНАН” достаточно широко рас- 
Цпространен на рынке програимного 
обеспечения и читатель наверняка 
дымеет ту или иную версию в своем 
арсенале. Существуют и подробные 
описания к программе. Бодее широ- 
ко развить эту тему вынуждают не- 
‘которые тонкости, связанные с ее 
работой. -В частности, неграмот- 
ная адаптация под БЕТА-диСК мно- 
Ги версий, икеющших хопдение на 
Рынке програннного обеспечения. В 
результате этого они неправильно 
выполняют запись на диск сконпи- 
лированвого кодового нузыкального. 
Фрагиента. Предлагаемый материал 
вЕосит ясность в этот вопрос. 0с- 
птановлюсь и на некоторых других 


и главное - довольно сушест- 
‘венном ее усовераенствовании. 
Надо сказать, 


ние или процедура и как ее можно 
использовать. Этот материал нахо- 
\мится несколько в иной плоскости: 
конкретная программа и как к ней 
ириненить сведения из разных об- 
дастей, так или иначе ннеюжие к 
'ней отисшение. 


Итак, "УНАН“. Бот типовой на- 
бор Файлов, входяших в програмну, 

*"УНАН!” — ВАЗТС 

"5СЕЕЕН$" СОБЕ 16384, 6912 

*УНАН!1” СОБЕ 65500, 235 

*УНАН!2” СОБЕ 30000, 15006 

“УНАН!3” СОБЕ 50000, 1000 

*Н. ВОХ" 8ВА$1С 

Первый Бейсик-Файя является 


загрузчиком. Во-первых. он пере- 
устанавливает значение  ВАНТОР- 
29999. Такии образом, для блоков 
кодов отводится место с адреса 
30000. Во-вторых, именно в этом 
Бейсик-загрузчике находится ко- 
манда, переключающая символьный 
набор на загрухаемый утолшенный, 
стилизоваяный. ‘Новое значение 
системной переменной СНАЕ5 зада- 
ется при помоши РОКЕ: 

РОЕК 23606, 42: РОКЕ 23607, 217 

СНАЕ5=42+256.211=55594 

Переключение СНАВ5 происходит 
в первой зе строке Бейсик-загруз- 
чика и является, кроме того, ме- 
тодом зашиты. Это приводит к то- 
ну, что при нахатии ВЕЕАК ничего 
не видно; сами символьный набор 
еше не загружен. Это отпугивает 
начинающих, На самом деле все 
ПРОСТО: Переключитесь на символь- 
ный набор ПЗУ, для этого подайте 
“вслепую” прямую команду РОКЕ 
23606,0: РОКЕ 23501,60 и все 
встанет на свое место. 

Символьный набор распололен с 
алреса, ва 256 большего, чем 
СВАЮ5: 55594+256:55850. Если У 
Вас появится желание заменить его 
или русифицировать всю програиму, 
то Вы сножете это сделать, распо- 
дожив новый символьный набор с 
адреса 55850. ПРИ русификации 
надо также учесть, что значитель- 
ная доля текстовых сообщений со- 
держится в машинно-кодовой части 
програмны. 

Большая часть программы выпол- 
няется в нашинных кодах, но про- 
грамна обрашается и к Бейсику в 
определенных случаях. Это загруз- 
ка-выгрузка мелодии, компиляция и 
запись скомпилированного блока 
кодов. Одной из первоначальных 
проблем является то, как’ остано- 
ВИТЬ ПРОГРамму и ВЫЙТИ В  Бейсик. 
Для этого ножно в титульном меню 
нахать “1” или "2" (загрузка или 
запись). Когда в нижней части 
экрана программа запросит ввод 
устройства - это ухе работает 
Бейсик. Нажимайте ВВЕАК для ос- 
тановки  програнны, запустить 
опять ее можно командой вин. 


Забегая вперед, скаку, что, 
когда появилась идея дополнить 
программу некоторыми новыни ФуНК- 
циями, встал вопрос, как уместить 
все эти дополнения в рамках отве- 
денной памяти. Чудес ведь не бы- 
вает. для набивки новых строк не- 
обкодино отодвигать РАНТОР в сто- 
року более старших адресов. Поэ- 
тону помимо обычных средств по 
экономии памяти {0 которых будет 


‚такая жертва, 


рассказано ниле). 
жертвовать частью 
хранения мелодий. 
В первоначальном варианте 
“УНАН” нохет хранить в памяти 6 
мелодий. Новый, усоверменствован- 
вый вариант - на одну меньше. Но 
но-моему, 


пришлось п0- 
буфера для 


оправдана теми 
вознохностями. © которых будет 
рассказано нихе. Ноэтому в новом 
загрузчике в строке 20 устанавли- 
вается значение КАНМТОР, равное 
31999 а не 29999, как в исходном 
варианте. 

Изначальный текст Бейсик-Файла 
"К. ВОХ" примерно на 80% был пере- 
работан. Во избежание неоднознач- 
ности, ниже приведен полностью 
его новый вариант: "т. Ьох”. Если 
Вы захотите воспроизвести про- 
грамму у себя, внося изменения в 
старый Файл “И. ВОХ", проверьте, 
пожалуйста, аккуратно все строки. 
Обратите внимание на. ик номера. 
Во нногих случаях это сушествен- 
во. Поэтому на начальнон этапе 
без необходимости старайтесь ни- 
чего не изменять. Когда новая 
програмиа у Вас заработает, тогда 
можете вносить любые дальнейшие 
изменения. 

Изменениям подверглись и кодо- 
вые блоки программы для поддерхки 
ее новых возможностей. Подробно 
все изменения в кодовых блоках 
приведены в конце статьи. Усло- 
викся, что новые Файлы, входящие 
В “"УНАМ" будут называться: 

“УНАН+”"  ВАЗТС 
"упав $" СОБЕ 
"Ував 1” СОРЕ 
*увам г” СОрЕ 
"упаю 3" сорЕ 
"В. БО". ВАС 

Это нужно для того, = чтобы 
различать новые и старые версии 
Файлов. 

Теперь некоторые вопросы, свя- 
занные с адаптацией под БЕТА- 
диск, 


Универсальный загрузчик. 

Адзитация загрузчика под БЕТА- 
диск тривиальна. Заненяем все 
1ТОАО"" на КАНООНТСЕ 958 15619: 
ВЕН ТОАД “имя“. 

Но сейчас я хочу предложить 
приен, позволяющий реализовать 
универсальный загрузчик, одинако- 
во работающий и с магнитофоном и 
с БЕТА-Диском. Такой прием можно 
использовать, в принципе, для лю- 
бой програнны, но для многих - 
это ненухная избыточность. Однако 
пля таких програнн, как “ЧНАИ®, 
которые после адаптации под диск 
остаются двухрежинными (загрузка 
и запись сохраняются для ленты и 
диска) эффектнее выглядит предла- 
гаеный вариант. Он придает боль- 
шУю гибкость програнме. 

универсальность основана на 
том Факте, что при использовании 
БЕТА-ДИиСКка системная перененвая 
РВОС (начало расположения Бейсик- 
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4040 РЕТНТ 30; "ТОНЕ КОНВЕК? 1” 
4050 ГЕТ Н$-1НКЕТЗ: ТЕ Н$< "1" ОВ 
8$>"5" ТНЕН С0 ТО УМ "4050" 
4060 БЕТ ТН-УАТ, #з: РОКЕ УАТ, "23 

681", ТЫ+Г: БЕТОКН 

5060 :С15 : РЕТИТ АТ УАЬ “10”, УАЬ 
"5"; "Топе Тгапзроплегапя” 

5010 СО 58 УА, "400": РВТЕТ #0; 

*Ргезз: 0 -+0г ЧР; Ф -гог м 

н” о 

5020 РАОЗЕ 0: 1 1НКЕУ$ <>" И" АБО 
ТИХЕУ$<>"О" ТНЕН 60 ТО УД "50 

20" 

5050 ГЕТ В= (1ЫКЕУ$ "Ц" ) - (ТЫКЕ\ $ = 

а 

5040 ТЫРУТ ;: РЕШТ 40:1 -1 

Саре: 2 -2 Съапае! 3 

- 1 апа 2 Съапре!" 

5050 РАЧЗЕ О: 1Р 19КЕТ$ <" 1” ОТ 

НЕЕУ$>"3" ТНЕН 60 ТО УМ, "5650" 

5060 ТЕТ С-=УАЕ ТЕКЕУ$ 

5070 ТИРИР "Топе съапае (12:Осла 

й уе): “:5 

5100 ТЕТ У-0; 60 50В УМ. “700 

5110 1Е С<>УМ. "2" ТНЕН ТЕТ А-=У 

А. “60001”: СО 505 УАБ "5200" 

5120 ТЕ С<>Г ТНЕН ТЕТ А-УА. "61 

001": 60.598 УАЬ “5200” 

5130 12 \=0 ТНЕН ЦЕТ У-Г: 60 ТО 
МАЕ "5110" 

5140 ТЫРОТ ;: РЕШЕТ АТ, УАГ ”10*, 

УАЕ *5*; "тгапзроплегипе - 0.К."; 
ВЕЕР УМА”. 1", УАЬ “20”: РАЗЗЕ О 
Г кон 

5200 1Е РЕЕК А-УАЬ "64" ОБ АЗУАЬ 
"61000" ОВ А-УАЬ "62000" ТНЕЧ 

КЕТОЮН 

5210 ТР РЕЕХ А>УА *40” АНУ РЕЕХ 

ТА«УАЬ "244" ТНЕН ЕТ А-А+т: 60 
ТО УАЁ "5200" 

52г0 РЕТ Т=5=К+РЕЕЕ А 

$230 ТР Т>УА “255” ТНЕН ГЕТ Т- 

Т-УА “256” 

й 5240 Е? Т<0 ТНЕН БЕТ Т-Т+ЧАЬ "2 

56° 

5250 1Е У-О ТНЕН ТЕ ТУУАЬ “&0“ 

АБО Т<УАГ *284” ТНЕН 60 ТО УАЬ 

"5300" 

й 5260 1 У:1 ТНЕМ РОКЕ А.Т 

5210 БЕТ А-А+Т: 60 ТО ум, "5200" 

5300 ТНРИТ`;: РЕГНТ АТ УЕ "15", 

0; " Торе "; (*1* АНО АЗУДЬ "6100 

0"); ("2” АНР А>УА. ”61000");* СВ 

аппе1 13 мегу ”; ("В1яБ. " АНО К:Т 

}: "104. " АК В:-0 

53510 РЕТНТ *"Тгапзрорлегийя 1$ п 

| 0& ауа11аь1е. “: БЕЕР 1,0: РАЗЗЕ 

0: ко 

6000 РТН ЕЗ(УАЕ "10"): ТЕРИТ “РГ 

езз ЕНТЕК ог САТАГОСИЕ ртЗК” АН 

р 1$-"0"*'"РИЕНАМЕ: “2$ 

6010 1Р Е3-=" * АМО Т%-”" 

Г“ ТНЕН 60 10 УМ. °6100° 

6020 КЕТОВЕ 

6100 КАНГОНТЕЕ 058 УД, "15619": 

ВЕМ : САТ 

6110 СО ТО УАЬ "6000" 

71000 СЕТ СНЕ!-УАГ. *57266": ТЕ МН 

| ТЕР-УА!, “3000” ТВЕН БЕТ СНЯЕУА 
Ь "57264" 

| 7040 ЪЕТ СННа=СНН1+ЬЕН!+Т 

1020 БЕТ Н.-УДЬ. "60001": ТЕТ ПЕ: 

| СНЫЕ: БЕТ ВС-ЬЕН!: 60 508 УА:, 7 

| 500”: РЕТ НЕ-УАЕ "61001"; БЕТ РЕ 
=СНЕ2: БЕТ ВС=ЬЕЩе: И 

| 1500" 

| 7030 ВЕТ ТЬЕВС=СННа+ЕНе- УАЬ *5т 

090" “ 


71031 ВЕР СИН СН -УАГ. "51000" +А 
ЕН 

7оза мт снна-сикг-Умь "5700" А 
ЕН 

7040 РЕТНТ АТ УАЬ °10", ЧА, *6"; = 
СОБЕ ВЕНСТИ : ";ТЬЕНС 

71050 РОЕЕ УАГ, *57030“, ТНГ (СИН1/ 
УЛЕ, “256“): РОКЕ УМ, *57029”, СНН 
4-УА *256*РЕЕК АГ. "57030" 
71055 РОЖЕ УМ, "51002". ТЕТ ( (СНЫ 
-ГОУМАЕ 256"): РОКЕ УВ, “57001 


„СИЫ1-Т-МАЬ "256" ®РЕБК УАГ *5100 


г” 
7060 РОХЕ УАЬ “51034”, тит (снва/ 
УАГ. “256*): РОЖЕ УАЬ "51033", СЫН 
2-УМ. *256" «РЕЖЕ УАЬ "51034" 
7065 РОКЕ УМ. "57006*, ТНТ ((СННа 
-ПИМАЬ *256”): РОКЕ УЛ "57007° 
‚ СИН2-т-УАЬ “256” =РЕБК УАБ` "5700 
8" 

7080 КЕТОРН 

1500 БЕТ 2-МАЬ “256”: ТЕТ Н- ИТ 
(Н1./2); БЕТ Ь=НЬ-Н*7; ЦЕТ 2= ИТ 
(0Е/2): БЕТ Е-БЕ-Б»=7: ЕТ В=ТЫТ 
{ВС/7): ЕТ С=ВС-Вяй: ВЕБТОВЕ УА 
Ь *7100”: РОБ 2-УАЬ "16416" ТО У 
АТ, "16428": КЕАО 5: РОКЕ 7,5: ` НЕ 
ХТ 2: ВАНООМТЕЕ 058 УАЕ *16416"; 
ВЕТИЕН 

7100 ВАТА УМ, "33", 1, Н. АБ *17", 
Е, р, Т,С, В, УА. "237", УАЕ, °116”, МА 
Ь "201", РТ 

1701 РЕТЕТ 30; "ВЕТОВН ОРТТОМ 1.2 
ок 3* 

7102 РЕЗВТ АТ УВ, "12*, 0; 1, КЕУР 
КЕЗ5“ **г, АМАУЗ" * "3, ТОНЕ ЕКО" 
7103 1Е ТЕКЕТ®:"1” ТИЕН ВЕТВИ 
1704 1Р ТЕЕЕТ$-"2” ТНЕМ РРТИТ А 
Т УА. "4", УА, "20"; “АМАТЗ : Р 
ОКЕ УАБ “51020“, УАЬ "62": КЕТОЕН 


1106 ТЕ 1ЕЕЕУ$="3" ТНЕН РОЖЕ УА 
1, "57063, УЛ “225*: РОКЕ УАГ, *5 
7055". УАБ *225“: РОКЕ УАТ. "57065 
*,УАЕ "251*: РОЖЕ УАГ, "51066*, УА 
1, "201°: РЫТНТ АТ УАЬ "4", ЧА м2 
0“; "ТОНЕ ЕБО”: ВЕТ А$=* ВИА =: Р 
ВТНТ АТ УВЕ. “Т",УАЬ 720"; АЗЕАТ У 
А, "9", УМ. "20"; А: ВЕТОЕН 
7107 60 ТО УМ, "7702" 
8000 РАРЕБ КТ: ТАК 1: ВОРОЕР УМ. 
_75"; 015 : РРИИ? лик мт Ио 
`1НК 1: РАНРОКТ 
2Е 058 Ул, - 5560 
8110 РОКЕ УАЬ *23681”,1: ТЕТ БЕЯ 
1=058 МАТ "58032"-МАЬ, "60000". 
8115 РЕТЫТ АТ УЛ. "6", УАЬ "20°; 1, 
И! 
8116 ПР ГЕНА-УАЬ "999" ТНЕЯ РЕТ 
НТ АТ Ул “6*, МАЕ “20"; “ВОТ РВЕЗ 
ЕНТ" 
8120 РОЖЕ УДЬ "23681", УАТ, "2"; 1 
ЕТ ТЕНаОЗВ УАЬ "54032*-УАГ, "610 
05" 
8125 РЕТНТ АТ УВ, “8”, УАЕ "20"; 1, 
На 
8126 17 РЕН2-УАЕ "999" ТНЕН РВТ 
НТ АТ. УАЕ "8", УАЕ "20; "НОТ РВБ 
ЕКТ" Е 
8130 БЕТ УНТИО=0ЗВ УАЬ "58056* 
8133 ТЕР МЕТА: УАЕ *3000“ ТНЕН Р 
ЛИТ АТ УАЕ, “5”, УЛ, 20“; °"РВЕЗЕ 
ти 
8140 ТР ГЕН1-УАЬ *999* Ор БЕНО:У 
АЕ "999" ТНЕН 60 ТО УАЬ *8800" 
8141 ВЕТ ЗНЕЦЕНИ-Г: ТЕ БЕНасЬЕЯ: 
ТВЕН. БЕТ ВИ-ГЕН-Т 


ран 


2610 СО $58 УАГ, “500”: 


8142 1Р НЕВ!-ПУ5НКТЫТ (СЕНЕ 
Т)/5Н) ОБ (ЕНё-П/ЗИ<>ТЫТ (ЕН 
2-1)/5и) ТНЕН 60 ТО Уд "8600" 
8150 ТНРОТ “АЗБЕМВЕХ ре: “; 
АЗЕМ у 

$160 ТР АЗЕМ<УАЬ "16384" т 6 
О ТО УАБ “8150” 
8151 ТЕТ ТЬЕНС-ЬЕЯ+ГЕНА+УАЬ *26 
1" + (УАБЬ "198 * и {МАТЕО-УАЕ °3000“) 
}: 1№ АЗЕЯ+ТЬЕНСЬЧАЬ “65536” ТИЕ 
г :-по гос 20 
Филе. “: ВЕЕР 1,0; [ЕТ АЗЕКЕУАЕ. 
*65536"-ТЬЕНС; РЕТЕТ АТ. УАЬ "21" 
.0;” МАХ. АРОРЕЗ5: "; АЗБН: РА 
ОЗЕ 0; 60 ТО УЛ, “8150” 
8102 РЫТЫТ АТ УАЬ "3*, МА, "20°; А 
5ЕН 

8164 РОКЕ УАЬ “55703”, ХЫТ (АЗЕВ/ 
УАЕ. *256”): РОКЕ УВ, *55Т02", АЗЕ 
Н-УЛЬ *256*«РЕЕК УМ, "557103*: РА 
ИРОНТЕЕ 956 УАТ *55700" 
8165 1ЕР ГЕНА-ЬЕНа ТНЕЯ 60 50В У 
АБ *Т100*: 1НРОГ **: РВТЕТ АТ \ 
1, "12", 0***: 60 ТО УАЬ "ВТО" } 
8166 РЕТЕТ #0; "СНАНСЕ БЕТОВН ОРТ 
ТОН ТО АБМАУ5 ?”: 60 508 ЧА. "50 
0": 1РР ТНЕМ РОЕЕ УАЬ "51020", 
УАЗ, "62": РЕТИТ АТ УАЬ "4", Ум, " 
20”; "АТМАУ = 

8110 СО 5ИВ УАЬ "700": СО ЗВ УА 
Ъ,*7000“: ТЕРОТ : 

8115 ТШК 0: РЕТНТ АТ УВ "12", 0; 
“ВООТТНЕ СОИРИЬАТТОЯ СОНРЕЕТЕВ О 
к., 

вт РЕТИТ *"АРУИЗТНЕНТ РОКББ : 


8118 РЬТИТ "ВЕРЬАУ 5РЕЕР : АЗЕН р 
+УАЕ "35"; *, (230 ТО 255) "* "ВОВОЕ 
В СОГОЦЮ: "; АЗЕН+УАЬ "26*;", (0 ТО 
ум 

8379 РЕТЕТ “ТО ВОН 
95Е "; АБЕН 

8180 РОКЕ УАС “51035",РЕЕЕ МАК " 
52860" -МАГ “4”: РОКЕ УАГ, "51026" 
‚РЕЕК УАЕ *52851” 

8205 РОКЕ УЛЬ "56814", ТНТ (АЗЕЙЛ 
УАЕ, “256”): РОКЕ ЧА "56813", АЗЕ, 
Н-УА. “250° «РЕБЕ УА. "56814" 
8207 РОКЕ УА. "56812", ТНТ (ТЬЕЯС 
ИУАЬ "256"): РОБЕ УМ, "568117, ТЫ 
ЕНС-УА: “256” =РЕЕК АГ "56612" 
8208 РОЕЕ УЛ, "56718", РЕБЕ УК № 
56811": РОКЕ УАЬ "56119”, РЕБК УА 
т, "56812" 
8210 60 508 УЛ. “6000”; РЕШЧТ АТ 
УАГ "21”.0,,: РЕТЯТ АТ УАЬ 2”, 
УАТ, "8"; ТАК 1; "ТОНЕ НАНЕ ; "; Е 
8220 РОВ А=Т ТО УАЬ` "10": РОКЕ У 
А. "56800" +А, СОБЕ (Р${А)): НЕХТ 
А 

8230 60 538 УАЬ “8060* 

$240 ТР Т3-“Т" ТНЕК РЕТЫТ #0; "51 
загф фаре, \еп ргезз апу Кеу. *: || 
РАОЗЕ 0: ВОВРЕК ЯТ: 1ИРОТ ;: ВА 
НООНТ25 05 АГ, "56700": 0 ТО У 
АГ "6300" 
8250 ТЕТ РЕВ:Ц5Ю МА. "15619": ВБ 
Я : БАУЕ Е%СОШБЕ 57000, ТЬЕЗС 
8260 1Р Е®Ю<>0 ТНЕН 60 ТО УЛ "| 
300% 

8210 КАНООНТЕЕ Ч5В Уд “56728” 
8300 БЕТ 5ТЕ-УЛС "57000": ТЕТ БЕ 
Е-ТТЕНС: 60 ТО уд, “а50” 

8500 РЕТЯТ АТ МАЕ 12“, УАЕ "6"; 
УАЕНТНС” *"Епа шагкег ш1звалсь. ^› 
^"шау сашзе а1з4огиеа 4ите. "^^ "С 
опалиме ? (у/а)“ 


- ВАЕРОНТЕЕ 


ТЕР ТНЕН 
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60 ТО УА. “8145” 
8620 ВОН 
$810 РЕТЯТ АТ УАГ. "12" 
ошР1таф1от арапзопеч. " 
8811 РЕТЫТ *"Мо еп шагкегз а4е#1 
пеа. " 
8815 РЕТЫТ "Озе 4те м Кеу 40 ра 
се 43е е09 мшагкег ог две сигге 
2% свапле1. ” 
8820 РАОЗЕ 0: ВО 
9060. (1,5 : РЕЛЫТ АТ УАЬ "10", УАЬ 
"5"; "Кош1ае весошр11118": с0 5 
В Уд "800" 
9010 ТЕ Т$-"О" ТНЕЯ 60 $0В УАЕ 
6000”: ТЕТ ЕВВ-У5Е УАГ "15619"; 
ВЕМ : ТОАБ РЗСОРЕ 57000 
$00 ТГ Т%-"0” ТНЕН ТЕТ 5ТЕ=РЕЕ 
К АЕ "2зтве"+УМ, "256”"РЕЕК УМ, 
"23183": ТР ЕВЕ<>0 ТНЕН 60 ТО 
У&!. "300 
9030 1Е Т%-“Т" ТНЕН ТОАР “"СОБЕ 
УАТ. "571000": БЕТ 5ТЕ:РЕЕК (РЕЕК 
236549 +256*РЕЕК 23650+30)+256®РЕ 
ЕК (РЕКЕ 23649+256«РЕЕК 23650+31 
у 
90:0 РЕЗКТ АТ 0,0; 
; ТК ум, "т"; * 
60 ЭВ УА!, “700% 
$050 ВЕБЗТОВЕ УАЬ "9000": 
АБ "16384" ТО УМ, "16397": 
В: РОКЕ А, В: НЕХТ А: КАНРОНТ2Е 0 
5Е ТА, "16384" 
9060 РАТА УА "33", УАЬ. "96", УАГ, 
234“, УАЬ "54", УАЕ "41", УДГ "17" 
‚ МАТ *9Т*, УАЬ "234", 5СН РЕ, УАЬ " 
207”, УАЬ “Т", УМ "237", УАЕ “116” 
‚УАЬ "201" 
9070 ТЕ РЕЕК УАБ "57Т035">УА, "25 
0" ТНЕН РОКЕ УАБ "60000", УАЬ "2 
55" 


| 
} 
9080 ТЕ РЕЕК УЖ. "51035" <=250 ТН 


0; "таре с 


РАРЕЕ УАГ “1” 


РОК А-У 
ВЕАР 


ЕМ. РОКЕ УАБ "60000", РЕЕК УАЬ "5 
7035”+УАТ. “4” к 


9090 РОХЕ УЛ. "52860", РЕЕК УАЬ ". 


60090” 

9100 ГЕТ А! -УАЕ, "57000" -5Т®+ (РЕЕ 
К УД, "57001"+УА. “256"*РЕЕК УАГ 
"571002" } +1: ВЕТ Аг-УА "60001" 
9110 СО 508 УА. *9200": 
2 
9120 ТЕТ А1=А1+УАЕ "2": 1ЕТ Аг=У 

АЕ "61001" 

9130 60 508 УА. “9200”: ТЕТ ИМё=А 
2 

9170 С1.5 : РЕТЕТ АТ УМ, "40", УЛ, 
‚ “тт; "Весошр11 266 - 0.К. ": 
МАЬ "1", УД "20" 

9150 С0 59В УАЬ "400": РЕТНТ 30; 
“Белеке тагкегз *"Тиле епа””? (У 
/Н)": 60 50В УАЬ "500" 

9160 ТР Е ТНЕН РОКЕ 1, УАЬ "41" 
: РОКЕ Ме, УАЬ "41" 

9110 во 

9200 РОКЕ Аг, РЕЕК А1 

9210 ТЕ РЕБХ А1<>УА, “64” ТНЕН 
БЕТ А1-А1+Т: 
МАТ, "3200" 
9220 ВЕТОВН 


ЪЕТ М!-А 


ВЕЕР 


БЕТ Аа-Аа+Т: 60 ТО 


Посяе загрузки основного Бей- 
сик-файла "п ох", ° происходит 
старт программы с начальной стро- 
ки. Несколько начальных строк вы- 
полняют вспомогательные Функции, 
РОМ 5 - санозапись Фаила на ленту 
или диск (в зависимости от его 
наличия - проверка в строке 90 по 
РЕОб уыполняется аналогично тому. 
как это’ сделано в увиверсальном 
загрузчике). 
вольного набора - 


Переключение сим- 


60 508 8. 06- 


1 


ратное 
60 508 9. 

Фактическое начало програмны - 
строка 10. Титульная заставка 
прорисовывается при помоти под- 
программы в машинных кодах. рас- 
положенной по адресу 50000. Нос- 
ледняя устроена так, что при 
первом старте после загрузки 
сначала воспроизводится  демон- 
страционная нелодия, прекрашающа- 
яся после нажатия на любую клави- 
шу. Эта нелодия представляет ‹0- 
бой скомпилированный Фрагмент, 
расположенный и стартуемный < ад- 
реса 42500. При послелующих за- 
пусках програныы исмандей РОН, 
мелодия при прорисовке заставки 
не воспроизволится. 

Когда подпрограмма’ в 
КАНООН17Е У5Е 50000 возврамается 
в Бейсик, в ячейке 23559 сохраня- 
ется код нажатой клавиши. Строка 
20 возврашает номер нахатой циф- 
РОВОЙ Клавиши в переменную КР и 
дальнейшее распределение происко- 
дит в зависиности от ее значения. 
Так, строка 40 переводит на пол- 
программу записи-считывания, 
строка 45 - на компиляцию. В том 
случае, если были нажаты клавиши 
"5" - "6", возврата в Бейсик во- 
обще не происходит, А вот если 
нахата клавиша "7", то вместо 
“НЕРР РАСЕ" вызывается дополни- 
тельное системное меню: 
“5У5Т. НЕНО" - {соответствующее 
изменение текста титульного меню 
произведено в кодовом блоке). В 
"5У5Т. НЕМУ" заложены все дополни- 
тельные возможности. но об этом 
чуть позе. 

А сейчас «более подРОбНО 06 
гапаптании Файла “п. Ъох" под БЕТА- 
диск. Изменения будут касаться 
процедур загрузки и выгрузки. Это 
пункты “1" и "2" в титульном меню 
Программы. Эти процедуры имеют 
много общих строк, так что текно- 
логия адаптации упрошается. В 
исходном варианте “МНАМ” после 
нажатия клавишей, “1” или  “2“ 
строка 40 переводит на блок строк 


переключение его вх 


с 3000, ВыЫПОлНяЮТИЙ задание 
устройства ввода-вывода. ВНИЗУ 
экрана появляется новое меню, 


предлагающее выбрать устройство: 


ТАРЕ, МЕНОКУ. ББТУЕ (ЗРАСЕ: ЕХТТ) 

Так как микродрайвы в нашей 
стране не слишком распространены, 
Удобно было ПЕТУЕ заменить на 
115Е с изменением всех Бейсик- 
Строк, относяшихся к микродрайву. 
Заменена прежде всего строка, 
выволяшую это меню - 3030. 

Строка 3040 завершает выбор 
устройства и переводит на СТРОКУ 
100. Здесь выполняются дальнейшие 


действия, связанные с загрузкой- 
сохранением. 
Строка 100 - выполнение под- 


программы записи-считывания зело- 

дии при работе с буфером памяти: 

60 ЭВ 4000. 
Полпрограина со 


508 6000 


(строка 105) - это ввод имени что мохно скомпилировать мМУЗы- 

файла. Удобно будет при выборе кальный Фрагмент В произвольно 

диска предложить пользователю заданный адрес. Причем,  паблюда-| 
ии оавж эеенкЕ рее : 


кодах . 


вывести его каталог, Поэтому под- 
программа устроена так, что в!| 
случае дисковода, если не вводя 
икени нажать ЕНТЕК, будет выдан 
катапог диска. Такое решение уло- 
бнее, чем дополнительное, неню, 
запрашивающее вывод каталога, так 
как освобождает оператора от лиш- 
них действий. Это, казалось бы, | 
несушественная мелочь, но как раз 
из таких мелочей складывается 
впечатление о ‘той или иной про- 
гранме. Приятно иметь дело с про- 
гранной, где все продумано до ме- 
лочей. Я не пытаюсь представить! 
эту ПРОоГРамму как эталон, усовер- 
менствованию нет предела, но Вы 
можете в Ссвомх разработках ис- 
пользовать те моменты и приемы, 
которые уже корошо зарекомендо-| 
вали себя. 

В строке 105 кроме ввола име- 
ни, задается нулевое начальное 
значение параметра ЕВЕ - кода 
ошибки ТЕ-00$. далее, в строке 
110 происходит разделение на про- 
цедуры записи и загрузки. Если] 


запись, то переход на строку 200. 
Если загрузка, то - на стро- 
ку 115. 


как Вы знаете, в’случае отибки| 


загрузки с магнитофона, программа 
остановится с сообщением "Таре 
тоаа1па еггог”. В случае ошибки 


при загрузке с диска, мы ничего 
не заметим, поэтому необходимо! 
предусмотреть специальные меры по 
перехвату ошибок ТЕ-00$. Для это- 
го код ошибки возврашается в пе- 
ременную ЕВЕ для контроля выпол- 
нения команды. | 

Строка 300 доляна сигнализиро- 
вать о  невыполненной команде 
ТЕ-005. Здесь применяется упро- 
шенный прием, когла не растифро-| 
вывается подробно причина неуда- 
чи, а просто выводится код ошиб- 
ки. Как правило, бывает достаточ-| 
нс даже просто одного сигнала 06 
отибке, чтобы вспомнить, что, на-| 
пример, файл с таким ‘именем уже 
есть на дискете. Но лучше, все 
же, вывести код ошибки ЕВР. Это 
не отнимет много памяти, как под- 
робные комментарии на все случаи! 
жизни. для дальнейшей опенки кода! 
ошибки можно воспользоваться ру-| 
ководствон к ТВ-005, но на прак- 
тике, как правило, в этом не бы- 
вает необходимости. 

После завершения записи. прог- 
рамна предлагает выполнить вери-| 
Фиканию. Если в ответ на запрос 
ввести любую клавишу, кроме "У", | 
то от нее можно отказаться. Вери- 
Фикапия реализуется в строках 
с 250, 

СТРОКИ загрузки с ‘магнитной 
ленты и записи на ленту остались! 
без изменеиня. 

изменения, представленные вы- 
ше, прёдназначены для загрузки и 
ВЫГРУЗКИ На диск исходных текстов 
мелодий. Рассмотрим теперь проб- 
лены, возникающие при компиляции 
мелодии и записи готового  биока 
колов. Но сначала немного © кон- 
пиляции, Програнма устроена так, 


258 


тельный пользокатель наверняка 
заметил, что выгрузка кодового 
блока на магнитную денту проходит 
необычно на слух: нет привычной 
паузы. незду заголовком и самим 
бзокои концов, Это наводит на 
мысль, ЧТо пЫГРУЗКа ныполияется 
нестандартной процедурой. для че- 
го это понадобилось? Выгрузка 
скомпнлированного блока кодов 
зронскодит все вреня из одного и 
того же места памяти: из адреса 
51009.. Хитрость закаючается в 
ток, что заголовок Файла подменя- 
ется другии, в который заносится 
адрес, заданный Вами при компиля- 
ции, а сам изссив кодов звыгруха- 
ется всегла мл 57000 с уже изме- 
неённой апресацией пон заданный 
Вами адрес. Запись скомпилирован- 
мого. музыкального Фрагнента вы- 
полняется в строке 8210 при номо- 
ши процедуры в кодах 56700. Вот 
эта програнна. } 
56700; 10 1%, 56800 
* тр РЕ, 00017 
508 А 
| 5СР 
сам, 12г2 
НОР 
” 1 ТУ, 57000. 
й 10 ОЕ, Алина 
12 42.255 
к 5СЕ 
Ч сл, 12гг 
й Е 
56тет: вЕТ 
Как видим, запись производится 
в два этапа. Сначала записывается 
блок кодов, имитирующий заголовок 
кодового Файла, Этот баок распо- 
ложен с адреса 56800 и ‘имеет 
станкартиую для заголовка длину 
17 байтов. При комниляции тула 
заносятся заданный стартовый ‘ад- 
рес и получиншаяся длина колового 
блока. Затем выполняется вторая 
Часть програнмя - запись саного 
блока кодов, как уже говорилось, 
из адреса 57090 (длина тоже зано- 
сится при компиляции). 
Самый простой приен при адап- 
‘тации под диск может быть следую- 
ший. Зашись выполнить при’ пономи 
Бейсика, обычной командой Т®Е-105, 
из адреса 57000. Это выполняют 
СТРОКИ 8230... 8260. 

Естественно, в этом случае в 
заголовках баоков, скомпилирован- 
ных в разные адреса, будет всегда 
Стартовый адрес 51000. Загружать 
записанный таким образом скомпи- 
лированный блок надо, обязательно 
указывая адрес загрузки, тот, ко- 

задали при компиляции. 
есаи Вы завтра забудете 
для которого сегодня скон- 
пилировали мелодию, то, скорее 
всего, Вы ухе никогда не сумеете 
воспользоваться этим блоком ко- 
дов. } 
Поэтому, лая устранения этого 
недостатка; процедура записи  до- 
пояняется небольшой программой в 
машинных колах, которая, будучи 
выполненной сразу же после залиси 
"подменяет" эаголовок на 
зовый, с заванным Вами 
стартовым адресом. 
Расположена эта программа сле- 
дом за процедурой записи, ‘с адре- 


ЖОО9А С0{330 САМ, #3013 
#о09р 19 12 А,С 
#0095 `2АЕРОО 6 НЫ, СОБЕР) 
ФР0А1 228656 1 {#5СЕб), НЫ 
#ОРАЗ 009 10 с,509 
ЖОРА С01330 СА, #3013 
ЗррА9 с БЕТ р 
Дия того, чтобы подробнее ра- 
зобраться, как она действует, от- 
крРоЙТе 7Х-РЕВЮ Н 1-2 за этот год 
ва стр. 25. и вспомните, как вы- 


волняются  програнны Тв-205 из 
машинного кода: в регистр С зано- 
сится. код команды и вызывается 
подпрограмма 15635 (30131Н}. 

Програмна работает так, Внача- 
ле в регистр С заносится кой 10, 
что соответствует процедуре поис- 
ка Фанла в-каталоге диска.  Пара- 
нетры для поиска - спецификация 
файла, то есть его иня и тип. Эти 
данные уле заданы - они остались 
в системных ичейкая после записи 
Файла. ‚ После завершекия пойска, 
результат будет в регистре С. 
Следуюлей будет выполнена проце- 
дура зайнси 16 байтов заголовка с 
измененным параметром ^5ТАЮТ на 
несто старого. В регистре А зада- 
ется номер заголовка (из регистра 
С), согласно требованиям к после- 
дуюаей команде при С:9 - записи 
заголовка Файла. Теперь надо то 
значение адреса, которое было за- 
дано при конниляции, занести (в 
двухбайтном виде) в область спе- 
цификации Файла в таблице систем- 
ных переменных Т®-005, а имеяно, 
в ячейки 23782, 23183 (5СЕбН. 
5СЕТН}. Для этого вспомним, что 
стартовый адрес уже занесен при 
компиляции в 17-байтный заголовое 
магнитоФовнного Файла. Два его 
байта находятся по.адресу 56813 
«ООЕБН). Поэтому берем его оттуда 
и При поноши регистра НЕ. перепи- 
сываен в систенные переменные 
ТЕ-105. далее осталось только вы- 
полнит подирогранмну 15635 
(ЗО1ЗН) с параметром С:9; Теперь 
заголовок переписан с тем ^значе- 
ниен адреса, которое было задано 
при компиляции и проблем с адре- 
сом запуска больше не будет. Пра- 
ктически, ‘при записи такой проце- 
ДУРОЙ, пПродесс записи внешне ни- 
как не отличается от традиционно- 
го. | , 
Расснотренная процедура выпол- 
няется в строке 8210. Строка 8300 
задает паранетры: стартовый адрес 
и длину для верификации. 
няя осуществляется блокон строк, 
начиная с 250. р 

Надо сказать, что показанный 
прием может применяться и в дрУ- 
гих Ваших програмная. Блок кодов, 
переписывающий заголовок,  мохет 
использоваться, например, при 
хелании наоборот, засекретить ис- 
тиное значение стартового адреса 
или с иныни целями Сана записы- 
вающая процедура кожет работать в 
любом месте памяти. 


Как “бороться” с ССРУТ. 


менее нии ян чьины 


От некоторых пользователей, в 


253 


„Послед-, 


ая ы 
основном, начинающих, можно услы- 
шать претензимн по поводу того, 
что после нажатия "1" в титульном 
неню, нормально выводится на эк- 
ран страничка-подсказка {"НЕШР- 
РАСЕ”), но после этого *програнна 
зависает”. `НЕР-РАСЕ выводится 
ПРИ помоши блока п кедах, _ 
в. нем причива. “зависания”? | 
устранить ее будет сножыо! Но па 
саком деле все очень просто. р 
“зависание” происходит на. ког 
нанде СОРУ (расположенной в ста- 
ром варианте “МНАН” в строке 50 
Бейсик-програкны) на тех. коипью- 
терах, где инеется интерфейс двя 
принтера ЦРЕ1НТ-3 с собственные 
теневым ПЗУ. Оно’ активизируется, 
когда компьютер пытается выпол- 
нить команду СОРУ. Но он нё но- 
хет ев выполнить, так как итед- 
варительно должен быть Залаи рв- 
хим для получения графической 
конии экрана конандани: 
БРЕТНТ СНЮ$0; ГРЕТИТ СНИ$1 


ТРРТИТ `СНЯФО;  ГРЕТЫТ СНЫ$6 

Выходов из этого положения 
ква: сложный и простой. Сначала - 
сложный (но он пока не реализован 
в Бейсик-файле "п. ъох"}, Для это- 
го надо организовать команду, 
инициализирующую интерфейс приЯ- 
тёра в^одной из начальных строк, 
чтобы она выполнявась при старте 
программы. Причен команда эта по- 
возможности ‘должна ‘сама опреде- 
лять, инициадизировая интерфейс 
принтера или нет. Вот как это 
кожно выподнить для ГРЕЕНТ-3: 

2 1Е РЕЕК УМ, "23а96"‹> ЧА. * 
95” ТНЕН ЬРВТНТ: СРЕТНТ СНЕЗ НОТ 
РИ СН УМ, “5 

3 60 ТО УАЕ "10" 

Контроль (упромениый} того, 
что интерфейс  инициализирован, 
выполняется по наличию в буфере 
принтера (с адреса 23296) драйве- 
ра печати, перебрасываемого туда 
из теневого. ПЗУ при инициализации 
интерфейса ЕГРЕТНТ-3. 

Но надо сказать, что начальная 
инициализация ‘поможет правильно 
распечатать НЕБР-РАСЕ на принте- 
ре, но не поможет "бороться с 
СОРУ", если у Вас выключен или 
отсоединен принтер. Ну действи- 
тельно, зачем все время выполнять 
графическую копию экрана, может 
Вы хотите просто посмотреть стра- 
ничку-подсказку и ничего больше. 
Ножно, конечно, организовать заА- 
прос, например, “НАЖМИТЕ ГР} для 
НЕЧАТИ НА ПРИНТЕРЕ”. НО гораздо 
изяшнее все это выглядит, когда 
выполняется автонатически. Понни- 
те о мелочах! 

Попробуйте так: 


15 1Р 1НКЕУ$- "1" ТНЕН 915: Р 
ВТЯТ : КАМРОНТАЕ 05 УМ, *55420* 

716 1Е КР-ЕТ ТНЕЯ ВОРБЕЕ НТ: Р 
АРЕЕ НТ: ТНК 0: 615 : РЕШТ : ВА 
ЕРОНТИЕ 058 МАГ "55320" 

ТТ ЩЕ 1 ;23<>255 ТНЕЯ СОРУ 

80 РАОЗЕ 0; ВОН 


кКоманиа ВАНРОИТИЕ 058 55420 в} 
строке 75 (в старом Файле "И. во$* 
это происходит в строке 56} выво- 
дит на экран НЕГР-РАСЕ, после че- 


ЕЕ :. 


го’ ‘происходит’ Контроль, 
ли’‘принтер и готов ли онк  иеча- 


ти. Если готовность принтера 
тогда 14123 даст’ значение 
(выключится Т бит) и будет 
выполнена расцечатка ‘графической 
копии экрана. -Такин образом, если 
Ваш принтер ‘выключен; то’ строка 
71 никак не’ будет влиять на’ рабо- 
ТУ ПРОГРаМНЫ» 
понадобится "твердая копия", `до- 
статочно будет ‘всего лишь вкаю- 
чить принтер. 
"НО даше такой "иудрый” подход 
к команде СОРУ проблему решает 
только отчасти, так как невозмохж- 
но предусмотреть заранее все нно- 
Гообразие интерфейсов принтеров, 
имеющих ходиение ‘в стране, ‘Не у 
всех 42’ БРЫТЫТ-3. Да изиряд ‘ви 
имеет сяысй тратить кного сил и 
компьютерной памяти ‘лия решения 
Пробленн в’ранкак этой програнмы. 
Ну в саком’ деле? это хе’ не тек- 
стовый редактор, где печать явля- 
ется определяющим параметром. По- 
Этену, предложу тепевь второй вы- 
ход - Простой. Но ‘подхонятий на 
ьсе’ случаи жизни: вообще исклю- 
чить команду СОРУ из ‘программы. 
Она {програнна) не сильно постра- 
дает от этого. Кстати; ‘ СОРУ 
встречается в програмне ‘еше в ©д- 
в Старон ° варианте 
это строка 8210. Там по 
замыслу авторов долины выдаваться 
на’ печать’ паранетры ‘скоипилиро- 
ванного музыкального ‘чрагнента. 
СОРУ ‘надо ‘удалить и в этой ‘стро- 
ке, ‘ограничившись ‘выводом’ ‘данных 
только на’ экран. 
м я 

КоиВилЯШиЯ: 


Теперь \ поговорин  подробыве о 
самой конпиляции. В. принцийе, при 
Жонпиляции возножно задание любо- 
ро адреса. Но ‘определенные огра- 
ничения вносит строка’ 8150, В 
старой ‘варидяте’ "МНлИ* она запре-- 
Шает задавать адрес меньше 32168: 
но если Вы ‘захотите  скомиилиро- 
Ватв’ мелодию’ скажен, ‘дая разме“ 
шения ее в нулевой Бейсик-строке 
или в дисплейном файле, то Вы не 
сможете это’сделать. для чего аБ* 
тораки' программы внесено ‘такое 
ограничение, наверное, Ухе никог- 
да не узнать. Но Вы можете устра- 
вить этот дефект простой ‘заменой 
Числа востроке` 81560. 

'КРОМе ‘Того, неверное ограниче- 
ние накладывает строха 8151 ста- 
Рого “М. ВОХ". ЕСЛИ мелодия ° рас- 
положена близко к концу паняти 
(55535). то заданный адрес может 
оказаться недоступен, ’ хотя, при 
полученной реальной длине’ Вы но- 
хете`вассчитать, ‘что  сконпилиро- 
ванный блок. кодов понестился бы 
о’ конща памяти. дли устранения 
этого нало также изменить ’ число- 
вые параметры ‘в строке ‘8151’ (сн. 
листинг *ю. рох"); 

Теперь. будет возножно ' разнес- 
тить‘нелодию в любом несте озу, и 
только адреса ПЗУ для компиляции 
Будут ‘недоступны, ‘ Причем, ‚если 
задать заведомо ‘большой адрес, 
например 65500. то программа пос: 
ле вывода сообщения о ‘нелопусти- 
мой длине, сама рассчитает н пре- 


включен, 


но как’ только Вам ^ 


› кой 7500; В последней - 


дпожит Ван такое предельное  зна- 
ченне адреса, которое ‘ позвонит 
вам располохить сконпипированинй 
блок вилотНую к ‘концу ОЗУ (это 
опять, ‘казалось бы, ‘мелочь, ‘но 
как приятно работать с такой пру» 
желюбной программой! ). 

Еве один) момент, связанный ‘с 
компиляцией. ва который: хочется 
обратить внинание пользоватеяя. В 
строке (71500 старого’ варианта 
УУНАН” есть такой Ффрагнент: 


и... РОВ Е=УАЬ "23296. ТО УАЬ 
"23308": КЕАБ 5: РОКЕ 1,5: НЕХТ 2 
: КАНРОНТТЕ Ч5Е УАЬ "23295"... 


Здесь создается 
ный кодовый вок, 


вспомогатель- 
необходимый для 


компиляции: 

С одвой стороны ны говорили ‘с 
корректной — Работ» интерфейса 
принтера. а с другой - в‘ драйвёр 
печати,  нахолямийся в буфере 
ПРИНТеРа, вносятся ‘изменения, 


разрущающие 'его...`Если Вы решите 
убрать команду СОРУ из  програмны 
и отказаться от вывода на печать, 
то не произойдет ничего плохого. 
Но если Вы все же сохраните‘ пе- 
чать (как это было показано `ныше 
для ‘интерфейса БРЕТИТ-3), то при- 
веденный Фрагнент бущет систена- 
тически нарушать процесс печати, 
вспомним, что печать (СоРУ» ‘ис- 
пользуется‘ ‘ари комнилящии, как 
раз ‘после того, ’ как содержиное 
буфера принтера испорчено приве- 
денным выше фрагментом. 

Хотя в предлагаеном варианте 
“МНАН” команда СОРУ исключена, 
все зе зарезервирована вознох- 
ность для дальнейшего усовермен- 
ствования, пока не реализованного 
- распечатки нотного техста на 
принтере. Поэтому для вспомога- 
тельного кодового Фрагмевта най- 
дено  Иругое место. Так как его 
работа временная, то есть воз- 
можность располохить его в экран- 
ной ‚ памяти, 
файле, на ‘том несте, 
какой информации. 
чтобы не *портить” 
нало предварительно "занаскиро- 
вать" его, напечатав на этом нес- 
те’ пробеан с опинаковын бепын 
цветом 14 и РАРЕК, ° включив эту 
печать, например, в строку 8000. 
Здесь печатается 13 пробелов для 
“маскировки” блока кодов, ‘который 
будет создан на этон месте ‘стро- 
соответ- 
ствующим образом изненены эначе- 
ния адресов. 

теперь вапоногательный › блок 
кодов создается прямо на экране, 
но пля пользователя это происхо- 
дит совершенно незаметно. 


где нет. ни- 
А для того, 
изображение, 


Другим ‘’недостаткои процесса 
конпиляции является такой момент., 
После завершения ее, на экран вы- 
водятся комментарии по ПоволУ 
ячеек, ‘в КОТОРЫХ можно задать 
темп мелодни и цвет бордюра. ‹ При 
запуске сконпилированного блока 
кодов Вы увидите, что итена и 
цвет бордюра не совпадают с тен. 
что были заданы Вами в редакторе 
перед конпиляцщией. Поэтому приде- 
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Прямо, В дисинейном › 


тся ‘еще неоднократно вносить из- 
ненения в кодовый блок, добиваясь 
требуемого темла воспроизведения. 

Этот  нелостаток можно легко 


устранить, если процессе компиля- 
ции дополнить специальной Бейсик- 
СТРОКОЙ. Нараметры, тени и цвет 
бордюра ранятся в памяти: 

тени - в ячейке 52860, 

а цвет бордюра - в 52851 
и достаточно всего пить перенести 
их в скомпилированный блок колов. 
Но при этом нало учесть один мо- 
мент. Неред занесениен параметра, 
спредеяяющего темп, надо внести 
определенные коррективы из-за 
разницы во вренени работы восиро- 
изводяшия пропедур.  Эксперимен- 
тальным путен подобрана величина 
смешения - заносится эчачевие на 
4 меньшее, чем в ячейке 52560) 
(строка 8080). 

Теперь после завершения компи- 
ляции Вам не потребуется вносить 
изменения - блок сразу же готов к 
работе. 


КОЛИРОВКа мелодии. 
Исходный (нескомпилированный) 
текст мелодныи, которая в данный 
монент редактируется, расподага- 
ется с адреса 60000. Это - рабо- 
чая область. 


лодии в памяти этот нассив ^ пере- 
брасывается в буфер, 
в старом "МНАН” 
длиной 12 Кб, а в. новон о -с 
32000. длиной 10 Кб. Рабочая об- 
ласть с '60000 поделена на две 
равные части по 1 Кб. С ‘адреса 
60000 расположены коды первого 
канала. с адреса 61000 - второго 
канала. Изначально область, 
расположен текст мелодии, 
нела кодон 41. Этот код для текс- 
та мелодии означает отсутствией. 
ноты или “пауза” - то есть то же, 
что ‘пробел” для обычного текста. 

В ячейке 60000 находится ` код, 
определяющий скорость воспроизве- 
дёния мелодии. Коды вводимых пот 
будут располагаться начиная с ад- 
реса 60001. Для второго канала. - 
© 61001. 

для обозначения нот использу- 
ртся- колы (во порядке повышения 
тона} с 244 по 255 и далее с 0 по 
40. Самая низкая нота - "до" 1-ой 
октавы инёет код 244. Следующая 
за ней “до-диез" 1-ой октавы - 
код 245 и т.д. Код 255 соответст- 
вует ноте “си” 1-ой октавы. Сле- 
дующая ` нота - "до" 2-ой октавы 
имеет код 0. А саная высокая нота 
- “ви” 5 октавы (каавиша 5УНВ, 5Н. 
в рехиме 4 октавы) имеет код 40. 

Колы < 42 по 239 дая иот пе 
нсибльзтются, они соответствуют 
тен звуковым эФФентам, которые 
кожно реализовать в программе: 
ИНИТИРУЮТ ЗВУКИ барабана, ударни- 
ка, и т.д вставляя шуновые э$- 
Фекты в мелодию, надо учитывать, 
что при этом в память заносятся 
два числа: в области памяти для 1 
и для 2 каналов. Пара этия чисел 
определяет звучание эффекта. Этим 
объясняется их нногообразие. 
кстати, здесь кроется причина то- 
го, что поставив нузыкальний э$- 


Фект: в каком-то месте, пользова- 
'тель с удивлением обнаруживает, 
что упалить его он не может. ›. 
яот удадение выполняется клавишей 
ЕКТЕК (при этом в память завосит- 
ся код 41). Для звуковых эффектов 
это не проходит, так’ как эффект 
юпределяется-не одним чисяом, 
нота, а двумя. Поэтому для того, 
чтобы удалить эффект, нало нажать 
ЕНТЕВ в одном кавале, затем вер- 
нуться на 1, шаг назад «клавя- 
ша”О”), переключить канал клави- 
шей “Т” и еше раз вахать ЕНТЕВ. 
Только. тогда звуковой эффект 6у- 
дет стерт. 

`ПРи завершении мелодии, перек 
тем. как ее скомпилировать, ‘необ- 
ходимо "зациклить” ее, установив 
в обоих каналах наркер “конец ме- 
лодии”. Кстати, он нохет быть 
различным для каждого канала, На- 
пример, 1-ый канал является соли- 
руютим и имеет максимальную дли- 
ну, аг-ой канал. сопровождая ме- 
подию, все время повторяет олну и 
ту жё короткую последовательность 
нот, с периодом в несколько так- 
‘гов. 

“концу мелодии” соответствует 
код 64. Он ставится клавишей "\%", 
Не все знают о том, что маркер 
“конец мелодии” легко можно уда- 
лить. Это выполняется так. Надо 
подойти к концу и остановиться на 
саном. последнен такте мелодии, 
затем нахать БЫТЕЮ. При этом в 
память будет занесена “пауза” на 


то место, где был маркер “коней 
мелодии". Код 64 просто заменится 
кодом 41, Это выполняется в кахж- 


дом канале отдельно. 


Теперь ны подошли к наиболее 
интересной части, © которой гово- 
Рилось выше. ) 


дополнительные Функции "УНАН". 

. Они реализованы через дополни- 
гельное системное меню ы: 
"5У5Т. НЕНО", вход в которое про- 
исходит теперь из титульного неню 
при нажатии клавиши "7" (в старом 
МНАН. > это соответствовало 
|"НЕБР РАСЕ“). При нажатии “7” 
программа попадает.на строку 50. 
Вид систенного меню представлен 
на рис 1. 


ВЕТ -Рг:7ь НЕСР-РЯАБЕ . 
ШЕШ-Зелесь МОЗХС-КЕУ --> 
ШЕШ-Ноць; пе ЯЕСОМРТЬЕЯ, 
ШЗ -ТипЕ ТЯЯМЫРОМЕЯ. 


При нахатии ы Выводится 
страничка-подсказка, аналогично 
тому. как это выполнялось в ста- 
ром “"УНАМ”. При нахатии "г" `про- 
исходит смена нотного ключа на 
нижнем нотном стане, Этот момент 
требует комментария. 


Для. 


как - 


динамический диапазон 
охватывает четыре полных октавы © 
первой по четвертую (и ‘частично: 
захватывает пятую). Эти. октавы 
относятся к скрипичным, басовые 
октавы в “МНАН” не используются, 
Тем не менее,. верхний нотный стан 
- вержние пять линеек -‹ предназ- 
начен дая обозначения нот в скри- 
пичном ключе, а нихний - в ` басо- 
вом. Поэтону Вы можете заметить, 
что, наприиер, нота *соль”. З-ей 
октавы, находящаяся ‘на: предпо- 
слекней линии верхнего. нотного 
стана, не соответствует таким об- 
разон ноте "соль", для 1 октавы, 
находяжейся на последней линейке 
на нильен нотнонм стане. Но учиты- 
вая то, Что’ нижний нотный стан 
представлен в басовом ключе, все 
выгаядит верно. 

Это нохет оказаться. неудобным 
если, например, ‚ надо набрать с 
нот мелодию, написанную так, что 
и верхний и нихний нотные станы 
находятся в скрипичнон о ключе. 
Поэтону добавдена новая Функция - 
переключение нотного ключа. на 
нихнен нотном стане. Теперь при 


переходе к редактированию. мелодии, 


(например, “6” в титульнон непю}, 
на экраи выводится изображение 
нотных ключей. Нихвий нотный стан 


Фориируется теперь тоже.в соот- 
ветствии с нотным каючем: в зави- 
синости от. последнего, 
Это 


с разницей 
в одну линейку. поясняет 


рИиСУвОК 2. 


ЕЕ 


мМОО -ЕОТТ»  ОСТЯУЕЗ  СИЯМНЕС 
ООВ я5 зснмз овава: сима вава 


ОНА 


Переключение выполняется при 
помоши подпрограммы 60 5%В 5600. 
Формирование изображения нотных 
ключей производится подпрогранмой 
в машинных кодах, выполняеной в 
строке 55. 

В соответствии с типом нижнего 
нотного ключа. вход в нодпрограм- 
ну печати ключей должен происко- 
дить с разных точек входа: для 
басового ключа - 56746  (ЮРААН}, 
лая скриничного - 56754 (рВён). 

для изображения ключей прине- 
нен специальный символьный набор, 
а точнее, 23 дополнительных син- 
вола, соответствующие кодам с 33 
по 55 включительно (символы с. "!" 
по "Т"). ИХ образы расположены на 
свободном несте с адреса 56816 по 
56999 включительно.  Изобрахжение 
скрипичного = ключа, например, 
складывается из 6 строк по г зна- 
коместа. "Текст", изобрахающий 
нотные ключи. состоит из трех 
Фрагментов, расположенных по ад- 
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РЫНАМ" ы 


ресам . 65184. ЧРЕАОН), ‚65218 
«РЕС2Н) и 65264 (РЕРОН), то есть 
по адрес 65299 и таким. образом в 
новом варианте ‘включен в. Файл 
*уваю 1"СоБЕ. 

Поппрограмна печати Нотяых |. 
ключей переключает СНАЕ5 на этот 
новый символьный набор, произво- 
дит печать нотных ключей, выволя 
на экран строку текста, ..”вырисо- 
вываюшую"‘ нотный ключ, а затем 
возврамает прежнее значение | 
СНАЮЗ. 

Эта. процедура расположена с 
адреса 55146  (ПРААН}. саедом . зай. 
приведенной выше процедурой запи- 


си на диск загоповка Файла, 


РОлА 41АСРЕ 12 БЕ, #ЕЕАО 
РрАБ 012200 12 в5,#00г2 
ОрБО 1806. 3&. #0288 

БОВг 144С2РЕ 10 о РЕ, ЗРЕСЕ 
ООВ5 01200 50. ВС, #002Е 
2088 2А365С 10. НН, (85036, 
ООВВ. Е5 РУЗН. НЫ ? 
РОБС 21ЕЗРС Ь0. И. #0СЕВ 
ЮОБР 22365С 1. (#5636). нь 
Орса. (С03С20 — САМ. #203С 

0065 МРОРЕ [О ПЕ, ЧРЕРО 
0БС8 012400 10 8вС,#0024 
РЮСВ С103С20 САМ. 4205С 

РОСЕ Е\ РОР. НЬ 

РОСР 22365С 12 (#56036), НЫ ` 
ррра с9 ВЕТ 


Подпрограмма на Бейсике 60 598 
600 в зависимости от типа каюча 
вносит.изменения в Формирователь 
нилнего нотного стана: для .скри- 
пичного каюча нотные линейки дой- 
жниы быть сдвинуты на 1 зинию вниз 
по сравнению с басовым. Кодовый 
блок программы корректируется при 
поноши РОКЕ. 


реконпиляция. 

Это очень ношная новая возмож-| 
ность программы "МНАН". Но снача-|. 
ла векоторые дополнительные 
сведения о компиляции. 

‹ При компиляции мелодии проис- 
ходит следующее. Сначала подго- 
тавливается воспроизолящая проце- 
дура, Надо сказать, что ее. длина 
непостоянна и зависит от искодно- 
го. текста мелодии, наличия в. ней 
шУНовых эффектов. Звучание нот в! 
обоих каналах определяется ‚”нот- 
ной" процедурой, . а шумового э$- 
Фекта - "шумовой" процедурой. Ес- 
ли шумовые эффекты отсутствуют, 
длина — воспроизводящей только 
"нотной" процедуры будет ‘равна 
267 байт. Если в мелодии исполь- 
зуется хоть один шумовой эФФект, | 
то ‹ длина воспроизводятго блока 
увеличивается на 398 байт - сто- 
лько занимает "шумовая” процеду- 
ра. . 
Затем к воспроизводящей проце- 
дуре пристыковывается нотная пос- 
яедовательность - берется Факти-й 
ческая длина исходного текста, ие- 
аодии, отиеченная в рабочей о5- 
пасти маркером “конен мезодии” 
для кахдого гопоса. Форнируется 
скомпилированный блок, как Вы уже 
знаете, с адреса 51000. В полу- 
ченнонм блоке кодов изменяется ад- 


эм "вотвая` последователь- 
‚ Первая ие команда воспро- 
изводящей процедуры ‘имеет вид: 
р НЕ, АРВЕ 
гле АЮРЕ - адрес, с которого ‘на- 
чинается в памяти нотная поснодо- 
вательность. 

исходя из’этих данных, сделана 
|подррограмна; которая выполняет 
операцию, обратную компиляции, то 
есть выделяет из скомнилированяо- 
го блока кодов исходный текст ме- 
один. Это очень часто ‘нужно на 
практике. Например, Вы озвучили 
свою програнму мезодией собствен- 
вого сочинения. А потом  захотеми 
энести какие-то изненевия в эту 
мелодию. Если Вы не сохранили 
исходный тЕкст мелодии, то дая 
выполнения этой задачи Вам при- 


заново. Наличие полпрогранны ре- 
конпиляции позволит Вам не сохра- 
нять всё исходные тексты мелодий, 
1а в дюбой момент получить из 
сконнилированного блока’ кодов 
‘полноценный исяблный текст, дос- 
унный для дальнейшего редактиро- 
`Вызов подирограмиы ‘реконпиля- 
ции происходит при назатии "3" в 
‘системном меню. При этом програнм- 
на переходит на строку 9000. Пос- 
де выбора устройства (магнитофон 
или дисковод} происходит загрузка 
‘сконпилированного блока  колов. 
Она выполняется в адрес 57000, то 
есть туда, где как раз готовился 
к ВЫГРУЗке скомпилированный блок. 
теперь необходимо определить 
стартовый адрес 5ТЮ, для которого 
блок бый скомпилирован. В случае 
диска, эти данные можно взять из 
системных переменных тв-205, где 
ени остались после загрузки 
{строка 9026). В случае загрузки 
'с магнитофона, стартовый адрес 
Нохно прочитать в заголовке за- 
гружаемого Файла, Он (заголовок) 
счичызается но временную рабочую 
обпасть паняти. — Сразу же после 
завершения загрузки, пока времен- 
зая рабочая область еше не  унич- 
‘тожена, его можно прочитать при 
|поноши РЕЕК. ‘Это выполняет стро- 
ка ‘9030. В этой строке не исполь- 
эуется прием по сокрашению паняти 
типа УАЬ "число", так как рассчет 
значения числа приводит к измене- 
ниян`во временной габочей области 
в прехдевременному разрушению ин- 
Форнации о считанном заголовке. 
Строки 9040... 9060 при помощи 
вспомогательного блока кодов, 
Форнируёного в дисплейном файле, 
производят очистку области памятв 
с 60000 длиной 2000 - где распо- 
лагается текущая инелодия. Сюда 
пбудет выполняться реконмпилядия. 
Строки 9070-9090 выполняют вос- 
|становление теипа воспроизведе- 
ния. Правда; вадо опять, как при 
конпиляции, учитывать разницу во 


шлось бы набирать всю мелодию. 


времени работы  мавиннокодовых 
пПРОоцеДУР, вОоСПРОИЗВОДЯШИХ мело- 
дию; : 

Строка 9100 рассчитывает ад- 
рес. с которого располагается 
нотная‘ посяедовательность.  Кожы, 
раснолохенияе с этого адреса, на- 
до переписать в рабочую область с 
адреса 60001, Это выполняется при 
помоши подпрограммы в0 509В 9200. 
Если встречается код 64, соответ- 
ствуюший маркеру "конец мелодии”, 
подпрограмна 9200 заканчивает ра- 
боту, Адрес расположения маркера 
“конен мелодий” запоминается в 
перененной #4 (строка о 9110). 
Строки 9120-9130 выполняют авало- 
гичные действия для зторого кана- 
ла. Адрес наркера конца - в пере- 
ненной на. 

После звукового сигнала,  сви- 
петельствующего о завермении ре- 
компиляции (строка 9140), в стро- 
ке 9150 следует запрос: надо пи 
уничтокить маркеры "конец нело- 
дии". Это удобно, если Вы собира- 
етесь продолжить мелодию, сделать 
ее длиннее, чем она была. В этон 
случае нажмите клавишу "У". Иначе 
- Любую  дРУГУЮ (если Вам надо 
всего лишь скорректировать неко- 
торые ноты, То. наркеры удалять 
незачем); 

На этом подпрограмна рекомни- 
ляции заканчивает свою ‘работу и 
происходит возврат к ТИТУЛЬНОЙХ 
меню. Теперь восстановленный ис- 
ходный текст нелодии находится в 
рабочей области Его ножно обраба- 


тывать дальше, как обычно; ре- 
дактировать, ’ прослушать,  сохра- 
НИТЬ И Т.Д. 


Транспонирование нелодии. 

рае ео фо ао 

В эту подирограмиу можно по- 
пасть при нажатии "4" в системном 
меню. Это очень удобный режим, 
если надо изменить тональность 
или перезадать мелодию для другой 
октавы. . 

Программа транспонировавия 
расположена со строки 5000. Нреж- 
де всего необходимо ответить на 
занрос, в какуф сторону требуется 
изменить тональность: вниз о или 


вверх. Это резлизуется в. строках 

5010... 5050. 7 
Следующий запрос {СТРОКИ 

5640-5060} - ‘для какого канала 


выполнить ТРанспонирование: 1 - 
только для первого; 2 - только 
для второго; 3 - дая обоих кана- 
лов. 

В строке 5079 идет посаедния 
запрос; на какую величину проийз- 
вести снешение. Нининальная велн- 
чина - 1 тон. Если надо изменить 
тональность ва 1 октаву, то ве- 
личина смешения доляна быть рав- 
на 12. 

Работа начинается в строке 
5100 и выполняется в два этапа: 
вначале - проверка, затем - соб- 
ственно замена кодов. В строке 
$100 обнуляется Флаг режима - 
переменная У, Если \:0, то про- 
верка, если У-:, то замена кодов, 


При У=0 происхоцит предвари- 


тельный просмотр всего текста не- 
лодии от начала до коица - воз-| 
мохно ли вообще осуществить тран- 
спонирование - не выйцет ли ре- 
зультирующая мелодия за пределы 
динамического диапазона’ "МНАН". 
Это выполняется подпрогранной с0 
З9В 5200 для ивух каналов - соот- 
ветственно в областях памяти с 
апреса 60001 ис 61001 в’ зависи- 
мости от заданных каналов (строки 
5110-5120). спи в результате 
проверки выясняется, что полжен 
быть попучен тон, недоступный для 
"УНАМ”, слишком высокий кли слим- 
кон низкий, то процесс проверки 
прерывается с. выдачей сообщения © 
невозможности  транспонирования, 
Это ныполняется переходом о на 
строку 5300. Посае чего - возврат 
К ТИТУЛЬНОКУ меню. А если птовер- 
ка доведена‘ до конпа, тб в строке 
5130 устанавливается Флаг У:1, 
что означает  “транспонирование 
возножно”. Нолно переходить к за- 
нене колов. Это выполняется путен 
возврата ‘на `строку 5110.’ Здесь] 
процесс вызова. подпрограммы 
60 508 5200 повторяется вторым 
циклом, но уже со значениен Флага 
У-1. В этом случае ствока 5260 
провзводит замену кодов. Выход из 
подпрогранны 5200 по достижении 
маркера "конен нелодин" или, при 
его отсутствии, по достижении по- 
следиего адреса рабочей области. 

Строка 5140 подводит итог 
транспонигования, после чего - 
возврат в ‘титульное меню. Дальше 
- обычная работа с полученной 
нелодией. 

Надо сказать. Что работа под- 
программ рекомпиляции и транспо- 
нирования, организованная в Бей- 
сике, не отличается быстродейст- 
вием. Так что, выполняя ия, на- 
беритесь терпения. "Неторопли- 
вость" подпрограммы усугубляется 
внесением элементов экономии па- 
мяти: УАЬ “число” и заменой чисел 
переменными. Но учитывая, что 
этими вознохностями не каждую 
нинутУ придется пользоваться, с 
этим можно снириться. Лучше было 
бы, конечно, построить такие про- 
цедуры в машинных кодах, тен 60- 
лее, что это не так ук слолно и 
впояне доступно вачинающин. По- 
пробуйте. если хотите, заменить 
Бейсик нашинным коном. Я же - 
ограничусь идеей. 


Сокращение програнмны, 

Как известно, после загрузки 
Программы мы ниеен в паняти шесть 
пемозстравионных мелодий. Кроме 
того, ‘непосведственно в памяти 
может находиться седьмая. Это 
Удобно, когда Вы в первый раз 
загружаете програнну - о можно 
послушать их. поснотреть. как 
задаются ноты`и эффекты. Не когда 
Вы освоитесь и будете заниматься 
саиостоятельным наборои нелодий 
дия офорнпения своих собственных 
програмы, демонстрационные мело- 
дий не понадобятся. Вы все равно 
будете удалять их, записывая в 
память на их место свои заготов- 


2А2 


ана 


ки. Кахлая мелодия занимает в па- 
`ияти по 2 Кб, исключив их из за- 
ГРУЗКи, Можно СОКРАТИТЬ ПРОГРАМИ 
1на 12 Кб. А если еше “выбросить” 
‘цветную заставку (около 1 Кб} то 
Нодучится отутиная экономия. 
Владельны марвитоФонных вер- 
Гсий, представьте; во что выльется 
сокращение времени при кахдой за- 
грурке: знесь речь идет не об 
урезавии програнмы вообще, ао 
"персональной копии" - специаль- 
ой версии, предназначенной для 
быстрой загрузки. И не об  удале- 
нии денонстрационных мелодий во- 
обще, их надо сохранить, но от- 
заельно, на аенте (маи дискете), 
чтобы всегда нохно было при жела- 
нии загрузить онять. Для этого 
надо каздую мелодию сначала за- 
грузить из буферной памяти в ра- 
бочую область редактора, а затем 
‘сохранить на центе (или лиске). 
ИШосле того, как демонстраяионные 
мелодии надежно сохранены,  мохно 
юрнступить к модификации кодового 
блока ”УНАН:2“СОБЕ. °С Начиная | 
адреса 30000. длиной по 2 #6, 
| здесь расподохено 6 мелодий. Ето- 
8ГО - По адрес 41999 включительно. 
Можно сделать так: 
ОАО “УНАИ!2”"СОРЕ 30000, 15000 
ЗАУЕ “чуваш 2"СОРЕ 42000, 5000 
Осталось только дополнить за- 
УрУзчик небольшой ‘ полпрограмкой, 
которая булет  инипиализировать 
область с 32000 (в старом 
варианте это надо было делать с` 
30000), заполняя ее кодон 41 - 
“пауза”. Вот эта поинрограиика: 
д №, 32000 
и (1), 041 
р РЕ, 32001 
12 80.09999 
23 
ВЕТ 
Для ее Формирования и запуска 
универсальный Бейсик-загруэчик 
|"УНАМ”,  призеденный в  начаае 
статьи, надо дополнить следующими 
строкаки: 


102 РОВ а:20480 ТО 20493: ВЕАЮ 
Ъ: РОКЕ а, Ъ: НЕХТ а 

104 КАНООНТСЕ 05Е 20480 

106 РАТА 33, 0, 125,54, 1, 17, 1, 12 
5.1, 15, 39, 237, 116,201 


Кроме того. надо очистить (3 
точнее, заполнить пробелами кли, 
например, словом: ‘”ЕИРТТ") ТУ 
область, где хранятся названия 
демонстрационных мелодий, Это о5- 
ласть с адреса 65300, по 10 бай- 
тов. на каллое название: Эти ис- 
правления надо сделать в файле 
"НАМ! 3"СОБЕ. 

дия устранения загрузки кар- 
инки, из загрузчика иохно уда- 
пить СТРОКУ 30 и из строки 25 
исключить: ) 

:;. ТЮАР "*5СВЕБИ $: ... 

и порскомионовать заново Фаялы 
лия магнитоФонного варнанта. 

Теперь, когда описание про- 
граммы и всех её НОВЫЕ ФУНКДИЯ 
завегиено, переходни к тен изна- 
нениям, которые надо выполнить в 
кодовых блоках. 


иомеление кодовых блоков. 

Ниже ‘приводится программа на 
Бейсике. выполняющая все необхо- 
димые изменения в коловых блоках 
"УНАН! 1"СОРЕ и "МНАН!2"СОБЕ. По 
заверщении она выдает иовые Файлы 
"ват 1"СОРЕ и "Ваш 3"СОБЕ. 
” Программа предназначена лая 
работы с магнитоФфоном. Владельцы 
"Спектрумов” с БЕТА-диском, на- 
верняка сами сумеют внести необ- 
холимые коррективы, 


10 СЕЕАВ 31999; 
РОБЕ 23676. 255 

20 ГОАО “ЫНАН!1"СОБЕ 

30 ТОАБ "УНАМ! 3°СООЕ 

40 РОХЕ 50908, 159; РОКЕ 50909, 
719; РОЖЕ 50921,223: РОКЕ 50922,17 
: * 


РОКЕ 23675, 88: 


$50 РОКЕ. 51248, 0; 
0: РОКЕ 51254, 221 

60 РОВ А=513Т4 ТО 51406: ВЕАР 
В: РОЖЕ А, В: НЕХТ А 

ТО РАТА 
О22. о1Т, 001, 127, 049, ОТ, 056, 053, 
©Зг, 071. 055, 082, 075. 032, 084, 073, 
О77, 059, 083, 127, 049, О5Т, 05Т, 051, 
032, 055, 076, 065, 078, 083, 079, 0170, 

`оё4 


РОКЕ 51253,17 


80 РОВ А:51495 ТО 51527: ИЕБАБ 
В: РОЖЕ А, В: НШЕХТ А 
90 БРАТА 


023, 089, 083, 084, 046, Ч7Т, 069, 078, 
085, 019, 000, баг, 015, 007, ОЗ2, 980, 
озг, 069, 085, 083, 032, ОбТ. 019, 078, 
084, 082, 079, ОТб, 032, 075, 059, 089, 
032 


100 РОВ А-56128 ТО 56186: КЕАР 
В: РОКЕ А, В; НЕЯТ А 
110 БАТА 


014. 040, 205, 019, 064, 124, 04а, 2зт, 
221. 034, 230, 092, 044, 009, 205, 019, 
061,201. О1Т, 150,254, 001, 634, 000, 
024, 005, ОЗТ, 194, 254, 001. 045, 000 
120 ВАТА  ^ 
042, 054, 092, 229, 033, 232, 220, 034, 
054. 092. 205, 060, 032, 017, 240, 254, 
901, 036, 000, 205,050, ОЗё, 225. ОЗА, 
054. 092, 201 
130 РОВ А-56815 ТО 56999: ВЕАР 
В: РОЖЕ А,В: ВЕХТ А 
140 ВАТА 
000, 000, 000, 000, 600. 000, 000, 255, 
016, 040, 044, ОТб, ОТБ, 075, ОТб, 255, 
128, 128, 128, 128, 128. 128, 128.255, 
092, 088, 088, 120,412, 112, 096, 255 
150 РАТА 
128, 129, 131.131, 135. 134, 142, 255, 
224, 192, 192, 064, 064, 064, 064, 255, 
156. 153, 181, 187, 183, 183, 182,255, 
224, 248, 252, 25, 078, 070, ОТО, 255 
160 РАТА 
182, 179. 1аТ, 153, 136, 132. 131.255, 
070, СТО, 068, 068, ОТ2, 080, 224, 255, 
128. 128, 128. 134, 143, 143; 142, 135, 
064, 064, 054, 054, 064, 064, 128, 000 
170 РАТА 
000, 000, 000, 005, 015, 015, 014. 007, 
128, 128, 128, 128, 128, 128, 128, $28, 
135, 140, 136, 144, 184, 158, 159, 255, 
128, 192, 224, 096, 118, 118, 112, 255 
180 ВАТА 
159, 142, 128, 128, 128.128, 128, 255, 
112,112, 112,112, 102, 102, 096, 255, 
128, 128, 128, 129, 129, 131, 130, 255, 
192, 192, 128, 128, 000, 000, 000, 255 


245 


+90 РАТА 
132,156, 143, 160, 126, 128, 128, 255, 
000, 050, 064, 124, 066, 066; 050, 000. 
000, 126, 002. 004, 008, 016,016, 000 
200 РОК А-У5В "А” ТО ИЗИ “ВТ: 
ВБАР В: РОБЕ А, В: НЕХТ А: 
240 РАТА 
098. 120, 288; 248, 248, 112, 000, 000. 
000; 000, 000, 009, 014, 008, 008, 008 1 
220 РОВ А-95Е "Е" ТО 058 “Е"+Т: 
ВБАР В: РОКЕ А, В: НЕХТ А 
230 АТА 
298, 112, 000, 000, 000, 000, 000, 000, 
909, С14, 008, 008, 008, 120, 2486, 248 
240 РОВ А-65184 ТО 65299: БЕАР 
Б: РОХБ А, В: НЕХТ А 
250 РАТА 
916, 000, О1Т, ООТ, 022, 008, дат, 035, 
033, 033, 922, 009, О2Т, АТ, 648, 033, 
Ога, 010. О2Т, 049,050, 033, ОВ, 011, 
О2Т, 051, 058, 035, О22, 012, О2Т, 053 
250 РАТА 
033, 033, 016, 000, 01 Т, ООТ, 922, 008, 
ОРТ, 046, 128, 128, Огг. 009, б2Т, 035, 
034, 033, 022, 010, О2Т, 0355, 036, 033, 
Ог2, 011, О2Т, ОЗТ, 038. Е оз2 
210 РАТА 
021, 039, 040, 033, 02, 013, овт, о41, 
од2. 033, саг, 014. о2т, 045, 044, 128, 
огг, 002, о2т, 033, 03а, 033, 022, 003, 
ОТ, 035, 036, 033, 022, 004, 9ст, 037 
280 РАТА р 
038, 033, Ога, 005, 027,039, 040, 033, 
ог, 006, ОаТ, 041, 042, 033, даг, 007, 
ОРТ. 083, 054, 128 
290 РОЕ Н-1 ТО 6: РЕЗТОВЕ 300: 
РОВ Н=1 ТО 10: КЕАО В: РОБЕ 1653 
00+10* (-1}+-1),В: НЕХТ М: МЕХТ 
н 


300 БАТА } 

045, 045, 059, 077, 080, 084, 089, 045, || 
045, 032 й 

400 АУЕ“МВая 1"СОРЕ 65184, 352 
$10 ЗАУЕ"МЬат 3"СОРЕ 50000, 1000 


Цифры в строках РАТА напечата- 
ны одно под дРУГИМ ТОЛЬКО ПДЯ 
упрошения “читаености" програмны, 
Вы можете набирать ик так, как 


вам удобно (напринер, вместой 
“002”, разумеется, ножно набрать 
ча 


На этом ин закавчиваен н иЗвоже- 
ние некоторых вопросов. связанных 
с музыкальным редактором "УНАМ”, | 
но ни в коем случае не заканчива- 
ен музыкальнтю тематику. Наобо- 
рот, планируем всячески ее разви- 
вать в дальнейшем, В нервом воме- 
ре "7Х-РЕБЮ" булушего года ны 
продоахим ‘рассказ © музыкальных 
редакторах. Будет рассмотрен дру- 
гой вариант редактора "УНАМ" - 
рассчитанный на работу с трехка- 
нальным нузыкальным сопроцессо- 
ром А7-8910° (8912). А затем. в 
пальнейвем, програкмы "509нр- 
ТВАСЕЕ" и "ЗОЕССОВРИЕК", также 
рассчитанные на музыкальный со- 
процессор. С их помошью кожно со- 
эвавать эвуковое сопровождение 
такого высокого качества и’ виро- 
кой падитры звучания, . что оно 
становится практически соизнерино!. 
С МУЗЫКОЙ,  КОТОРУЮНЫ  саыШИМ по 
Радно. : 


{С› Комиссаров П., 1993 г. 
(С) “ИНФОРКОМ”, 1993г. 


НЕСТАНДАРТНАЯ ЗАГРУЗКА 


В *2Х-РЕБЮ" В 1-2 за этот. год 


продолжаем рассказ об этой проце- 
©. иной нестандартной за- 


‚ясь дополнительным материапон, 
мрбезно предоставленным наз нажим 
корреспондентом, у 


Павел прислая 
загрузчик. — которые 
пизменить его свойства. 
’ Правда, следует заметить, что 
тестируя присланные мн листинги, 
ин получали иногда несколько иные 
результаты, чем те, © которых 
пишет Павел. Поэтому публикуемый 
Натериал  явияется коллективным 
‘творчеством: в основе - то, что 
присиал о вам корресвондент, но с 
вашими изнененияни и ‘донолнения- 
им. Итак, модернизация загрузчи- 
ка блоков кодов без заголовка. 

1. Загрузка кодов, начиная со 
старших адресов к наадшим. . Для 
этого надо сделать такую замену: 
ЕН - 28. Это приведет к тому, 
|что по адресу РЕЗаН вместо коман- 

1Х получится команда 
Здесь надо отметить ива 
Во-первых. в вызывающей 
‘программе в регистре 1х указыва- 
фется ве начальный, а конечный 
адрес загрузки (вачальный адрес 
щас длина в ПЕ}, так как загруз- 
ка идёт “наоборот”. Другая осо- 
бенность заключается в том. что 
задав. скажем, для загрузки экра- 
ва, длину 6912 байтов, Вы обнару- 
жите, что ` последний байт блока 
кодов (он будет первын байтон 
дисплейного Файла) ие грузится. 
`Мюзэтому, при подготовке блока к 
загрузке, следует задать плину на 
1 байт большую, то есть 6913 бай- 
тов. для загрузки экранного Фай- 
ла, например, вызывающая програн- 
на нохет выглядеть так: 

12 1%,45600 

Е, #1801 
А, ЗЕЕ 


дополнения к 
позволяют 


СА, #Р0ЕЗ 
ВЕТ $ 
При этом загрухаемую “картин- 
ку" необходимо сначала “перевер- 
нУТЬ" И увеличить ее длину на \1 
например такой програнмой 


г РОК а=0 ТО 6912: РОКЕ (86912 
-а), РЕЕК (16384+а): НЕХТ а 

3 ЗАУЕ "паше"СорЕ 40000, 6913 

При выполнении записи на ленту 


в строке 3 пролустите заголовок, 
а только затем включайте изгавто- 
фон, то есть запишите только сам 
кодовый блок. 

При загрузке со ‘старших  адре- 
сов к младыим, будет слышно. как 
вначале грузятся атоибуты, а за- 
тен - графика. 

к сказанному можио добавить 
такой Факт. В свое время нам по- 
вазась игра "РОЕВ  СОАЗТЕЮ“ 
(ЕГТТЕ), в КОТОРОЙ загрузка ве- 
лась тоже “наоборот”. Причем за- 
пись была отвратительного качес- 
тва и едва читглась. Эта програм- 
на была переписака с магнитофона 
ча магнитофон, так как ни один 
копировщик не ног ее ‘скопировать 
из-за больвой длины. Дахе копи- 
ровшики с конпрессированием па- 
мяти (типа “ТР-СОРУ"). При ‘более 
детальной рассмотревии  выясви- 
аось, что загрузка идет там тоже 
се стармих адресов в мдациие, 
причем начинается с экрана (с 
атрибутов},  затен пробегает об- 
засть всего ПЗУ, затен. после 
постихения нулевых значений в 
счетчике адреса и его переподне- 
вия, продолжается с конца памяти 


и заканчивается буфером принтера. . 


То есть. загружаются (точнее 
говоря делают вил, что загружают- 
ся} все 64к паняти! 
релисывается и машинный стек, 
обеспечивая после окончания за- 
груэки н возврата по РЕТ авто- 
старт программы. сам Факт сушес- 
твования еше ”невзломанной” про- 
грамлы уле говорит о высоком ка- 
честве запасты. 

Однако, такой нетод зашиты 
имеет смысл, если Ваша програмиа 
большая - использована практичес- 
ки вся память. Иначе сколько же 
лишнего времени будет занимать 
загрузка‘ Это очень “действует 
на нервы" и резко снихает симпа- 
тир к программе. Это тохе надо 
учитывать. 

Однако, возврашаенся к загруз- 
чику от ВАЮВАКТАНА. 

2. Шри загрузке пилоттоны хао- 
тично изменяют свой цвет, перели- 
ваясь всеми цветани радуги. — Ддя 
получения этого эффекта в загруз- 
чике от ВАРВАЕТАНА нужно изненить 
всего одну ячейку: РЕЗРН - 10. 
Бохете к этому изменению добавить 
еще одну ячейку: РЕЗОН - 00. 5- 
хете также попробовать другой 
вариант: РЕВРН - ЕП, РЕЗОН - 5Р. 

3. Шри загрузке по борлюру 
проскакивают тонкие короткие раз- 
воцветные мтрихи. этот эффект по- 
лучается, если изменить загрузчик 
следующим образом: 

РЕЗР ЕР Ш 

РЕЗЗ ОЗРЕ ОТ 

ЕЕЗ5 2600 А 

РЕЗТ 72608 08 

ОЗЕРЕ т 

РЕЗВ 37 5СЕ 

с9 ВЕТ ь 
черный, индикация 


А.В 
{ЯРЕ), А 
#00 
#08 
{РЕ}, А 


24а 


При этом пе- 


считивания {«борлюрные полосы) 
прОоизвОДИТСЯ В заданных. позициях 
{эвакоместах) экрана. Надо внести! 
следующие изменения: 

ЕЕОС хо 400 
А, #08 
А, #00. 


(#7Е9О), А 

#06 

#04 

#42 

дальнейшая часть програкны за- 

висит от того, в каком месте эк-| 
рана Вы хотите осуществить вывод 
борлюрных нопос. Например, пусть 
это будут два знакоместа экрана:! 
левое верхнее н соседнее с ним! 
справа. Адреса ячеек в файле ат- 
рибутов, соответствующие 
знакоместам будут: 


такии: 

РЕВ 320058 10 

РЕБ 320158 Ш 

РЕАЛ! 37 5СЕ 

РЕА2 С9 ВЕТ 

При этом в выбранных знакомес- 
тах должен находиться какой-ни-| 
бущь графический образ. Тогиа те 
пикселы. которые выключены (имеют 
цвет РАРЕЮ) будут мметь черный! 
цвет и меняться не будут, а вклю- 
ченные пнкселы (имеющие цвет тик) 
будут переливаться красно-хелтыми, 
полосами, воспронзводя ‘такие хе 
полосы, какие мы вндин по борлюру 
экрана при загрузке. довольно-та- 
ки оригинальный эффект получает- 
ся: одно к то же знакоместо име-| 
ет черный Фок и, в то зе вреня, 
на включенных пикселак вабаюдаен! 


{45800}, А 
(#5801), А 


"спектрум“ , 
так, что в принципе одно знако-й 
место че мохет иметь больме двух 
дветов: ТК и РАРЕЕР? Дело здесь 
в том, что на получающуюся кар-| 
тину накладывается еше одно явле- 
ние - строчная развертка экрана. 
Поэтону быстрая смена пвета ТЕ) 
приводит к тому, что во время! 
развертки кадра одна строка ииг- 
ет, красный цвет, а другая строка 
развертки ухе имеет шелтый двет, 
что и создает необычный эффект. 

Еле на один оригинальный спо-| 
с06 загрузки. примененный в йро- 
грамне “КРАКООТ-11”. обратил вни- 
мание Павел.  Смыса ее состоит в! 
том, что блок кодов с одиин пя- 
аот-тоном ноет вести загрузку в 
разные апреса. Например, картин- 
ка тан загружается так: верхняя 
треть экрана, затем атрибуты вер- 
хней трети, нижняя треть, атрибу- 
ты нижней трети, 
атрибуты средней трети.  Програн- 
ма при этом выглядит так: 

10  1%,91000 


средняя треть, | › 


пс оо 
Ех АРА’ 

Ес в 

САМ, 8055А 

БО 11,5800 

1)  1Е,30100 

САЦ, ЧО5АЯ 

ВЕТ 

Это тохе кохно несложно ис- 


верхняя треть, ‘затем 
средняя треть и ее 


такой програнми ва вейсике, 
1 515 5 ВОО *"СОБЕ 165384 
2 КОЕ а-0 ТО. 2048: РОКЕ (4000 
0+а),РЕБХ (16384+а): ВЕХТ а 
3 РОЕ а-0 ТО 256: РОКЕ (42048 
+а), РЕБК {225е8+а}: НЕХТ а 
4 РОК а-0 ТО 2048: РОЖЕ (4230 
4+а). РЕБЕ (18432+а): НЕХТ а ь 
5 РОВ а-0 ТО 256: РОКЕ (44352 
+а}, РЕЕХ (22784+а): НЕХТ а 
6 РОВ а-0 ТО 2048: РОЖЕ (4460 
8+2}, РЕЕК (20450+а): НЕХТ а 
`Т РОЙ а=0 ТО '256: РОКЕ 645656 
+а), РЕЕК (23040+а): НЕХ? а 
3. 5АУЕ "“паше”СсорЕ 40099, 6918 
Аля загрузки этого блока кодов 
(без заголовка) 
пользована следующая программа ов 
кодах. 


А800 100210040 10 1%х,#4000 ^ 
АВОЯ 110008 0 ПЕ, #0800 
АВОТ ЗЕРЕ 1 АЗЕР о 
АОЗТ __ 5СЕ 
АВОА ‘РЗ р у 
АВОВ 14 с р 

‘АВОС 08 ЕХ АР, АЕ” 
АВОЮ 15 РЕ в 
АВОЕ С106А05 СМЛ, З056А 
АБ11 10210056 62 1%,45800 
АБ15 . 110003 10, 140100 
АВ18  С04905° СМА. 30549 
АВВ 100210048 0 1к, #4800 
АВЕ 110008 1  1Е,#0800 
АВгё С0АЗО5 СМЛ. #0549 
АВг5 00210059 10  1%,#5900 
АВа9 110001 1 1,0100 
АВС СРА9О5 САБ, 0519 
АВаг 100210050 10  1%,#5000 
АВЗ3 110008 10 0Е.$0800 
АВ36 С10А905 ^ СМЛ, 405А9 
АВЗ9 ›10024005А 10 1%, #5400 
АВЗО 110001 10 РЕ, #0100 
АВЗО С0^305 САМ, +0549 
АВ83 ЕВ ЕТ 
АВА 08 ВЕТ С 
АВ СР в5т 8 
АВАб А РЕРВ, З1А 
дая примера, этот блок кодов 


расположен с адреса АВООН, но он 
ножет находиться в любом другом 
месте. 

ЕСЛИ контроль качества считы- 
вания не нухен, то занените ко- 
манду по адресу АВЗАН на ВЕТ 
«сен». } 

Излохженное яваение можно ис- 
пользовать не только для загрузки 
картинки, но и лая любого другого 
массива кодов, причем количество 


с о аки 


„, атрибутов. 


может быть ис-. 


ВОЗВРАВАЯСЬ К НАПЕЧАТАННОМУ 


таких допясываеных по’ отдельности 
блоков может быть достаточно 
большин, создавая ‘иного хлопот 
взяоншикам. о 

А теперь преллагаем еше один 
способ нестандартной загрузки, 
присланный Комиссаровым ‘Павзоч, 
Он "выташил” его из црогранны 
“ЕРЕООУ-2". Этот загрузчик за- 
гружает экранный файл длиной 6912 
байт по, четвертям экрана в шах- 
ватном | порядке. — Приблизительно 
это выглядит так: 


Причем загрузка изображения в 
каждую четверть идет так: Сначала 
- графика. но не как обычно - 
линиями с магом по 8 пикселов, ла 
еше с делением по третян экрана, 
а пиксельные линии идут подряд, 
одна за другой, сверху донизу, 
картинка разворачивается плавно и 
непрерывно, пока не заполнится 
вся четверть. затен - загрузка 
но опять,’ не. как 
обычно - по строкам свёрку вниз - 
а що столбцам, о. есть 
изображение окраливается слева 


направо. И так ПЕРА дая 
каждой четверти. 
для того, чтобы загрузить та- 


кин образом картинку, надо ее 
сначала подготовить. Павел пред- 


дагает програмну на вейсике, 


которая это выполняет аналогично 
тону, как это делалось при за- 
грузке "наоборот". 

1 СГЕАВ 39999: 
000, 5912 

10 ТЕТ па-50000 

20 РОВ ч=1 ТО 4: РОВ 8=0 ТО #1 
: ВЕАР ааг: РАТАТ 3: СНЮ® 143; : 
ОВ К-О 10 1: РОВ а-0 ТО. 15 

30 РОКЕ па, РЕЕК ааг: 1ЕТ ааг:а 


ТЮАБ "“СОБЕ 40 


$г+1: ВЕТ па:ра+4: МЕХТ а: ЦЕТ а 
ЗГг-а9г+240: НЕХТ БК: НЕХТ $: РЕ 
Т; РТ 


40 ВЕАПО ааг: ГЕТ ка-авг: РОВ а 
=0 ТО 15: РОВ Ъ-0 ТО 11: РОКЕ да 
‚РЕБЕ заг: 1ЕТ авг-а9г+32: ЕТ в 
а-па+!: МЕХТ Ь 

50 ТЕГ ‘ааг=Ка+1: ЦЕТ Ка-Ка+1: 
: БАУЕ “паше"сорЕ 


50000, 6912: 5ТОР 


10 РАТА 40000, 40032, 40054, 4009 } 


5, 40128, 40150, 40192, 40224, 42018, 
42080, 42112, 42144, 46144 

80 БАТА 4219а, дар24, 42256, 4228 
8, 41112, 44143, 44176, 49208, 44240, 
ЧАЗТа, 44304, 48336, 36544. 

90 РАТА 40016, 40048, 40080, 4013 
2, 40143, 30176, 40208, 40240, 42064, 
42095, 42128, 42160, 46160 

100 РАТА 42116, 42208, л2гз0, чгет 
2, 43096, 48128, 14160, 44192, 44224, 


‚ 49256, 44288, 44520,46528 


После запуска программа ждет 


загрузки норнальной картинки, а 
после загрузки начинается ‘переко- 
Пока она виюлияйется, 
ва экран выводятся цифры. По нин 
нолно сопределить,. нного ли’ оста- 
лось здать до завершения работы. 


хировка. 


Программа должна вывести ‘четыре 
СТРОКИ ЧИСед ст.090. ло 


#1: 


После этого програмна прехло:. 


хит записать полученный блок ко-|' 


дов. При заниси пропустите заго- 


зовок, и только после него ‘вклю 


чайте магнитофон. 


загрузка полученного 


`'бяока: 


кодов без ‘заголовка ‘выполняется 
ирн помоши следующего загрузчика: 


ЕАбо 
ЕАбЯ 
ЕАб5 
БАбТ 
Або 
ЕАбА 
БАбВ 
ЕЛ 
ЕАбЕ 
ЕАТЕ 


о 


ЕРТЗОЕВ 0 (#8850) /5Р 
37 ЗС 

ЗЕ ЗВ о АО 
РЕО1 СР. #01 

08 Ехо АР, АР 
РЗ р 

ЗЕОР. 0 А,ЖОЕ. 
О3РЕ бт РВ, А, 
ОВЕЕ 18 А, МЕБ 
ЗЕ УКА 

620 ° АНО 120 
602 0 ^ 02° 

10 С.А 

ВР СА 
СсаавЕв УР Я, 28848 
С9ЕТ05 САШ, #057 
3078: 3% КС, ЖЕАТВ 
211504 10. 40815 
10РЕ = 022 ШЕАВЗ, 
р: ЕС ‘нь 

тс АН 

85 И 
20Е8 3 №2. 4ЕАВЗ 
С0ЕЗ05 САМ, #0563 
30Е9 3 НС ЧЕАТВ 
059С 10 в.49с 
С0Е305 САМ. #0583 
зока 32 КС. ЧЕАТ8 
3806 ИСО А, #06 
ва‘ ров 

ЗоЕС "в ЕС, ВЕАТЕ 
24 19 я й 
а0рз 32 ВХ. ЗЕАВЕ 
0669 в. 
С0ЕТОЗ САМ, З05ЕТ | 
3003 3% НС, ЧЕАТВ 
78 Ав 
ЕДА (СР. 4 
ЗОРа 32 к, ЖЕАЕ 
С0ЕТО5 — САЫ, #05ЕТ 
резееВ. р КС. ЧЕва8 
79 тр лс“ 
ЕЕОЗ Хой 303 

ЧР Е0. С.А 
о ВИЙ Н;400 
0680 т ваю 
СОАЕЕВ САМ, НИЕ 
118088 10 10, 44380 
25 РОЗН БЕ 
111046 Ш Е, #4010 
05. РОЗИ ОЕ . 
$19048 из РЕ, #4890 
55 РО5Н ОЕ 
00210040 ГО 1х. #000 
0504 И». В, #08 

С5 РОЗН ВС 

ВРЕЗ взнлх  \ 
160С 10’ ‘оюс ' 
ОВЕБ РОБН 1х 

1208 Ш Е.408 
рОЕ5 РО5Н ОХ 

0510 10 в, 410 


245 


и 


й 


РОЗН ВС 


БАБА: (©5 г 
ЕАЮВ СРАЕЕВ САМ, ЗЕВАЕ 
ЕАОЕ _ 3058 3е.. ВС, ЗЕ ВАЗ 
ЕАЕО С1 РОР ВС 

ЕАЕ: 007500 10 . (Х+0. 
ЕАЕА ‹ ОРЗ ис 1х 
ЕАВБ  1ОРа РУХ ЗЕЛОА 
ЕАЕЗ ПРЕ РОР 
ЕАЕА Юрга СИЮ 1 

БАНС 40 БЕС Е 

ЕАЕО 2057 38. В2,ВЕАОВ 
БАНЕР ПРЕ РОР 1х 

БАР: 007 т 
ЕАРЗ 2518 АБР #18 
ЕАРБ АТ 10. В.А 
ЕАРБ БОТЮ ЕР. Льх 
ЕАРВ ЕБЕО АБО 250 
БАРА 07 ВЕСА 

ЕАРВ СТ ВЕСА 

НАРС ОТ СА 

КАРР БВ 0. в 

БАРЕ С ИА 

ЕАЕР. 47 Ы) В.А 

` ЕВ00 2618 АБО 18 
ЕВОР 2640 ов #40 
ЕВОФ 0067 10 ВА 


{С} Р. КУШНОв, Д.Мальтов, 1993 г. | 


В последних двух номерах про- 
лого года ны опубликовали 06зор 
зарубехной прессы,  обобаиз те 
сведения. о которые  инертся по 
ошибкан в стандартном системном 
ПЗУ ”Спектруна”. 

Работа подучила благолелатель- 
ные отзывы от наших читателей. 
Пс-вилиному, ин вахно все, что 
связано с Йзу, а тем более с его 
сшибкани. } 

} Вместе с тени встад интересный 


вопрос; “А как обстоит дело в ПЗУ 
ТУРБО-90? “.. Результатами своих 
исследований по ЭТОМУ  ПоВойУ 


делятся наши корреспонденты Ронан 
Купцов и Нальтов денис из г. Нов- 
города. Тема не закрыта, мы опу- 
биикуем иодругие взгляды, освеша- 
щие этот вопрос, ем более, что 
интересно бы рассмотреть и. свои 
“собственные” ошибки Турбо-ПзУ. 


КОРР: Ны являенся постоянными чи- 
тателями "2х-РЕВЮ" < 1992 года. 
Ваш хурнал выме всяких похвал! 
Сами мы занимаенся программирова- 
`Зниен три года и Вы нам в этон 
очень ‹поногаи, особенно в тон, 
что снязано с програннированием в 
мощинвых кодах. У Вас постоянно 
свежий и хорошо поданвый матери- 
|аи, а Ваши статьи по секретам ПЗУ 
в 1991 г. - просто. класс! Неоще- 
ниная помошь любому программисту. 
ИФЕ: Спасибо. конечно, ДРУЗЬЯ 

на добром слове, во позвольте нам 
1остаться при своем мнении. Статьи 
эти © ИЗУ в 1991 году были, воз- 
вможно, полеззы, но ны их рассмат- 
рРиваен как „СОВЕРШЕННО НЕУДАЧНЫЙ 


‚ опыт и РЕШИТЕЛЬНО ини НЕДОВОЛЬНЫ, 


Знаете ведь: “Первый блин... и 
т.д. ". В общен, случился с вани 


78 Ав 
ЕбОТ АНО #07 
ог ЕСА у 
сое. ЕРСА 

о ВЕСА 

47 ШВА 
о) Ах 
ЕВЕ АБР ЗЕ 
во в 
ОБЕ ЖА 
15 ПЕС в 
говв 35 в. Еле 
РЕ! РОР 1х. 
ие. т ь 
8618 АО #18 
я ВЕСА 

ое ЯВСА 

ОР РСА 
7658 ор #58 
БОТ 10. Т.А 
0510 юр во 
5 РОЗН БС 
060 Гр в, вос 
РЕ РОЗН 1 
с5 РОЗН ВС 


ПРИСТУИ внУТРенней аллергии. Так 
бывает. когда хочешь сделать что- 
то корошее, а чувствуешь, что по- 
лучается ве то. 

Потому ны и прекратили их да- 
вать. Ны тогда только начинали и 
опыта общения с читателями было 
маловато, сейчас ‘ны все 
бы по-другому. И будьте уверены, 
сделаен! В наших планах на 2-ой 
квартал 199% года стоит 
систекном Пзу, которая действи- 
тельно класс! Ны готовим 
й ПОНЯТНЫЙ способ подачи Натериа- 
да и уверены, что книга будет от- 
личной. Так что позвольте Вами 
конплименты принять авансом, а ны 
постараемся этот аванс отработать 
по-честному. у 


КОРР: Ны хотим поделиться с 
Вами и со всени читателями неко- 
торыми находками из ПЗУ ТУРБО-90. 
немного покопавиись в нем, ны 
обнаружили (не без номоши "2х- 
РЕВЮ”), что некоторые из ошибок 
систенного ПЗУ тан исправлены. 

исправлено: 

1. Процедура обработки ненас- 
кированного прерывания ТИТ, начи- 
ная с адреса 0066Н, т.е. 

РОЗН АР 


3 2, бОТОН; ошибка исправле- 
на, в Фирменнон ПЗУ здесь стоит 
Е НЕ. бОТОН. 


2. Ошибка деления, т.е. : 
ТЕ 1/2 ‹> 0.5 ТНЕМ РЕТНТ "Ко-Ка“. 
В Турбо-ПЗУ здесь “Ки-Ки” не пе- 
чатается. 


3. Ошибка "-65536"; т.е. РЕШИТ 1 
*-65535" дает - 65556. 


СОЗЕЕВ САМ, ЗЕБАЕ 


ЕВеР 3011 9 ЕС ЗЕвАа. 
8831 001500 10 (1+0). 1 
Е554 012000 Ш —#С.50020 
ЕБЗТ 10009 АЮр т. ВС 
ЕВ39 С! РОР ВС 

ЕВЗА 10ЕР РЛЕХ зЕв2в 
БВЗС Р0Е1 РОР 1х 

ЕВЗЕ. 0023 тс лк 

ЕБАО Сс! ‚. РМ Ш 

ЕБА1 10ЕЗ рух иЕВёб 
ЕВАз С! РОР ВС 

ЕВ4ф  ООЕ! РОР 1х 

ЕВА6 1085 РУХ ЗЕАСР 
ЕВЗ8 ЕОТВБОЕВ 12 5, (42860) 
ЕВС РВ ЕТ 

ЕВА С9 РЕТ 

ЕВЗЕ 054 тр в, звА 
ЕВ5О 2Е0! 10 в 
ЕВ5? (0305 САМ, #05ЕЗ 
ЕВ55 О ВЕТ #С 

ЕВ55 ЗЕСВ 5 А, $СВ 
ЕИ58 88 ) [> о: 

Е859 СВ15 в ь 

ЕБВ5В 0680 р в, #0 
ЕВЗЮ 30РЗ 2 НС, #ЕВ5Е 
ЕВУР С9 ВЕТ 


4. СНЕ® 9 работает. 
5. СНИ$ 8. работает правильно. 
6. БТЕ $ работает правильно, 


т. 


РЕТИТ *Ко-Ки” + 5ТИ 0.5 
дает: 
Ка-Коо. 5 


Т. Ошибка 5СРЕЕМ$® исправлена, 
т.е. 
ТР *Х"=5СНЕЕН$ (0, 0} ТНЕН 
РВТЕТ *Ко-КИ” 
Ко-Ки не печатается, когда в’ 
текушен знакоместе (0,0) вет "Х* 


8. исправлена отибка курсора 
текушей строки; т.е, 

9000 РЕТЫТ\9001\ЕШТТ, где 
значок ”\" оэначает ЕНТЕЕ, выдает, 
на редактированиё строку 9000, а) 
значок *>" в нихней части экрана! 
не появляется. 


9. исправлена ошибка ведущего! 
пробела. 


Неисправлевные ошибки: 
1. Особенность регистровой па- 
ры Н’1.’ (альтернативной). 


2. Ошибка оператора РОТ. 

3. Ошибка с1.05ЕЯ. 

4 Ошибка 5сго11? 

5. Ощибка Е-режина. з 
6. Ошибка проверки синтаксиса. ! 


Непроверенные ошибки. 

1. Ограничение по использова- | 
НИЮ Ррегистровой пары Гу. 

2. Особенности пользователь- 
ской ФУНКЦИИ РИ. 

3. Ошибки кодов 
цветом. 

4. Ошибка НОр_О1У (кальк-р). 

5. Ошибка Е_ТО_ЕР (кальк-р). 

6, Ошибка ТИКЕТ$ #0. 

* Е ® 


управления 
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| АзЕнОНаЕ 
‚ бАЩЕВ 


‘Аауеплоге Во114108 Зузлем” 


Са 


Окончание. Начало см. в пре- 
дыдушем выпуске. 


Чтобы завершить демонстрацион- 
вУю программу, начатую нами в 
предыдумем номере *7Х-РЕВЮ", 
(загрузите программу с  денты_в 
(Листинг_4) и добавьте строки с 
91100 во 3315 из Листинга_5. Со- 
раните готовую денонстрапионную 
игру командой РУ 9990. Скомпо- 
узуйте Файлы готовой демонстраци- 
Тонной программы в следующем по- 
ридке: 


Файл 
Файа 
Файя 
Файя 


ТАРО" (Лист. _5 
"абуетАиге” (Лист. 4+5} 
"зтзет"СорЕ 
*0Ъ325С45"РАТА 


Последние два Файла сгенериро- 
ваны при покоши гозовной програм- 
|ны АВЗ. 


листинг_5. 
Текст а-ой части демонстра- 
ИОНЕОЙ = ИГРЫ. Продолжение ' 


Файла “адуетАиге”. 


1100 1Е ВО>НМОВ ТНЕН ЕТ В% (1) =" 
ЭТО НЕВОЗНОЖНО!": 60 ТО 50 
1105 1Р РЕЕК (0+30}=99 ТНЕШ ЕТ 
83 (1) "ПРОВЕРЬТЕ СВОЙ ИНВЕНТАРЬ 
1”: 60 то 50 

| 1110 ТР РЕЕК (0+КО) <>РЕЕК Е ТНЕН 

ЦЕЙ ©%(1}- "НАВЕРНОЕ, ЭТО ВАМ п 

| РЕСНИЛОСЬ!": $0 ТО 50 

1 1115 1 РЕЕК (2+99)>=МАХ ТНЕН 1 
ЕТ 83 (1) =”У ВАС ВЕДЬ ТОЛЬКО ДВЕ 

| РУКИ, ": 187 #3(2)-”ВАМ ВСЕ ЭТО Н 
Е УНЕСТИ. *: 60 ТО 50 

} 1120 тг НО=Т ТНЕЕ 5.5 ; 60 508 
8800: РЕТЫТ АТ г, 10; "ПОЗДРАВЛЯЕМ 
*: 60 $08 8800: РЕТЕТ АТ 5, 3; "БЫ 
ЗАКОНЧИЛИ СБОЮ МИССИЮ, *: 60 508 
8800: 0 ТО 1602 

’1125 РОКЕ (0+80), 99: РОЖЕ (Р+99) 
«РЕБЕ (Р+99)+{1; ВЕТ 8% (1) "0. К. * 

|.: 60 ТО 50 й 
1200 1Р ВО>МОВ ТНЕЯ ТЕТ $1)" 

| НЕ БУДЕМ ДЕЛАТЬ ГЛУПОСТЕЙ! =: 60 

} то 80 Е 

| 1205 ТР РЕЕК (0%КО)‹<>99 ТНЕН 1Е 

ТТ 8$(1)- "ПРОВЕРЬТЕ СВОИ ИНВЕНТАР 

ть! *: 60 ТО 50 
1210 ЕР 80:9 АНО РЕК Р<>11 ТНЕЕ 

РОКЕ (0+9),0: РОКЕ (0+2), РЕБЕ 

| Р: РОБЕ (Р+2),0: РОЖЕ (Р+99}, РЕЕ 
Е (12+99)-1: ВЕТ 5$ (1)-"0. К. ОН С 
РАЗУ ЖЕ ПОГАС. ": 60 ТО 50 

| 1215 ЛР Н0-9 ТНЕН РОЖЕ (0+0), 0: 
РОКХ (0+2), РЕЖЕ Е: РОКЕ (Р+2),0 
: РОКЕ {Р+99). РЕЕК (Р+99)-1: БАШ 
РОНТ2Е 052 55: РЕТИР ТИК 5; "О, Е 
. №0 ОН ТИТ ХЕ ГАСНЕТ! !!": 60 50 

ТВ 8800: 60 ТО 100 

| 1220 12 КО:6 ТНЕЯ ВЕТ 6% 1)-"НО 
БЕЛЬ ОН НАДЕТ НА ВАС. *: 60 ТО 5 
о 


я ==} 


1230 РОКЕ (0*+Н0),РЕЕК Р: РОКЕ Е 
+99), РЕЕК (Р+99)-1: ЦЕТ 83 (1}="О 
.К“: 60 то 50 
1300 ТР Е0<10 ТНЕН 60 ТО 1350 
1302 ТР НО‹<>16 ТИЕН 60 ТО 1315 
1305 1Р (РЕБЕ Р:8 ОВ РЕЖЕ Р-9) Т 
НЕЯ ТЕТ 9$ (1) ="ДВЕРЬ СДЕЛАНА ИЗ 
ДОБРОТНОГО": ТЕТ К$ (2) -”ДЕРЕВА 
Я В ДАННЫЙ МОМЕНТ": БЕТ 5313)-"3 
АКРЫТА, НО НЕ ЗАПЕРТА. ® 
1310 1Р РЕЕК (Р+4):1 ТЫЕН ТЕТЕ 
$(3}="ОСТАЕТСЯ ШИРОБО ОТКРЫТОЙ. * 
1312 60 ТО 50 
1315 ТР 80‹>21 ТНЕН 60 ТО 1325 
1317 ТЕ (РЕБЕ 2:14 ОВ РЕЕЕ Е:15) 
ТНЕН ЕТ ©$(1} "ВОРОТА СДЕЛАНЫ 
ИЗ НЕВАХНОГО”; ШТ ©%(2) - "ДЕРЕВ 
^И В ДАННЫЙ НОНЕНТ”: ГЕТ Е (3) = 
“ЗАКРЫТЫ ИЗНУТРИ НА ЭАСОВ. " 
1320 ТЕР РЕЕК (Р+Т}=1 ТНЕН ЕТ Е 
$(3):"ОСТАЮТСЯ ОТЕРЫТЫНИ. " 
1322 60 то 50 
1325 ТР (РЕЕЕ 2-15 АКО (0-23 08 
80:18) АКО РЕЕЕК (Р+6}=1) ОЕ (РЕ 
ЕК Р-Т АБО РЕЕК (Р+5)-1 АНХ ВО-2 
8) ТНЕН 1.27 №%(1)-"ЗДЕСЬ ЯМА. Б 
УДЬТЕ ОСТОРОЖНЫ!"; 60 ТО 50 
1330 ТЕ ((РЕЕК 2:15 АЯ (80-23 0 
В #0-18)) 08 (РЕБЕ Р-Т АНО НО:24 
}) ТНЕН 1АТ ©$(1) - "ЧУВСТВУЕТСЯ 
ЗАБОТЛЯВЫЙ УХОД, ": ЦЕТ 2$ (2) ="НО 
НЕДАВНИИ ДОЖДЬ ОСТАВИЛ": ЕТ Е$ 
(3) :"РАСЕЕСШУЮ ПОЧВУ! “: 60 ТО 50 
1335 1Е ВО:22 АНО ((РЕЕК Р=7 АБО 
РЕБЕ (Р+5)=1) ОВ (РЕЕК Р=15 АМО 
(+6) =1)) ТНЕМ ЦЕТ © (1; = 
ДОВОЛЬНО ГЛУБОКАЯ ЯБА, ": ЪЕ 
Т 8$(2)="И ЕСЛН ТУДА СВАЛЕТЬСЯ, 
70... 1": 60 то 50 
1340 ТР РЕЕК Р:15 ЛИР НО=26 АБО 
РЕБЕ (Р+6)-0 ТНЕН ТЕТ В (1) -"БЫ 
ГЛЯДИТ ТАК. КАК БУДТО ЗДЕСЬ”: 1 
Т.в$ (2) "КТО-ТО КОПАЛ. ": 60 ТО 5 
о 
1345 60 ТО 1375 
1350 1Р (РЕЕК (0+Н0) <>РЕЕК Р АВР 
РЕБЕ (0+Н0)‹>99) ТНЕН ЕТ $1 
)="НО ВЕДЬ ЕГО РЯДОЙ С ВАМИ НЕТ! 
"; 0 ТО 50 
1355 ПР НО-1 ОЕ БО:8 ТНЕЯ БЕТ В 
И ертия ПЛЕД. ВЫГЛЯДИТ КА 
ЕТ #$(2)="”ИЗ ФРАНДУЗСКОЙ МЕ, 
Вен : 60 то 50 
1360 ТР 80-2 ОВ 80-9 ТИЕН БЕТ к 
$(1):"НЕБОЛЬШОЙ ФАКЕЛ, СОВЕРЖЕНН 
0”: БЕТ #$ (2) - "ОБЫКНОВЕННЫЙ НА В 
ВД. *: 60 ТО 50 
1365 1Р ШО=3 ТНЕЫ ТЕТ 8$(1)="ОН 
А АЮСТАТОЧНО ПРОЧНА, *: С0 ТО 50 
1370 1Р БО-Т ТНЕМ ЕТ #$(1):"ЧР 
© ЗА ПОДОЗРЕНИЯ! ": ТЕТ Е3(2)=°ОН 
НАСТОЯЩИЙ. СКОРЕЙ ЕГО": 1Е 
Т 2$(3)="И ПОКОНЧИМ С ЭТИМ ДЕЛОМ 
1"; 60 ТО. 50 
1372 ТР 80:6 ТНЕВ 1ЕТ КЗ (1) "НУ 
ЧТО РЫ ЕРУНДОЙ ЗАНИНАЕТЕСЬ!”:; С 
с то 50 
1375 ТЕТ 03(1)-"ВЫГДЯДИТ СОВЕРИЕ 
ННО ОБЫКНОВЕННО, ®: БЕТ 2% (2)-"НЕ 
Т НИЧЕГО СТРАННОГО. *: 


{500 БАНРОНТСЕ 058 55: РЮТЫТ ТАВ 
3; РАРЕЯ 2; "РИННИНИННИНННННННИН 

НИНИНЕ” 

1501 ВАМГОНТЕЕ 052 55: РРТИТ ТАВ 
3; РАРЕВ`2: ТИК 6; "А"; ТИК 7; * 

В ВАШЕН РАСПОРЯЖЕНИИ: °; ТИК 6; * 

с* 

1502 БАМРОНТТЕ 95Р 64958 
1503 ВЕТ НЕ:0 

1504 РОВ Х=0 ТО (НОВ-1) 


24? 


1505 ТЕ РЕЕК {РВЗ+Х?:0 ТНЕН ЕТ 
Х-ВОВ: 60 ТО 1512 Г 
1508 БАНБОМТТЕ 058 35: РЕТЫТ ТАВ 
3; РАРЕВ 2; НК 6} "А"; ТЕТ: 01 › 
$(РЕЕЕ (РВЗ+ХЛ); ТИК: "6": РУ 
НЕ=НЕ+1 | 
1510 ВЕХТ Хх 
1512 ТЕ НЕ-О ТНЕН РАНОМТОЯ 95 
55: РЮТЫТ ТАВ 3; РАРЕВ 2;/ ТИК 6 
"А"; ТИК Т: "НЕТ СОВСЕМ” НИЧЕГО 
*; ТК 6: *6" 
1513 РАНООМТТЕ 95Е 86 Рвтит ТАБ 
3; РАРЕВ 2; " 


ВВБВВР” 
1514 60 ТО 195 
1600 С15° _” 


1602 РЕТЕТ АТ 8, 2; "ХОТИТЕ ПОПРОЕ 
ОБАТЬ ЕЩЕ РАЗ?”; АТ 11, 8; "ВВЕДИТЕ 
У или =" 

1604 РОКЕ 23658,68: ТНРОТ А® 

1606 ТР А9-"у* ТНЕН АНТОМТАЕ 0 
52 65058; 60 ТО 100 

1608 17 Аз-"Ы" ТНЕМ С0 5088800) 
: 60 508 8800: со ТО 9999 \ 

1610 ВЕЕР .2,20; 60 то `1600 

1700 ВЕН ЗАЦЕСЬ 

1701 ВАНРОМТТЕ 038 55034 

1702 ©ь$ 

1704 РЕТЕТ АТ 7,0; ь 
АЛЯ ВРЕНЕННОГО СОХРАНЕНИЯ 
ПОЗИЦЕЯ В ПАМЯТИ КОМПЬЮТЕРА 
ВВЕДИТЕ *”В"* (ВРЕМЕННО) ® 

1706 РЕТИТ *^ . 
ДЛЯ ПОСТОЯИНОГО СОХРАНЕНИЯ ПОЗИ-| 
ЦИЙ НА МАГНЯТНОМ НОСИТЕЛЕ ВВЕДИ- 
ТЕ **П**. (ПОСТОЯННО) й 
1708 РОКЕ 23658, 0: ТНРИТ №8! 17 
А$<>*В". АБО АЗ<>"П” ТНЕН 60.70 | 
1708 ^ 

1710 1Р АЗ-"В" ТНЕЯ 60 ТО. 160 
1712 БАУЕ "ПАТА"СООЕ: 64130, 150 
171% 60 то 100 

1800 ВЕН ЗАГРУЗЕА 

1801 С15 

1802 РРТЕТ АТ Т.0; *. 
ДЛЯ ВОССТАНОВЛЕНИЯ БРЕВЕННО 
СОЖРАНЕННОЙ ПОЗИЦИИ ИЗ ПАНЯТИ 
ВББДИТЕ *"В*" (БРЕМЕННО)“ : 
1604 РЕТНТ '* ы. 


БВЕДИТЕ *"П*® (ПОСТОЯННО) ® 
1806 РОКЕ 23558, 0; ТНРОТ Аз; 2Р 
А$<>"В” АНР АЗ<>"П" ТНЕЕ 60 10 
1806 
1808 С1.3°: 
1814 
1811 ко 
1812 1ОАБ “ОАТА*СООЕ вл1з0. 150 
1813 ТЕК 6 
16814 ТР РЕЕХ 64130-90 тн РЕТЯТ 
АТ 12.0; 
ВЫ НИ РАЗУ НЕ СОХРАНЯЛИ ИГРУ. "** 
"НЕТ ДАННЫХ ДЛЯ БОССТАНОВЛЕНИЯ 
": ВЕЕР. .5;15: РАИЗЕ 150: 60 ТО | 
100. В | 
1815 РАНПОНТЕЕ 05Е 65096 
1816 60 ТО 100 
1915 1! РЕЕК 2:9 АН НО-1Т АНО.Р. 
ЕЕК (7*3)=0 АБО РЕБЕ (Р+11}:0 ТЫ 
ЕН РОКЕ {Е%3),1: РОБЕ (2+1:).1: 
ТЕТ #$(1)-"ОТКРЫВ ЕГО, ВЫ СЛЫВИ 
ТЕ ТЫХИИ®: БЕТ 8$(2)="ГОЛОС, ДОН! 
ОСЯЖНИСЯ ИЗ ГЛУБИНЫ”: ЕТ ВФ (3) = 
"БУЗЕТА: “"ИБЫРНИ ЕКАТУЛКУ": ВЕТ 
`` 8914) =°С ЧЕРДАКА Н УБЕДИНЬ, ЧТО 
БУДЕТ. ***: 60 ТО 50 г 
1917 1Р.РЕЕК Р-9 ЛИР НО-11 АБО Р 
ЕЕЕ (Р+3}:1 ТНЕЫ 1ЕТ 8341) -"БУД 
Ь ВНИНАТЕЛЬНЕЕ!": БЕТ’ ЮЗ (2) -"ОН | 
УЖЕ ОТЕРЫТ. *: 60 ТО 50 
1920 ТР РЕ 2-9 АНО 80-17 АВР р) 


17 А8:"Б" ТНЕН 60 ТО 


ЕЕК (Р+3)-0 ТНЕК РОКЕ (243), 1: 
БЕТ 9$ (1)=70. К НО ЧТО ТАКОЕ? ВС 
г и 03 о кк {033-99 
1925. ТР_ 80:3 в 
ОР РЕБК (0+3) -РЕЕЕ Р) ТНЕН ЪЕТ 
©$(1)="НЕСНОТРЯ НИ НА КАКИЕ УСИЛ 
КЯ": ТЕТ 8% (2}-"ОТКРЫТЬ ЕЕ НЕ УД 
АБТСЯ!": 60 ТО 50 
1930 1Р РЕЕК Р-11 АЯР НО-25 АК 
РЕЕЁ 1 Е+8)-0 ТНЕН ЕТ Е% (1) - "НЕ 
ОТЕРЫВАЕТСЯ! ЗАПЕРТ НА КЛЮЧ. = 
60 то 50 
1535 ТЕ РЕЕК 2-11 АНО’ НО:25 АКП 
РЕЕК (Р+8)=1 ТНЕЫ ТЕР №8 (1) -“ОН 
УЖЕ ОТКРЫТ! *: 60 ТО 50 — 
1940 СО ТО #5 
2000 1 ((РЕЕК РВ ОВ. РЕБЕ Р:9) 
| АВР 80-16) ОР ((РЕЕК Р-14 ОК. РЕЕ 
К Р:!15) АНО 80521) ТНЕМ [ЕТ 5$ ( 
1)="ОКАЗЫВАЕТСЯ, ЗДЕСЬ НЕ ЗАВЕРТ 
0!"; 60 ТО 50 
2005 ТЕ ((РЕЕК Е-6 ОВ РЕБХ. Е= 9) 
АНР НО-16 АНО РЕЕК (+8)=1) ОВ ( 
(РЕБЕ 2:14 ОБ РЕБЕ Е:15) АВО НО 
21 АО РЕЕК (РТ) =1) ТНЕН ТЕТ В 
$(1)="НО ВЕДЬ УЖЕ ОТКРЫТО НАСТЕХ 
Ъ!": 60 10 50 
2010 ТЕ РЕЕК Р-11 АНО 0-25 АВР 
РЕЕК (Р+8}=0 АНО РЕЕК (0+5):99 А 
НО РЕБЕ {1+9)=0 ТНЕЕ РОКЕ (+0) 
‚1: РОКЕ (+9),1: РОЖЕ (0+3).11: 
ЕТ 9$ (1) ="СЕЯФ ОТЕРЫВАЕТСЯ, (И 
ВНУТРИ ВЫ: ГЕТ 83 (2): "ВИДИТЕ ДЕ 
РЕВЯННУЮ ШКАТУЛКИ. “; 60 ТО 50 
2015 ТЕ РЕК 2-11 АО ВО-25 АБР 
РЕБЕ (7+6)=1 ТНЕН ТЕТ 8$ (1)=°А 
ОН ТЕПЕРЬ НЕ ЭЛНЕРТ!": 60 ТО 50 
2020 ТР РЕЕЕ Е=11 АНР НО:25 АК 
РЕЕК (Р+6)=0 ЛНР РЕЕК (0+5) ‹>99 
ТНЕН ТЕТ 2$ (1)-"ДЛЯ ЭТОГО НУЖЕН 
КЛЮЧ! ": 60 ТО’ 50. 
2030 ТР НО-3 АНО (РЕЕК (0+3) -РЕЕ 
КР ОР РЕЕК (0+3)-99) АН РЕЕК ( 
04+5):99 ТНЕН 1ЕТ $1) “КЛЮЧ 5 
ШКАТУЛКЕ НЕ ПОДХОДИТ. ": 60 ТО 50 
2035 60 ТО 45 
2100 1Р (РЕБЕ Р<>Т АБО РЕЕК Р<>1 
5) ТНЕН ТЕТ 8$(1)-"ЗДЕСЬ НЕЛЬЗЯ 
КОПАТЬ!": 60 ТО 50 
2105 ТЕ (((РЕЕК 2-15 АМО (50-23 
ОЕ НО-18 08 НО-22 ОВ 80-25)) ОВ 
(РЕЕК Е-Т АНО (№О-24 ОВ НО:22))) 
АБО РЕЕЕ (0+8)<>99) ТНЕН ТЕТЕ 
$(1)-"И КАК ЖЕ ЭТО СДЕЛАТЬ?": №Е 
Т 2%(2)-"ДЛЯ ЭТОГО НУЖЕН ПОДХОДЯ 
ЩИИ":. [ЕТ 0$ (3) - "ИНСТРУМЕНТ. ”; С 
о то 50 
2110 ТЕ РЕБЕ 2-15 АНО РЕЕК (+10 
)=0 АНР (Н0=18 ОЕ НОз22 ОВ НО-23 
ОЕ НО-26) ТНЕН. РОКЕ (+10), 1: 
РОКЕ (0+5),15; ГОЖЕ (2+6),1: ВЕТ 
В${1)--БЫ ИСПОРТАЛИ КРАСИВУ ЛУ 
ХАЙКУ": ГЕТ © {2)="ГЛУБОКОЙ ЯНОИ 
„ НО ВОТ ЧТО-ТО”: ЪАТ $ (3) = БЛЕ 
СТНУЛО,.. ЭТО КЛЮЧ: ": 60 ТО 50 
2115 ТЕ ((РЕЕК Р-15 АНО РЕЕК (2+ 
6)-1) ОВ (РЕЕК Е-Т АНО РЕБЕ (2+5 
}=1)) ТНЕН БЕТ 2%(1)="НЕТ, СПАС 
ИБО, БОЛЬШЕ НЕ НАДО!”: 60 ТО 50 
2120 ТР РЕЕК 2:15 АНО РЕБЕ (Р+6) 
=0 АВР РЕЕК. (0+4) -99 АНЮ (НО-23 
ОЕ Н0-22 ОВ КО-18 ОБ НО:25) ТНЕН 
РОКЕ (2+6), 1: ЕТ 58 (1) ="О. К, 
ВЫ ВЫКОПАЛИ ЯМУ В САДУ. ": 60 ТО 
50 АЙ 
'2125 ЛЕ РЕБЕ Е-Т АВО РЕЕК (7+5) = 
0 АЖ РЕЕК (0%) -99ЗАНЫ (НО-24 О 
® Н0-22) ТНЕН РОКА” (2+5), 1: 1ЕТ 
53 (1)="0.К. ВЫ В ПОЛЕ ВЫКОПАЛИ 
ЯМУ. ": 60. ТО 50 ? 
2130 60 ТО 45.” 
2200 1Р РЕБЕ (0*9):99 АН НО-9 Т 
НЕН ЕТ Р4 (1) "НОС ОН И ТАК ГОРИ 
1": 60 ТО 50 


ов н 
0:15) ТНЕЯ РОХЕ ГР, 6: 60 ТО 100 
19 


`ПЕРЬ ДБЕРЬ ЗАКРЫТА. *; 


2205 1Р №0-2 АНО РЕЕЕ (0+2}:99 А 
ВП РЕБЕ Р<>11 ТНЕН РОХЕ (0+2),0 
: РОКЕ (0+9).99: РОКЕ (2+2), 1; №, 
ЕТ 5$(1):"0.Х, ТЕПЕРЬ ФАБЕЛ ГОРИ 
Т,*; 60 10 50 

гг10 1Р Ш0=2 АНР РЕЕК (0+2):99 т 
НЕН РОЖЕ (0+2),0: РОБЕ (0+9), 99 


: РОКЕ {Р+2),1: ВАНГОНТЕ 958 55 

: РПИТ ТЕ 5; "О.К. ТЕПЕРЬ ФАБЕ 

Л ЯРКО СВЕТИТ!”: 60 50В 8800: 60 
то 100 - й 

2215 60 ТО 45 

2300 1: РЕЕБ (0+2):99 АБР НО-9 Т 

НЕН ТЕТ №$(1)-“НО БЕДЬ ОН НЕ ГО 

РЕТ!"; СО то 50 

2305 ТЕ 80:9 АНИ РЕЕЕ (0+9)-99. А 

УДО РЕЕЕ Р<>11 ТНЕН РОКЕ (0+9),0 

: РОКЕ (0+2),99: РОЕЕ (2+2),0: Ь 

ЕТ Е3(1)="О, К. ФАКЕЛ ПОГАС. *: 60 
то 50 

2310 ТР №О-9 АВО РЕЕК (0+9)-99 Т 

НЕЙ РОБЕ (0+9),0: РОЕЕ (0+2),99 

: РОЕБ {Р4+2),0: БАНРОНТЛЕ 058 55 


„$ РЕТЕТ ТЕК 5;"0. К. ФАКЕЛ БОЛЬЯ 


Е НЕ СВЕТИТ. *: 60 508 8800; 60 Т 
о 1:00 

2315 60 10 45 

2400 1Р РЕЕК 2:11 АНО (10-19 ОР 
0-14) ТНЕН РОКЕ Р,6: СО ТО 100 
2405 1Р РЕКЕ Р-6 АНО (№020 0 Н 
0=14) ТНЕН РОКЕ Р,2: 60 ТО 100 
2410 1Р РЕЕЕ Р-2 АНО НО-15 ТНЕН 
РОКЕ Р,6: 60 ТО 100 

2412 1Р РЕЕК Р-б АН КО-15 ТНЕК 
РОЕЕ Е,11: СО ТО 100 

2415 ТР (РЕЕК Р-14 ОБ РЕБЕ 2-15) 
АНР РЕЕК (Е+Т):0 ТНЕН ТЕТ 6$ (1 
)="ЭТО НЕСЕРЬЕЗНО, ЛУЧЕ ОТКРОЕТ 
Е"; ЦЕТ №3 (2) "ВОРОТА ИЗ САДА!”: 
60 то 50... 

2420 1Р (РЕБЕК 2-14 ОБ РЕЕК Р:15) 
АНО РЕБЕ (Р*7)-\ ТНЕН ВЕТ 94 (1 
›:" ЗАЧЕН ВАМ ЭТО ДЕЛАТЬЗ”: ТЕТ 
#9 (2) "ВЕДЬ ВОРОТА ОТКРЫТИ, *: & 

о то 50 

2425 60 10 45 

2500 ТР РЕЕК Р-2 АНО (НО:20 


2505 ТЕ РЕЕК Е=6 АНО (50- 
0:15) ТНЕН РОКЕ 64280, 11: 
100 
2510 С0 то 45 
2600 ТР (РЕЕК Е:8 ОК РЕЕК Е:9) А 
&О 30-16 АО РЕЕК (Е+4):1 ТНЕЯ 
РОКЕ (7+1), 0: ТЕТ В$(1) "0. К. ТЕ 
60 то 56 
2605 1Е (РЕЕК Р:14 ОВ РЕЕК Р:15) 
АВ ВО-21 АНР РЕЕК (Е*Т)=1 ТНЕН 
РОБЕ (Р*Т), 0: ВЕТ В3 (1) “О. К, 
ТЕПЕРЬ ВОРОТА ЗАКРЫТЫ. "; 60 10 5 
о’ ; 
2610 1Е РЕЕК Р=9 АВО НО-17 АН Р 
ЕЕК (Р+3)=1 ТНЕН РОКЕ (Е+3),0: 
ТЕТ 3 (1) -°0, К. ТЕПЕРЬ БУФЕТ ЗАК 
РНТ. *: 60 ТО 50 
2615 ТЕ РЕБЕ Е-11 АНО НО-25 АНО 
РЕЕК (Р+8)-1 ТНЕН ТЕТ Е$11) -"КА 
ЖЕТСЯ, ДВЕРЦУ ЗАЕЛИНИЛЮ!": 60 ТО 
50 р 
2620 60 ТО #5 
2100 ТЕ РЕЕК #-2 АНО 50-3 АНО РЕ 
ЕК (0+3):99 АНО РЕЕК (2*11)=1 ТН 
ЕН РОКЕ (0+Т),6: РОКЕ (0+6), 8: 
РОКЕ (0+3),0; РОЖЕ (+09), РЕЕК ( 
2+99)-1; ТЕТ 311) -"БОГ ЭТО ЕРОС 
ОК! 11": ЕТ 63(2)="ОТ УДАРА ИКАТ 
УЛКА РАЗБЯЛАСЬ. *; ЕТ 93 (3) - "ЧТО 
-ТО ИЗ НЕЕ ВЫПАЛО И БАЕСНУВ, *: 
ЪЕТ 28 (4) -"ПОКАТИЛОСЬ ПО ПОЛУ КО 
НЮЩНИ. ®: 60 ТО 50°. 
27105 ТР.РЕЕК Р=2 АНО ВО-3 АНО РЕ 
ЕК (0+3)=99 ТНЕН ТЕТ #8(1)-"Я Б 
Ы ЭТОГО НЕ ДЕЛАЛ. ": ГЕТ №%(2)=“Н 


ОЕ и 
‘во то 


` СТОРОЖНО! ЗАКОНАЕТЕ КЛЮЧ!" ; 


` 3102 ТР НО-8 НЕМ РОКЕ (0+1), 99 


НЫ 
АЛО ЕМЕ КОЕ-ЧЕГО": 
БИТЬСЯ © БУФЕТА!”: 
2710 60 ТО 1200 
2800 ТЕ ((РЕЕЕ 2:15 АБО РЕКЕ (+ 
6)=1) ОК (РЕЕК Р-У АНО РЕБЕ (+5 
7:13) АО РЕРК (0+8) <>99 АНО НО: 
22 ТНЕН ТЕТ 28(1)=*Н КАК ЖЕ ВЫ 
СОБИРАЕТЕСЬ 310”: ТЕТ 8% (2) -"СДЕ 
ЛАТЬ’ БЕЗ НУЖНОГО ИНСТРУИЕИТА! "; 
60 то. 50 
2802 ТЕ (РЕЕК 2-15 АНО РЕЕК (2+6 
7-0 АНО (40-22 ОЕ НО:26)) 08 (РЕ 
ЕЕ Р-Т АНО РЕБЕ (Р+5):0 АМО НО:2 
2) ТНЕН ВЕТ #$(1) = "ЫЕКАРНО ПОЛУ 
ЧИЛОСЬ!"; 60 ТО 50 
2805 1 РЕЕК Р-Т АМО 80-22 АО Р 
ЕЕК (0+4)-99 АБР РЕЖЕ (Е+5)=1 ЧН 
ЕН РОКЕ (Е+5),0: ТЕТ 2$ (1) = "О.К 
. ВЫ ЗАКОПАЛИ ЯМУ В ПОЛЕ. ": СОТ 
о 50 
2810 ТЕ РЕЕК 2:15 АНО ВО-22 АН. 
РЕБЕ (0+5)-15 ТНЕЯ ЕР 2$(1)="О 

сот 


| ТЕТ #6 (3) =" ДО 
60 то 50 


о 50 й 
2812 1 РЕБЕ Р:15 АНО ПО-га АНО 
РБЕК (0+4)=99 АНП РЕЕК (Р+6)-1 Т 
НЕЮ РОКЕ (Е+6).0; ТЕТ №3 (1) ="О, 
К. ВЫ ЗАКОЦАЛЯ ЯНУ”: БЕТ К$(2) =” 
В ОСТАВИЛИ НА ЛУЖАИКЕ”: ТЕТ Ю$(3 
°)="НЕКРАСИВОЕ НЯТНО!*: 60 ТО 50 
2815 СО 10 45 
2900 ТР РЕЕК Р=11 АЯЛ НО-25 АБР 
2902 (Р+8)-1 ТВЕН. ВЕТ © (3) ="НЕ 
ПОЛУЧАЕТСЯ, ДВЕРЬ ЗАЕЛО!®: 
о 50 
2905 СО ТО 45 К 
3000 12 Н0-1 АЗО РЕЕЕ (0+1}-99 Т 
НЕН РОЖЕ (041),0: РОКЕ (0+8), 994 
} РОКЕ {#+1),1: РОЕБ (Р+99), РЕЕК 
{Р+99}-1: ГЕТ 831} ="ОТЛИЧНО? О 
СВОБОДИЛАСЬ РУКА, *; ЕТ 9$(2)="Д 
А И ПЛЕД ВАН ОЧЕНЬ ИДЕТ. ": 60 то, 
50 
$005 1Р НО: АКО РЕБЕ (0+8):99 Т 
НЕН 1ЕТ 9311) ="ОН УЖЕ ОДЕТ НА В 


83(2)="ВЗЯТЬ ЕГО В РУБЕ. " 
50 

3010 60 ТО 45 

3100 ТР ВО:В АНП РЕЕК (Е+99) -КАХ 
ТНЕН ЪЕТ 2%(1)-"НЕ ВЫХОДИТ! ОБ 


: РОБЕ (0+8).0; РОКЕ (Е+1),0: РО 
КЕ {Р+99), РЕЕК (2+90)+1: БЕТ 83( 
17=*0.К. НО ПОЧЕНУ?": ТЕТ 63 (2) = 
“РАЗВЕ ВЫ К НЕМУ ЕИБ": ВЕТ 2$ (3) 
="НЕ ПРИВЫКЛИ?": 60 ТО 50 
3105 11 80: ТНЕН БЕТ ©${1)=*НО 
‚ЕГО НЕТ НА ВАС!"; 0 ТО 50 
3110 60 ТО 45 
3200 1Р РЕЕК 1:2 АНР (80:15 ОБН 
0-27) ТНЕН РОКЕ Е,6: РОВ Х--5 Т 
О 15: ВЕЕР .04.Х: НЕХТ Хх: РОВ Х= 
11.ТО -5 ЗТЕР -1: ВЕЕР .08.Х; МЕ 
ХТ Х; НЕЕР 1.-6: 60 ТО 100 
3205 1Р (НО-21 ОВ НО-б ОВ НО-5) 
ТНЕН ТЕТ +1) "0. Е. НО НИЧЕГО 
НЕ СЛУЧИЛОСЬ!": 60 ТО 50 
3210 60 ТО 45 
3300 1Е НО‹10 АН РЕБК (080) ‹>9 
9 ТНЕН ЕТ 8$ (1): "ПРОВЕРЬТЕ СВО 
И ИНВЕНТАРЬ! “; 60 ТО `50 
3305 ТЕ Н0-5 АНР РЕЕХ (Е+8)-0 ТН 
ЕН ЕТ $ (1) -"В КАК ХЕ НАДО ИСП 
ОЛЬЗОВАТЬ": ТЕТ 8%{2)-”ЭТОТ КЛЮЧ 
2": 60. ТО 50 } 
3310 1Е Н0-4`ТНЕН ТЕТ В3(1)-"ВО 
ДУМАИТЕ. .. - НАВЕРНОЕ, ": ТЕТ №3 ( 
2)="ВЫ ЗНАЕТЕ, ЧТО НОЖНО ДЕЛАТЬ" 
: БЕТ В%(3)="С ПОНОЩЬЮ ЛОПАТЫ!" ; 
60` то 50 
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| 3315 ТЕТ К$(1)="ЧТО ЗНАЧИТ “"ИСИ 
| ОЛЬЗОВАТЬ**® 12": ПЕР 2$ (2) -”НЕЛЬЗ 
Я ЛЯ УТОЧНИТЬ?"; 60 ТО 50 
теперь пришло время расшифров- 
ки некоторых клечевых моментов, 
пкоторые помогут Ван отсаеживать 
могику работы программы, 


Управаение адвентюрной игрой. 
БЕЙСИК-програмна управляет иг- 
рой с помошью следующих данных: 
вомер глагола (или команды} 
[61:20 
номер сушествительного 
(или напразаения} {80}; 
таблицы текущего 
располежения объектов: 
таблилы состояния. флагов. 


` 
прошлом номере *2х-РЕВО” мы 
рассмотрели параметры, залаваемые 
шри помощи строк ВАТА (Лист, 2). 
теперь, подводя итог сказанному, 
мы приводим полный перечень слов 
(Листингы 1 и 2), распозпаваеных 
программой, в виде двух таблиц, 
отдельно для глаголов и сушестви- 
И тельных (и прочих слов). Для 
‘каллого слова указан его номер. 


Анализатор текста. 


ФыЫ НАХОДИТЕСЬ м ДВЕРИ ФЕРМЕР- 
ского домя. дом сдЕЛЯнН ОЧЕНЬ 
ЖОБРОТНО и КРЕПКО, МЯК БУАТО 
хозясены выде от ЧЕГО скРы- 
вяться. 


© ПОЯЕ ВАШЕГО ЗРЕНИЯ: 
НЕТУ СОВСЕМ НИЧЕГО 


вый ДЕЙСТВИЯ 
›маты МА СЕВЕР 


зиати ма восток 

ДеЕРЬ зякрытя! 

внын СН 

роткоыть док 

©.К. ТЕПЕРЬ и 5кРЬ охкнытя. 
вным ДЕЙСТВИЯ? 

эмати нА восток * 


Система, анализирующая текст, 
‘цозволяет вводить до 30 символов, 
среди НИХ ногУт быть русские и 
шатинские заглавные буквы, цифры 
‘и символы. русские буквы набираю- 
тся непосредственно  буквевныйи 
илавишамн, за исключением Ч. Э. 
18; 3, Ю. Последние вабираются 
одноврененно с нахатием УВ. 5Н. 
клавишами А. 8, Е, ©, Х. Дия 
|"забоя”. послехнего введенного 
симвода используется клавива 
|"РЕТЕТЕ” илы "КУРСОР ВЛЕВО". 
Пригляатение пропедуры ввода 
изобрахается синволон >", а 
Курсор - в виде синвода “=”, 

‚ Бак уше говорилось, процедура 
построена такии образом, что ава- 
лизирует пробеды меяду сиовами, 
овыдедяя первое и последнее слово. 
Шервое слово считается глаголом, 
а последнее - сушествительным или 
направлением переметения. Поэтому 


АнадизатоР проснатривает вве- 
денныя текст команды и возвраша- 
пется в БЕНСЯК с числон УВ. соот- 
рветствуюмии номеру использован- 
фаого глагола и с числом #о, со- 
ответствуюмим вонеру использован- 
вого существительного. Любое 


Мераспознанное слово выдает в 


БЕВСИК число 200 `дия глагола и 
число 201 для сушествитеньного. 
Эта информация может обыгрываться 
в Бейсике как угодно, но в нашей 
демонстрационной нрограине приме- 
няется самое простое решение, - в 
зтом ‘случае пользователь всегда 
повучает ствет “НЕ ПОЛУЧАЕТСЯ”. 

. Есши ше Вы даете команду, со- 
стоящую из одного слова, напри- 
нер, “СВОТРЕТЬ", то за глагой Вы 
получите 8:4, а за отсутствие 
существительного - дойжны были бы 
получить Н0:201, что вызовет ре- 
акцию *НЕ ПОЛУЧАЕТСЯ”, хотя нан 
такая реакдия не нухна. для того, 
чтобы избехать подобных ситуапий, 
ны включаем глагол "СВОТРЕТЬ” н в 
список существительных тохо. ПРИ 
этом присваиваен ему порядковый 
номер 99 (см. Листинг.1. строка 
2190 и Табяииу_2}. 

Со всеми пругини  гааголаин 
«кокандами). которые когут ис- 
подьзоваться без сушествительно- 
го, надо поступить тем зе обра- 
зом. 

Возношен и другой вариант, ко- 
гда такому глаголу Вы присваивае- 
те номер не 99, а соответствующий 
тону сушествительнону, которое с 
этим глаголом обычно связано. В 
цемонстрациойной ‘програиме мы так 
ПостУНИЛИ Со словом КОПАТЬ - ему 
ирисвоен вомер 22 (см, листинг.г, 
строка 2192 и Таблицу_г}, потому 
ЧТО БОПАТЬ и КОПАТЬ ЯНУ - понятия 
равнозначные. поэтому пусть чита- 
тель, бросивший беглый взгаяд ва 
таблилы глаголов и сушествитель- 
ных без чтения текста, не упрека- 
ет нас в незвании основ русской 
грамматики. р 

Обрзтите внимание, что дая тех 
существительных, которые имеют 
длину, меньше заданной для иден- 

(4 символа) - 
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например, 
САД - 
тельной падехе, 


существительные ЯНА, 
залавать их надо В роди- 
то есть: ЯМУ (а 
САД, ПОЛЕ, СЕЯФ и т.д. ив РОди- 
тельвон и в иненительном падеже 


совпадают). Вэдь подаваеная ко- 
манла номет быть:  ВЫКОПАТЬ ЯНУ 
паи ОСНОХРЕТЬ ЯМУ или ПРЫГИУТЬ В 
ЯМУ и т.5. Если же допускать та- 
кие конаклы, которые потребуют 
такае и слова ЯМА, например, 
ПРОВЕРИТЬ, КАК  ВБЫКОПАНА ЯНА, то 
существительные надо задавать 
дважды: ЯНА и ЯНУ, но поисваинать 
им одинаковые вонера. 

Обратите такяе внимание на 
разнипу в использоваини некотор 
глаголов. Это, например, СМОТРЕТЬ: 
и ОСВОТРЕТЬ. Первый не относится 
к какому-либо предмету конкретно 
и подразумевает как бы оглядетьси 
що сторонам, при этон перерисовы- 
вается экраи и заново скавируется 
и отобразается табло “В ПОЛЕ 


может использоваться саностоя- 
тельно; ‘без существительного. 

угой глагол -`ОСНОТРЕТЬ - само- 
стоятельно непользоваться не о 
кет и’слузито пля получения каких-“ 
то дополнительных сведений © кон- 
кретном предмете, например, © 
ПОЛЕ,  ШКАТУЛКЕ, ЩЕПКАХ от 
когда она будет разбита и 


глаголы 
ОТКРЫТЬ и ОТПЕРЕТЬ. Учитывайте, 
ДВЕРЬ ин бить 


Таблица расположения объектов. 

Переменная © опрелеляет начало 
этой ‘таблицы, В ней находятся 
данные о ‘текущем расположений 50 
объектов, ‘Дая каждого объекта в 
любой момент времени здесь содер- 
интся ‹чисдо, определяющее номер 
локации. в которой в данный мо- 
мент наколится объект. 

Например, для объекта с `воне- 
Ром $ (ПЛЕД) Вы нохжете узнать его 
расположение конанкой РЕЕЕ (0+1), 
а измечить его состояние -  ко- 
мандой РОХЕ (0+1), Н; Здесь. "Н” - 
новое несто: тазнешения объекта. 

Если РЕЕК (0+%) 99, 


‚Есаи РЕЕК! (0+Х)=0, это значит, 
что объект в. данный момент ве 
виден. . 

[о коду игры Бейсик-программа 
вносит изяёнения в таблилу рас- 
положения объектов. 

Принер расмифровки логической 
КОИСТРУКИИИ: .. 

‹ 1Е РЕЕК (0+9) ‹>99. ТНЕН...: 
означает следующее: 

`ЕСЛИ.У ВАС ПРИ СЕБЕ НЕТ 
ГОРЯЩЕГО ФАКЕЛА, ТО... 


Таблида состояния. флагов. 
ое арфа Зеораибы ВМ 
Некоторые объекты имеют одно и 

чо же имя, например ФАКЕЛ В то 
время. когда это просто ФАКЕЛ или 
НАЛЕНЬКИЙ ФАКЕЛ, то это объект 
Номер 2. В то же время. если это 
ГОРЯЖИИ ФАКЕЛ, то это уже’ объект 
номер 9: Кроме того, по ходу игры 
могут происходить разные события 
не входящими ‘В 
отпира- 
Фиксация 
что интересующее событие 
произошло и т.д. Всё эти моненты 
отражаются в таблице Флагов. 
Переменная Г определяет адрес 
ячейки, с которой начинается эта 
табамца. В ней возможно  располо- 
зение данных о 100 объектах, при- 
чем некоторые Флаги зарезервиро- 
ваны дая особых случаев. 
Определяется состояние Фпага 
предмета Х командой РЕЕК (Р+Х), а 
изменяется командой РОКЕ (Р+Х), 7, 
где < - новое состояние преднета. 
По коду игры Бейсик-програмна 
вносит изненения в таблицу состо- 
яния Флагов. 
Флаг (Е+0}) содержит нонер  те- 


кушей докации - ‘то есть несто, 
где Вы сейчас накодитесь. Расшиф- 
ровка погическик констрУКЧИЙй › в 
програмие будет выглядеть так. 
Например; 
ТР РЕЕК Е=Т ТНЕН... 
означает следующее: 
ЕСЛИ ДЕЙСТВИЕ ПРОИСХОДИТ 
В ПОЛЕ ТО... 

Другой пример: 

4: "РОВЕР: 6 
означает: 

.: МЫ ОКАЗЫВАЕИСЯ В КОНЮЩНЕ .... 

‚ Фдаг (=+99) служит для отрале- 
ния количества предметов «(ИНВЕН- 
ТАРЯ). которые ‘герой имеет при 
себе в данный нонент. 

Пример логической койструкции: 

РОКЕ (Р+99),РЕЕК (Е+99)+1 
означает ни что иное, как то, что 
вы берете объект в’ РУКИ. ДРУГОЙ 
пример: 

ТР РЕЕК (Е+99)=МАХ ТНЕН . 
‘означает: 
ЕСЛИ У ВАС В РУКАХ МАКСИЯНАЛЬНОЕ” 

КОЛИЧЕСТВО ПРЕДИЕТОВ, ТО’... 


когда игра’ начинается, все 


„Флаги, за исключением (+0) имеют 


нулевое значение. В процессе иг- 
ры, когда герой надевает ПЛЕД, 
Фаагу (Е+1} присваивается  едини- 
ца, а когда он зажигает ФАКЕЛ, 
единииа присваивается Меса (+2) 
ит. в. 

Ниже приводится таблипа фла- 
гов, использующихся в игре. Зна- 
чение 1 присваивается соответст- 
вующену Флагу, если выполняется 
действие, показанное в таблице. 


есаи ДВЕРЬ ОТКРЫТА 
если ВЫКОПАНА ЯМА В ПОЛЕ 


если ВЫКОПАНА ЯНА В САДУ 

если ВОРОТА ОТЕРЫТЫ 

если СЕЙФ НЕ ЗАПЕРТ 

эсли ЕКАТУЛКА НАЙДЕНА 

есаи ЕЛЮЧ НАЯДЕН 

если БУФЕТ ОТКРЫВАЛСЯ 
ХОТЯ БЫ 1 РАЗ 

Е+99-Но - ЧИСЛО ВЗЯТЫХ ОБЪЕКТОВ 


Р+11=1, 


Если с этим объектом происхо- 
дит противоположное действие 
(дверь опять закрывается), сто 
Флаг должен обвуляться. Однако 
ногут быть ситуации, кфгла состо- 
яние одного объекта оценивается 
несколькими Флагани. Например, 
если ОТКРЫТЬ БУФЕТ в первый раз, 
то становятся в единицу два 
Флага: Р+3 и +11. Если теперь 
ЗАКРЫТЬ БУФЕТ, то сбросится Флаг 
2+3, а Флаг Е+11 так и останется 
в состоянии 1. 

Теперь можно проследить, как в 
игре формируются более сложные 
действия. Ситуация, когда зажига- 
ется Факел, например, моделирует- 
ся следующин образом: 

РОКЕ (Е+2),1: РОКЕ (0+2)-0: 

РОКЕ (0+9),99 


то есть, во-первых,  устанавлива- 


С о 
ется Флаг зазженного факела, 


а ааа 
риЕко ЗРЕНИЯ", Глагол СНОТРЕТЬ 


во-вторых, исчезает объект под 
вазваниеи МАЛЕНЬЕИИ ФАКЕЛ, в 
третьих - У Вас в руках' появияет- 
ся вовый объект: ГОРЯЖИИ ФАКЕЛ. 

Ситуапия, когда Вы кладете 
Горящий Факел, напринер, в саду 
{при этом он погаснет),  бущет 
выгаядеть так: 

РОХЕ (0+9),0: 

РОКЕ (0+2), 15: 
сначала исчезает объект ГОРЯЧЯИ 
ФАКЕЛ и обнуляется его Флаг, а 
затен в САДУ появаяется НИ 
НАЛЕНЬКИЙ ФАКЕЛ, 


РОКЕ (+2), 0: 


Теперь. когда Вы инеете `пред- 
ставление © том, как моделируются 
те или иные логические конструк- 
ции, можно проследить действие 
програмныы сначала. 


Денонстрационная програима. 

В строке 100 начинается прори- 
совка ИГРОВОГО экрана. Иа нем 
изображен только текст, так заду- 
нано в концепиии отаадочной сис- 
текы АБб. Однако ничто не мешает 
вам изменить 1000-вые строки так, 
чтобы, например, запускаася де- 
конпрессор, выводя в верхней тре- 
ти (или двух третях) экрана рису- 
нок локации. Эти экраны мохно 
подготовить, например, при псмоши 
компрессора, опубликованного в 
*2Х-РЕБЮ” Ш 3-4, стр. 61-63. 

Строка 102 выполняет подпро- 
гранму из большого блока строк, 
который начинается с0 строки 
7900. Описание локаций вводится 
обычным оператором РЕТЫТ в стро- 
ках 71600 + номер локации, умно- 
женный на 10. 
зависимости от комера 
РЕЕК РГ, Ддя АМБАРЛ (1 ЛОКАЦИЯ) 
будет 0 50В 7000, для ЧЕРДАКА {2 
ЛОКАЦИЯ) - 60 505 1010 ит. к. 
длина описания кахдой локации - 
не более 10 БЕЙСИК-строк. Калдое 
описание должно заканчиваться 
конандой ВЕТИРН. 

Строка 104 (вместе со строкой 
7110) обеспечивают реакцию про- 
грамны на событие, когда Вы попа- 
лаете в погреб без  ГОРЯМЕГО 
ФАКЕЛА. 

Строки 105-129 
проверку того, 
в этой локации. Есаи что-то есть, 
то эта инфорвация также выводится 
на экран в виде табло: "В НОЕ 
ВАШЕГО ЗРЕНИЯ”, Блок в иашинных 
кодах сам выповняет проверку 10- 
го, какие объекты следует объя- 
вить в этих ситуациях, а печать 
выполняют процедуры Бейсика.’ Вме- 
сто слов ножно вводить изобрахже- 
ние соответствующих предметов при 
помоши символов Уб-графики, пе- 
чатая их оператором РРТИТ прямо 


обеспечивают: , 


. поверх картинки. 


Процедура ВАЗПОНЕЕ 950 55 
(строка 195) проверяет необходи- 
ность и осуществляет скроллинг. 
экрана и должаа выполняться вся- 
КИЙ Раз, после того, как ировс- 
ходит перерисовка экрана. 


Далее, в строке 200, запуска- 


250 


что можно увидеть|` 


ется большая процедура в кодах, 
обеспечивающая сканирование кла- 
виатуры и печать на экране вводи- 
мых команд, а такхе их первичный 
авализ - “Анализатор. текста", о 
котором уже говорилось выше. ‹ 

Результатом работы этой проце- 
дуры являртся значения двух ячеек 
памяти: 64114 и 64115. В первой 
из ния содержится номер использо- 
ванного глагола, во второй - с7- 
шествительного (или направления 
перемешения). Они передаются в 
Зейсик-переменные в строках 202 и 
204. Номер глагола будет теперь 
Ув, а номер существительного - 
Но. 

Строка 208 разрешает. при 01- 
сутствии  ГОРЯЩЕГО  ФАКЕЛА в 
ПОГРЕБЕ только следующие дейст- 
вия: ИДТИ. ЗАЖЕЧЬ, ПОГАСИТЬ, 
ПОДНЯТЬСЯ, стоп, ИНВЕНТАРЬ, 
СОХРАНИТЬ и ЗАГРУЗИТЬ, 

Если В результате работы про- 
цедуры врода команды нё  заФикси- 
Рован ни один из доцустимых гаа- 
голов, то значение ячейки 64114 
будет равно 200. Аналогично, ес- 
ли в команде не зафиксировано ни 
юдно из заданных сумествительных 
| (изи направления перенешения), то 
значение ячейки 64115 будет 201. 
кав поступить в этих случаях - 
решать ван. В демонстрационной 
програим6 В этом случае строка 
228 адресует на строку 45, где 
выводится сообщение "НЕ ПОЛУЧА- 
ЕТСЯ". { 

Если глагол и существительное 
идентиФинированы, то дальнейшее 


Распределение производится в строке текста 


235. в зависимости от значения 
глагола: происходит переход на 
ПодпРогРамны обработки глаголов, 
Расподоженные в большом блоке 
строк, Который начинается со 
строки 1000. 

Поскольку наиболее вероятно, 
что Вы будете оформлять программу 
< разделенных экраном, нужно быдло 
бы вводить проверку на необходи- 
мость скродиирования перед тем, 
как печатать сообщение от про- 
граммы на экране. Чтобы избежать 
такой проверки. мы в денонстра- 
ионной программе оформаяен реак- 
щи программы в виде’ символьных 
2$ (1), 8% (2), 23 (3), 
8$ (4), которые печатаются с по- 
Мошь» главной печатающей процеду- 
Ры (строка 50). 


Обработка гаагопов. 

Кандая подпрограмна обработки 
глагодов должна иметь ве более 
100 БЕШСИК-строк. Номер первой 
строки определяется по номеру 
глагола: 1000 + номер глагола, 
унноженный на 100. Так  обеспечи- 
вается переход, вапример в случае 
идти - на СТРОКУ 1000, в случае 
ВЗЯТЬ - на строку 1010 и т.д. 

Вот полный перечень строк для 
соответствующих глаголов. 


3200 
ИСПОЛЬЗОВАТЬ. .. 3300 
Специфичной является подпро- 


грамма` перемешения, расположенная 
со строки 1000. На попадаем. на 
зее независимо от направления, во 
эсел саучаях предусмотренного пе- 
ния. В строке 1002 происхо- 
дит изменение номера слова, опре- 
деляющего перемевение. Так. ядя 
СЕВЕР вместо 10 получается зваче- 
ние 1, пля юг - вместо 11 - зна- 
чение 2 ит.д. Это необходимо 
для корректного дальнейшего вы- 
поднения программы в кодах. 

В строке 1005 выполняется сде- 
дующая проверка, Есаи Вы находи- 
тесь перед дверы к идете на вос- 
ток или находитесь в прихожей и 
идете на запад и в обоих этих 
случаях дверь закрыта. то вывод 
“ДВЕРЬ ЗАКРЫТА”. 

Строка 1010. Анздогичная про- 
верка аля ворот. 

Строка 1020. Если Вы пытаетесь 
‚идти В. поде, в котором выкопана 
яма илн в саду, в котором ныкопа- 
на яма, то Бы в нее падаете. в 
этом случае игра для Вас заканчи- 
вается. 

. В строке 1090 вывояняется под- 
программа в ходах. которая выпол- 
няет перемещение в другую локацию 
согиасно таблице допустиных цере- 
мешений. Бходным параметром дая 
этой процедуры является значение 
содержимого ячейки 64115 (оно бы- 
до занесено тука в строке 1002). 
ДРУГИМ параметрой иля этой пропе- 
ДУРЫ явняется значение  Фиага 
{Р+0), то есть текушая локация. 
результат работы этой процедуры 
возвращается такжё в ячейку 
68145, теперь там значение, соот- 
ветствующее новой локации. = Если 
хе там ноль, то это значит, что в 
направлении, которое Вы задали, 
прокола кет. Этст контроль произ- 
водится в строке 1092. В строке 
1093 происходит изненение флага 
тектшей локации - Вашего полоше- 
ния. Строка 1094 нозвращает на 
начало програкмы с новыми услови- 
ями - в новой локакии. 

Обратите внимание, что зацин- 
пивание происходит треня снособа- 
ки. Первый - если команда не вос- 
принимается - на строку 45 с вы- 
водом сообщения “НЕ ПОЛУЧАЕТСЯ”. 

- ва строку 56 - без из- 
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менения верхней части экрана’ - то 
есть без изменения аокации м ото- 
браления преднетов. находящихся в 
поде Вашего зрения. Третий  сно- 
соб - перекод на строку 100 (как 
при старте игры) - это перерисов- 
ка всего экрана (перехой в новую 
локацию. или команиа СМОТРЕТЬ). 
При этом также изменяется я тавло 
мы ПОЛЕ: ВАИЕГО. ЗРЕНИЯ: *. 


Примеры расшифровки. подпрограин. 

фри уйти ори оу 

Теперь, для примера, мы дадик 
расшифровку реакции программы на 
некоторые Ваши действия. потом Вы 
доллны будете продолжить эти рас- 
суждения для всех строк  програн- 
ны, есни хотите в деталях разо- 
браться в том, что происходит В 
разных ситуациях. 

Итак, например; строка 1100 - 
сюда ны попадаем и случае обра- 
ботки гаагола ВЗЯТЬ. 

Строка 1100. ваклаливает огра- 
вичение на попытку взять объект, 
не являющийся инвентарем (то есть 
инеюыий больший номер). к 

Строка 1105 недоумевает по по- 
воду попытки взять объект, ‹ кото- 
рый ухе накодится у Вас в руках: 

Строка 1110 удиваяется, ‘есан! 
Вы хотите взять инвентарь, кото- 
рый в принциие существует, но его 
сейчас пет в этой локацим. 

Строка 1115 возмущается, если 
Вы хотите поднять больше  объек- 
тов. чем это разрешено програм- 
мой. 

Строка 1120 радуется, есаи Вы 
берете в руки АЛНАЗ - это конеч- 
ная цель Важей миссии: 

Строка 1125 соглавается с, ›Ва- 
ки, если Вы берете остальные объ- 
екты инвентаря, которые не были 
зафиксированы в предыдущих  стро- 
как. | 

Крупным блоком является, блок, 
обрабатывающий глагод. ОСНОТРЕТЬ 
(ПРОВЕРИТЬ). Здесь проверка раз- 
ветвляется на несколько ветвей 


для ускорения анализа. 


Строка 1300 разделяет проверку 
на относяиуюся к инвентарю и про- 
чин объектам. 

Строка 1302 перехватывает про- 
верку двери. 

Строка 1305 отрахает закрытое, 
а строка 1310 > открытое (в сау- 
чае включенного Флага‘двери) сос- 
тояние двери. Строка 1312 зацик- 
ливает программу. 

Строка 1315 аналогично двери 
перехватывает проверку ворот, 

Строки 1347 и 1320 ‘аналогично 
двери отразают открытое или за- 
крытое состояние ворот (в зависи- 
мости от Флага ворот}. Посае че- 
го строка 1322 зацикливает про- 
гранму. к 

Строка (1325 предупреждает о 
выкопанной яме, есяи Вы ваходи- 
тесь в саду и осматриваете САД 
или ЛУХАЕКУ и при этом яма выко- 
пана (Флаг ямы. в саду - установ- 
ден) или Вы ‘нахопитесь в позе с 
выкопанной яной в осматриваете 
ПОЛЕ. | 

Строка 1330 отрахлет резуль- 


у ` или в поде, 
а нет ямы. 


в котором 


яиз или в саду, в которон выкопа- 
на яка. 

Строка 1340 - результат осмот- 
ра ПЯТНА, есаи Вы находитесь в 


Строка 1350 перехватывает про- 
верки тех предметов, которых нет 
Шв этой локации и нет у Вас. 
Строка 1355 показывает резуль- 
'|тат осмотра ПЛЕЛА или ПЛЕДА, НА- 
'ЧАЕТОГО НА ПЛЕЧИ. - 
СТРОКА 1360 - результат осиот- 
ра ФАЖЕЛА или ГОРЯЖЕГО ФАБЕЛА. 
Строка 1355 - осмотр ИБАТУЛЕИ. 
Строка 1310 - оснотр. АЛНАЗА. 
Строка 143572 - осмотр ЩЕПОК. 
‚ Строка. 1315 - все прочие слу- 
чаи, не предусмотренные  програм- 
оВмой., : 
№»: Подробную расшифровку некото- 


хете разобраться саностоятельно. 


Кодовый блок программы. 
. Эта инфорнация представляет 
‘}определенный ивтерес для “хакке- 
Пров”. Речь идет о блоке кодов 
"зтз4ет"СорЕ. В тон случае, если 
заланные в 
апрес загрузки 
[ - переменная ЗАУЕ - 
будет равен 63400. Этот блок за- 
‚яинает. пространство до 653608 (на- 
чало символов О0б-графики. стан- 
дартно располохенных здесь), Если 
распоз- 


имеет даину 1768 байт 
"Гинг.3} - мохете этот адрес и 
изменить. 

С адреса загрузки ЗАУЕ баока 
"зузчеш“СОГЕ расположены те дан- 
ные. которые были заданы в стРо- 
ках ПАТА программы АБЗ (вместе с 
листингом_2}. Здесь расположена 
таблица переходов между  локация- 
ми, как она была задана в 3000-х 
строках, групиы четверок симво- 
мов,  заданнык для идентификации 
слов ит. я, 
начиная с адреса 64000, блоки, 
Распопоженные здесь, имеют посто- 
янные адреса и не изменяют своего 
положения. 

Ячейки 64114 и 64115 язазются 
рабочими ячейками, в которых кра- 


Эмешения, 

С адреса 64116 расположена 
таблица данных, передаваемых че- 
рез эту область из програииы ЛВ 


аланы. 


в ибмойстрационную программу (см. 
СТРОКИ 9951-9960 Листинга_4). 

С адреса 64130 зарезервирована 
область размером 150 байт. Она 
служит пля временного сохранения 
текушего состояния игры, которое 
определяется таблицей таблицей 
состояния Фаагов (100 байтов) и 
таваицей текущего расположения 
объектов (50 байтов). сами эти 
таванды расположены с — адреса 
61230 (этому чисау равва. перемен- 
ная Р. а переменная © ва 99. бам- 
тов больше, то есть 64379). ^ Яче- 
йка 64130 - первая ячейка’ сохра- 
няемой  обаасти  - соответствует 
звачению флага (Е+0), зо есть те- 
кувей локации. Это чисао не но- 
хет быть равно нузю (не ‘бывает 
нулевой локации). При старте де- 
монстрационной програнны, В эту 
ячейку заносится ноль (строка 
9961 Листинга_4),  предохраняя 
таким образои от сбоя изи попытке 
загрузыть состояние, если оно не 
было прежде. сохранено. Эту ‘про- 
верку выполняет строка 1814 
листинга. 5. 

С адреса 64430 расположены 
процедуры в кодах, 

° роцедура по здресу` 64440 про- 
веряет необходимость и выполняет 
скропиныг экрана, ‘обеспечивая в 
заланны ‘пределах сохранение на 
экране Ваших конанд и ответов 
програмны на них. : 

Процедура по адресу 64495 
(строка 200) ‘-' анализатор текста. 

Процедура по адресу 61930 ска- 
нирует таблицу расположения `объ- 
ектов. выявляя те преднеты инвен- 
таря, которые находятся в текущей 
локакии и видны (строка 105. Лис- 
тивга_4). р 

Процедура по адресу 64968 
{СТРОКА 1502) выполияет анадогич- 
НУЮ операцию для того инвентаря, 


который находится у Вас в рукак 


(или на Вас). 

Процедура по адрес’ ‘65005 
(строка 1090) - пропедура переме- 
вення. 

Процедура по адресу 650568 
«строка 9980 Листинга_4) выполня- 
ет инициадизирующие действия при 
старте програнин, в частности, 
обнуляет 150-байтную область с 
адреса 64280 - табзицу флагов, 
заносит значение стартовой `лока- 
ции в таблилу флагов (Р+0) а так- 
хе исхоцаое расположение объектов 
в таблыце текушего расположения. 


Создание собственной игры. 
и розовые 

когда Вы отладите программу и 
демонстрация заработает, перед 
Вани встанет слелующий воирос: °А 
как мне ваписать свою игру?” 

Во-первых, прехде чем  присту- 
пать к созданию собственной игры, 
прогоните денонстрацию и внина- 
теньно изучите все детали. Во- 
ВТОРЫХ, даже и не’ нодколите к 
компьютеру, пока ‘твательно не 
продунаете сценарий своей игры на 
бунаге. Вы должны по крайней мере 
разработать карту и разместить на 
ней все участвующие в игре объек- 
ты с указанием, 


` грани, 


к какому типу они . 
Ко 


иными словами, то, 


нетим, 


С чего практически начать? 
Посмотрите на ‘ Листинг_4 «. 
кроме блока Строк с 1000 - это 


собственной игры. осталось только 
добавить (или изменить инеющиеся) 
СТРОКИ, отвечавщие за закрытые 
мили запертые двери, освешение, 
НОоНСТРОР И разные ловушки,  кото- 
рые будут в Вашей ирре, Эти изме- 
нения надо ввести в блок перёме- 
шения - со СТРОКИ 1000. 


Скорость работы и объем памяти. 
эм оны мин мии ми нии иты ню ни м ® 

При создании собственной игры 
разнер занимаеной паняти может 
стать критичным. Несто, 


расширить, 
набор в сторону старших адресов, 
но так, чтобы он не наложился на 
блок кодов “зузфет"СорЕ, об этом 
узде говорилось несколько выше. 
Практически для этого надо изме- 
нить параметры оператора СЬЕАЕ и 
изменить адрес загрузки символь- 
ного набора ”снг"сорЕ, надо так- 


нить значение  СНАЕР$. 
в строке 20 Листинга_3. 

ДРУГИН решевиен бывает замена! 
часто’ встречающихся чисен пере- 
менными. Например, О и # постоян- 
но встречаются в листинге. Поэто- 
ну, например, если присвоить: ГЕТ 
Н-0: 


памяти. Числа 0 и 1 ногут заме- 
няться иначе. 0'- МОТ рт, а1 -| 
Э6Н РГ. В то же время, если этот 
подход довести ло неразунных пре- 
делов, он может сказаться На 
скорости работы програмны. 


Структура подпрогРамин. 

Подпрограмма “ПРОВЕРИТЬ” или 
^ОСНОТРЕТЬ" /по-видинонУ, У Вас 
будет одной из крупнейших подиро- 
но мохно ускорить время ее 
работы, есди разбить ее на нес- 
колько блоков. Так, например, это 
делает строка 4300 в денонстраци- 
оиной программе, разветваяя ис- 
поянение в зависимости от номера 
объекта по разным ветвям. Но и 
дальнейщая разбивка этих ветвей 
тоже возможна, 
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Пробаемы БЕТТИ, 


Внимание, друзьй! Вы представ- 
аяен Вам нашего корреспондента из 
Азькетьевска - Абдрахианова Рус- 
лана. Впервые ны приводик  свиде- 
тельство пилота, который лично 
видед РАККСИУ. 
| А начиналось все с “"7Х-РЕВЮ". 
Руслан начаа выписывать его толь- 


й тайнан “5рессу”, 
поззоливмин заглянуть дальше, чен 
1ОАБ и РГезз апу Кеу. 

| КОРР: ‚.. До недавнего времени 
програнна ЕБТТЕ меня не интересо- 
вала: паутинвая графика. накакого 
звука, непонятный сюжет. Но посде 
Гоубликации "“Тье рагк Моее1“ все 
переменилось. Я стал отчаянно 
воевать. искать при- 
После рейтинга Сошре- 
вет дедо застонорилось. Но тут 
вмешался случая. Шо воле  прови- 
Вдения я пашел планету РАХХЬА!:! И 
вот, как это произошло. 

...На последние деньги я купил 
йпгалактический гипериривод и стар- 
товал с "’планетн 1АУЕ. На экране 
пошлин ‘ковцентрические кругн и 


но программа не сброси- 
переход продолхался. очу- 
‘тился я у планеты ИВА. Правление 
-. диктатура. Желая  посиотреть 
карту, я нахал “0” м тут узидел, 
что нахожусь в галактике без но- 
мера, а около меня нет ни одвой 
паанеты, кроме БАХХА! Пред- 
ставьте себе мои чувства!! 

ИФК; Это представить невозмох- 
во, это надо пережить Кстати, 
уважаемый Руслан, в пылу перели- 


Раккслы. Это является косреяным 


состоящими не только из стандарт- 
ных слогов. Очень коропю. что Ва 
запокнили назвавиз этой званеты. 

КОРЬ: .,Я сразу гонял, что 
надо записать результат, но для 
1 этого привлось пробиваться на 
устанцию планеты ОБВА. У ное был 
паысокий технологический уровень - 


10, но, ‘тен не менее. космос 
Пкишел пиратами. Меня бесконечно 
атаковали “Фер-де-Лэнсы”, ° хотя 


статус у меня был чистый. кроме 
них там были "Кобры" и астероиды. 
} С ТРУдОН пробившись ва став- 
цию, я обнаружил, что к продаже 
‘тан имелись только золото и ради- 
сактивные натериаль, причем все 
это по очень высоким ценам. Я ко- 


ленту, но, как потом выяснилось, 
безрезультатно. Этот баок ‘ока- 
заася длиной всего 99 байтов и 
никуда не пошел. 


- А на Ракксау меня ве пустили, 
выдав сообщение *Нурегзрасе, 
Икаляе?”, хотя топлива было ват 


На карте галактики я 
обнаружил, чтс она заполнена все- 
‚го наполовину, вот так: Иа 


Брестиком отнечено несто, 
был я. 

остается добавить, что`я поль- 
зэюсь версией №128, а гипердрайв 
был у меня установлен переи. отле- 
том на планету 0170. 

Я не утверждаю, что всем надо 
взламывать свои блоки питания, но 
нозет быть ной случай кону-нибудь 
поножет. 

ФК: Спасибо, Руслан за инте- 
весмый отчет. Нан кажется, что Вы 
грамотно и четко держали себя в 
этой экстренальной ситуации и 
спелали все, что могли. ° Наконеч- 
то у Нас появилось хоть ‘косвен- 
ное. во свидетельство. Екияствен“ 
ное, о чем стоит пощалеть, так 
это ‘© том, что Ба ве прислади 
распечатку отгрузенного блока. 
Хоть в нем всего лиюь 99 байтов, 
но он, тен не менее, ног бы быть 
весьма интересен. по-крайней ме- 
ре, по содержащимся в вен кодам 
полно быно бы попробовать восста 
новить эту нензвестную галактику 
и попробовать по ней полетать, 

Будет очень обидно, если у Вас 
этот блок не сохраннася. 

КОРР: У меня есть просьба к 
экспертам, Я был бы очень рад 
прочитать что-то о программах 
*ОБТЬБЕВ", *ТАТ-РАИ®. “ВЕАР 
НЕАР", “НОБТН & 500ТН”. ЭТИ игры 
многоуровневые и разобраться с 
ними начинающему пока ве под 
СЛУ. 

ФК: Очень многие, 
попробовать свои силы, сврашивают 
нас, какие игры ны ногли бы поре- 
комевдовать пля ^ исследования. 
Просьба Руслана - достойвый ответ 
на такие письма. 
ииниинихияичкиниккичанимиикициюнии 


где 


желающие 


Поклонник незабвенлой. ЕгТТЕ, 
пилот Дн. Егоров. из Уфы (РАНСЕ- 
2005) подсказывает тем, кто имеет 
статус РОСТТТУЕ и ие модет закон- 
вым образом совервить посадку на 
станпию Став невидимым с помошью 
СЛОАКЛЯС ПЕУТСЕ, Вы сиожете обна- 
НУТЬ офицеров службы безопаснос- 
ти, 


Яким ини кииы и ивиенкимыимикиии 
Нам пимет Владимир Бакаев из 
г. Челябинска. 


Заравствуйте! 

Вчера впервые прочитал выпуски 
2К-РЕВЮ" 1991 и 1592 Ю. И ОТКРЫЛ 
пия себя, что "Эпитой" уваекся не 
я один. Ной рейтинг "Сотрефейи”. 
стах - 5 месяцев. Прочитав о том, 
что Вы просите писать обо всем, 
что встречается з этой игре очень 
редко, спешу сообщить 96 однон 
происшествии. 

Решив как-то начать с пуля, я, 
загрузил свой корабль ва 100 Сг и 
с ТАУЕ отправился на 7АОНСЕ (из- 
вините. эту планету пишу по памя- 


ти}, 
станции и стал к ней прибяихать- 
ся. Вскоре она появилась на экра- 
не. Но вид был нРобычным. Обычно 
это. сначада точка, которая, пой 
мере прибдихения становится эра: | 
щахщинся додеказдром. А это была] 
вертикально стоящая черточка. Я 
начал думать, что это корабль по-\ 
кодений. т.к. разнеры его огром- 


ны. Но сигнал "3* мел от него. 
Подлетев поблихе, Я увидел, что) 
"это”. ‘цокохе на’ брусок. 
"оао 
И, В 


| 


На вевхней грани. по  диаговали| 
- аиния. Подлетев очень близко, я 
решил обаететь вокруг. Но не тут-! 
то было. Корабль ной был разрушен! 
(никаких сообщений). 

опять вылетев с ГАУЕ и подле- 
тев к “2ЛОНСЕ", увидел ту же 
картину. Подлетев близко со сто-| 
роны веркней грани и не рискуя! 
онять взорваться, в последний Ко- 
мент решил вдететь в черточку по- 
стеди нее. {Была надежда, ‘что. это 
вход в станцию). И это мне 4я 
надеюсь удалось). Но.так как на- 
невр ие был подготовлен, то, ^за- 
девая стенки тоннеля, корабль, | 
истошив. энергоблоки, был разру-! 
шея. 

Больюе эта станция мне не? 
встречалась. Буду рад, если кто-| 
нибуль встречался с ней и знает, | 
что это такое. | 
инивииииикининииниииникиикииихник 


В "7Х-РЕВЮ" Н5-6 за этот год] 
наш читатель из Носквы Т. Н, Кан-! 
разе понросил. осветить недавао| 
появившуюся програниу АлтТЕ-г. 
Ему не уУдалось- ‘установить 
ней существенных отличий и о 
очень напоминает "версию-3" ‘поё 
классификации ' (Н3-4, 1992); даяр 
прояснения ситуации ив алресова- 
Ни этот вопрос к нащин читателян, 
Ответ послеловаа незанедлительно, 1 
тоже из Москвы, причем кажется, 
что из невинного вонроса нашегой 
читателя рождается новое и иите:1 
ресное направление исследований. | 
Вот, что пишет Алексей Лашиив| 
(АЗАРЕ 3984.) 


КОРР: Недавно, копаясь в новых 
демонстрационных програмнах, Яя 
обнаружил несколько выпусков но-\ 
восибирского электронного журнала\ 
ТЕГЕЗНОУ. В первом хе номере я 
нашел нечто `сенсавнонное. Мне 
удалось’ выташить зту статью ‘с 
диска’ в ‘текстовый редактор, ‘ней 
трогая содержания. брал, 
опечатки и характерные оюибки: На} 
авторские правая, конечно жё не 
претендую, но не послать ее Вам 
было невозможно. Привожу ее пели- 
ком. 

8ФК: Мы свидетельствуем своей 
гаубское уважение редаклии и со- 
здатедям ТЕБЕЗНОЫ и с ралостью бы! 
вошли в контакт с нелью установ-} 
дения взаимовыгодного  сотрУДдНнИ- 
честла, но, не зная адреса редак- 
ции, обречены на ожидание возмох- 
вого контакта, Вдруг до них до- 
идет это наше обрашение, 
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\ Приведенная визе информация 
жиляется Фактически рекланой про- 


отлично знает свое дело, 
только нет иооргинат, 


маятесь. Вы не будете разочарова- 
ны. У нас созданы дистрибуторские 
сети м они могут вам помочь. 


вии ТЕ г (48 1) ине 


Вы нохете продолжить свою бое- 


‚.е выдачи янлотекой пидензим 
фа планете АУ в гаязктике 1. В 
дюбон случае первоначально у Вас 
имеется то’? же корабиь Кобра-ИЖзЗ. 


В этом рекламном дисте 
приводятся вкратце лизь отаичия 
вовой версии, 

действие игры ЕГТТЕ-2 происко- 
дит в 3192 Году. Галактическая 
Федерация по-прежнему использует 
высоконадежные орбитальные стан- 
щин. тина “Сог10113“, ‘во тецерь 
нови обязательно оборудованы тсо- 
верменствоваяными средствани на- 
барщення и опознавания. Это озна- 
что в виду базы можно бес- 


эрагов Федерации: Таргонов, 
зарушителей. На базах разме- 


хак кто-нибтдь покидает станцих и 
уходит в гипериространство, Броне 
а *Сог10113°" обязательно ие- 


й которые в вобой нонент 
‘готовы обрушиться на голову 2г- 
атаковавшия ставлию нам 


используя 
Ракеты и прочее оборудо- 
подобное тому, 


хадность охотников. 


скаюмикся на собирательство обдон-‘ 


ков и коптейнеров - для того, 
чтобы оторваться от погони, 
Применение устройства иневнди- 
мости теперь не является панадеей 
}- так же, как это делаете вы са- 


‘вов, 


другие пилоты пытаются ПоРа+ 
зить невидимого противника, ис- 
пользуя локатор м 
<систену наведения’ ракет, о празда, 
вероятность попадагия по иевдии- 
хе. значательно ниже, 

В пространстве Вы молете 
встретить все старые. корабаи: 
Аз?, Рег ве 1аюсе, соьта. РИШОп,. 
Узрег, 51емаиаег, додег. Кга1\. 
Тьагаой@. Кроме того, начаяи вы- 
пускаться новые корабли классов 
беско в Навьа, а ТазРоны приняли 
на воорудекие новую разновадность 
корабля вторкения - с шестью гра- 
вяви, получивший среди охотников 
усаовиое вазвание Тагяс!4-6. 

Станщий во время технического 
обслузизания в обязательном по- 
рядке спабтают все корабли новым 
оборудовацием. Все корабии класса 
соъга, в тон чисае и Вам. понуча- 
ют новый докатор (вкаючаетсл по 


Новый зохатор ван- 
более полезен в блимнем 600. и 
прекрасно дополняет старый. В 
неззвездисм пространстве. новый 
компас автоматически переключает- 
ся В режим гирокомпаса и показы- 
вает стороны света Н-5. У-Е. 
соответствуютие  северу-югу, за- 
палу-восток? в карте галактики, 
позволяет орментиро- 
ваться в неязвездвон пространстве 
и совервать перелеты от одной 
планетной сыстены к другой без 
гивероерелодов. на з-двегателе. 

В предела планетной снетеиы 
новый кокпас в режние 1 работает, 
как и прехде, показчвая вачравле- 
ние на мланету, а р режиме 2 на- 
чывает поперененно показывать па- 
праваение Сонице и на планету. 
В частности. это очень удобно м 
повезио для быстрого поиска пояса 
астероидов, который обычно  начи- 
нается на достаточно большом уда- 
аёнын от Соднда. 


Тежнойогическия прогресс иг-. 


остановим и на вяавнетах уровия-15 
Вы уле можете купить бирег-Газег 
{33000 СГ). Кроме того, на эксие- 
винентальных дробных станциях, 
располохенныя облизи солия в пла- 


но 06 этои будет сказано нихе, 
раздеше, посвященнон новым мисси- 
Произошии кое-цакче изменения 
во внутренней и в экопокической 
политике, Баыду готовящегося кру- 
пнонаситабного вторшения, Тарго- 
Федорания решила легаямзо- 
вать торговлю оружием - Р!гезгиз 
перестали быть запрещенным това- 
РОИ. И 
Полидлейские корабли - неприко- 
свовенны. уничтоление поячлейско- 
Го. равно как и уничтожение орби- 
тальзой станции. — приналаехашей 
Федерации, преврашает Вас в нару- 
шителя номер 1. В галактиках 2-8 
таких нарувителей встречает ёбли- 
зи плаяеты полищейский кордон. 
Бак вн прекие, вам могут быть 
выданы специальные чиссии: по 
спасению беженцев. со  станлий, 
солнце которых преврамается в 
Новую, по уничтожению корабая-не- 


ЗЛОКТРОННУЮ - 


` релет в любую галактику - 


Бидиики # го ничтоЕинЫ базы, 
зажвачениой Тарговами. Но, кромке 
этих трея миссий (которые в вовой 
игре могут повторяться неодно- 
кратно}, добавлено несколько ко- 
ВЫХ. ) 

Миссия-1 -‘"Напега: 14". в 
паанеткых систенак ча гдавеоу ци- 
агонали галактакя в поясе астеро- 
Идов Бы мошете, разрабатывая ас- 
тероиды, подобрать необичные объ- 
екты - “икноральнтю аизнь”. Ках- 
вая, тонна породы, солдерхажей *хи- 
вые кристаллы”. нодет быть прода- 
на за 1000 Сг. Однако, сужествуют! 
особые условия пля сохранения 
жизнеспособности этях привередли- 


поэтому их нельзя про- 
дать в койичестве 1 Ели 2. тонн 
онноку покупателю, , ` 
В момент выпоянения гиперцере- 
хода они питаются  драгоценники 
канешкаий из пашего севфа, съедая 
по 1 гранну за каздую тонну хнво-ь 
го груза. й если скольких-то ка | 
ратов драгопенного сосна ик не 


спасеныю беленчев или пои достав- 
ке резепи”а. 
миссия 5 - "лед Солинег”, 
увичтохиз корабль  Таргонов, 
иозио подобрать контейнер, 


заптскать имеющиеся 

АНеп 14ешз вместо ракет. 

пуска исвользуются клавяши "Р»Р®, 
но этот выд орукия эффектизен 
только против саних де Таргонов. 

Следует добавить, что, Алей 
сошрилег обеспечивает ее и авто- 
натический возврат  завушенныя 
А11еп 11е08 на борт корабля после 
угичтовения поля. 

Нисскя 6 - *Кобра Ма”. В паа- 
нетных систенак за главной диаго- 
нали галактики вблизи солнц рас- 
положены спаренные станции “Кори- 
©слис” - это эксперишевтаяьные да- 
бораторин Федерации, При поилете 
к нын, Вам предлагают купить ко- 
рабаь класса “Кобра ИК-4*. Одна- 
ко, добраться сюиз ‘не просто. 
пногочисленкые корабли, в основ- 
НОМ ЭТО АЗР’Ы и беско ведут здесь 
ожесточенные срахения м без эс- 
корта А}1еп 14еюз делать там не- 
чего. 

от сопровождения следует во- 
время избавиться. 


корабля требуется 250000 Сг, 

он стоит этого! иней кобру нка, 
Вы нохете куныть до 4-х устройств! 
сразу. Причен покупка четырех 
Тагае Сагао Вауз увеличивает гру- 
зоподъенность до 80 тонн, а по- 
купка нескольких Екоегву ^ Аз 
пает соответствующий рост скорос- 
ти подзарядки энергетических от- 
секов. На кобре иКа возножен це- 
доста- 


‘точно нажать номер галактики от 1 
цо.8,. пока идет предстартовый, 
отсчет. Лазеры на новой Кобре. ус- 
|тановиены на поворотном лафете, 
на *горбу“ корабля; В любой мо- 
1мент Вы можете повернуть лафет по 
‘часовой стрелке (САР$ + А) и по- 
ставить на нухный экран нужный 
Вам дазер. 

При нажатии клавиши "/* даже и 
|ври’ надичим поблизости большия 
масс достигается ``’ значительное 
‘увеличение скорости’ и маневреи- 
ности Кобры КЗ. 
| Миссия-Т - "5расе маг". в те- 
чение более, чем столетия Таргоны 
‘готовились к войне с цивилизован- 
ными галактиками. Их эскадры 60- 
1роздили мехзвездное пространство, 
|и лимь изредка их корабли появяя- 
ваись на границая планетных сис- 
тем. Совсем недавно армада кораб- 
лей вторжения вновь пыталась за- 
хватить орбитальную станцию Феде- 
Грация, но благодаря ° отважнону 
1конмандеру база была взорвана и 
угроза нашествия приостановлена, 

Не вот наступил. час Икс`и Тар- 
'гоиы начинают крупномасштабное 
‘торжение в одну из галактик: 


Каждый раз. когда Вы получаете 
сообщение ”НАУРАУ! батасл1с Ч 
область, завваченная 


аргонами, увеличивается.  Плане- 
тарные ‚системы, находящиеся в со- 


‘обозначаются как КЕЗТУТИИС. ‹ Сис- 
темы, в которых сопротивяение по- 
даваено, а орбитальные станции 
захзамены Таргонами, = отмечены, 
й На’  оккупированинных 
планетах Флот Таргонов организует 


|гиперперелеты нехжлу охваченными 
погнем планетами становятся опас- 
чыни. Неззвездное пространство 
‹зашолнено эскадрани Таргонов, ие- 
рехватывающими корабли Федерации. 

Вы монете остаться посторовнии 
'мабаюдателем, но если Вы настоя- 
щий патриот Федерации, то непре- 


пес добровольных зашитников. 
Сделать зто можно на. любой во- 


и выдается первая 
эвакуация гралдданскик 
лид, раненый и беженцев из воюю- 
щих (КЕЗТОТТНО) систем. После то- 


оно присваивает Вам 
капитаи и дает задание 
‚по доставке орузия и продовольст- 


так и целые 


чтобы 
преодойет кордон из корабией Тар- 
гонов и прорваться к закваченной 


ныи базе. Взие на форт. десантаый 
корабль тива 514емлодег.: Вы доя- 
хны булете добраться до базы 
Таргонов и высадить десант. ^ При 
этом Вы пе сможете. использовать 
А11еп сошриег, Т.к — ГРУЗОВОЙ 
отсек занят десавтным кораблем, 
Не сножете использовать‘ и ракеты, 
вместо них запускается десантный 
корабль. С 

Запуск десанта следует. выпод- 
нять с как нозно более баизкого 
расстояния к базе, Чтобы до теде- 
портапии чёрез сиаовое поде стан- 
ций его не успели расстрелять 
Таргоны, оборонающие базу. Сразу 
после, успешной высадки. десанта 55 
нохете. сани телепортироваться на 
станцию, включив росктие Сомрифег 
- база уже контроаируется . силами 
Федерации. Чем гиубще в тыл Тар- 
гонов. Вам удастся высадить де- 
сан, ‘тем боаьшее козичество ‘ок- 
купированных планет выйдут из-под 
контроля Таргонов. 

Последняя; ‘предлагаеиая ‘Ван 
внесте со  знаииен’ подполковийк, 
миссия состойт в поиске командной 
базы Таргонов; ‘расположенной гие- 
то В глубикая космоса, 
лет Ван сообщить лийь  приблизи- 
тельное название планетной‘ систе- 
ны, на расстоявыи н несколько 
световых лет от которой находится 
эта база. Такое же задание дается 
всем пилотам, поступивюхы на слу- 
жбу добровольно. В принциие, ис- 
код войны ухе предрешен,  пивили- 
зованные гадактики р в 6230- 
пасности. 

Следует отнетитьь 
вольны ноюют на своих собственных 
кораблях, которые восружаются на 
собственные  сберезе: но при 
этом они в значительной стовени 


остаются самостоятельными в выбо-. 


ре нарарутов движения, действиях 
ити. 
* " * 


КОРР: И в завершение, нес- 
колько коинентариев от новосибир- 
цев: 

Бо-первых, программе требуется 
дисковод. Это связано с тем, что 
программа сильно защищена. ..... 
(строки письма корресповдента с 
соображенияни © 
подходе к копировавию програвныы 
опущены по извествым причинаи. .}. 

Во-вторых. в программе сушес- 
твуето еше инохбство тонкостей, 
которые Вы сами сразу же найдете. 
Есть и еше некоторые "веши", © 
которых Вы узнаете. поиграв при- 
личное врекя. 

В-третьих, програние требуется 
очень узкий список аппаратных и 
ПрРОГрамнныхЕ средств. Так. автора- 
ии сообщается о необходимости ра- 
боты в ТЫ 005 5.03. Иснытания по- 
казадм, ч10 и Ба 7Ти-005 5. 045 
программа тоже почему-то работа- 
ет, 

В-четвертых, в программе но- 
рабли больше соответствуют Фир- 
ненному описанию. Те счастаивиа, 
которые имели достун к Фирмениому 
описанию, знают, что увилев "Коб- 
РУ МЕЗ" или "Питон" саедует вы- 


таб сно- 


что побро-° 


практическом - 


ключить лазер и ИА *бед- 
ной отечкой". ‹ 

ИФК: Здесь есть какой-то заф- 
мент незовинаныя. Дело в той, что 
к "счастливааи“ следует отнести 
зсех о читателей "2К-РЕБЮ", т.к, 
фирменяое описание у.нас ‘есть'и 
то описание, которое ны давани в 
*ТХ-РЕВЮ" Ша, 1991 Г. - это и бык 
ан изревод фирненного `онисания, 
правда чуть-чуть сокрашенный зади 
экономим места. При этом, К сока- 
чевию, выпали чертежи кораблей, 
но и их ны нотом тоде дали вло- 
ПОНКУ В "ДХ-РЕНЮ” №10, 1991. 

КОРР: 

В - пятым... Но позалуй уже 
хватит. Приобретите себе програн- 
му и узнаете обо всен сами“, 


1993` года на московских радиорын- 
ках настоящей ШТЕ 2 замечено не 
было, (ас у ‘новосибирцев; нелду 
ирочия, - она. естьг) То, что ухе 
длительное вреия продается в Моз- 
кве под этим`наэваниен = ее зе 
по Вашей классификайии. у 

ИФК: НУ вот, концы с конпани и 
сожлись. Ясно теперь, почему кам- 
разе Т.В. ве валел в ней ничего. 
особенно вового, 

КОРР: и еше любопытная инФор- 
надия во ЭТОМУ. поводу. На комнью- 
тере АМЕСА 1500, 500+, 600; 1000, 
1200 и тд к арсусту 93-го 


{классика} , 
{соответствуюман “версии, 5”) и 
новая {1} ЕТЕ 92.0. которая на- 
верное м нохожа ва выхеописанную 
"спентрунозскую" МЛЯ 2. 

кстати, каталоги игр для  АНЕ- 
ГИ подозрительно’ напоминают сиек- 


{1-81} 


ОТС чего - стоит, 
этом нохво было бы писать еше 
доаго. 

#2: Спасибо, ‘Алексом. наши 


почитатели ‘101751 теперь кстати 
будут знать, зто их ждет и баи- 
хайвие год. 


В закаючение Алексей очень те- 
пло отзывается о своей нажиме 
АТИ-Зигьо 512++ м4. 50. (манять как 
У АМИГИ, возножности как у СПЕК- 
ТРУНА). Второй знак "ваюс” озна- 
чает доработку до. почти полной: 
совместимости - классная  нашина! 
Алексей очень реконениует такма 
текстовый редактор 2К-МЮЕО ‘91. 01 
из Харькова, 

Еше раз спасибо,‘ Алексей; мыё- 
ние эксперта очень важно наший 
читателяк: 


Вопросы совкестиности: 
“`дненс Вебер из посешка Брасно- 
зерсиое новосибирской области го- 
Той, помочь тем, у кого есть про-| 
блемы с запуском програнмы 511е14 
Зегу!св. Суть пробдены в том, что 


посае загрузки БЕЙСИЕ-блока. про- 
появанется над- 
выдзется Короткий 
прРОГРаМНа 


грамма стартует, 
ПИСЬ 5. Зегулсе, 
ЗВУКОВОЙ СсИГИзл и... 


255 


ны 


расывается, 

Вскрытие показано, 
чик в маминных кодах встроен в 
БЕЙСИХ посиё КЕМ и там Сразу за 
выдачей Эвукового сигнала стоит 
©прос порта 31 {Кемпстон-дхойс- 
Если на даойстике - 0, 10 


что загруз- 


„. Итак. нужно позаботиться, 
бы. во-первых 
был подключен, 


о- 


а во-вторых, чтобы 
зать кнопку джойстика во вреня 
опроса, После нормального старта 
загрузки кнопку можно и отпус- 
ить. 

ДРУГОЙ подход - 
ОПРОС из’ загрузчика, 
непонятно, какие цели пресле- 
довал тот, кто таким образом пе- 
ределал загрузчик. 

"1 еше: В программах,  взаоман- 
ных 1НХ’5 ОРТ и ИТСЕОРОЕ, а так- 
хе Б: Гильбертом после 90-го г, 
уже встроены РОКЕЗ, но стоят за 
юператовон ВЕН. Поэтому есяи Вы 
хотите ими воспользоваться, то 
удалите БЕМ в. БЕЙСИК-загрузнике и 
запустите его снова, а  затек 
ГРУзиТе программу. ДАДЬШе. 

Спасибо за "Программирование в 


убрать этот 


боком програми. 


что эта книга 
пользуется особой популярностью м 
надеемся на’ то, что наши новые 
книги, стоящие в’ плане на 1994 
год тоже получат Ваше призвание. 

Кики нии ини иникиикиииикикиикинки 


Насленников В. Г. из г. Чебокса- 
ры пишет о том, что почти на всех 
отечественных моделях не идут 
програмиы бНОХТ С1ЕО0ТР и ТОР 
СУ, Причина - в отсутствии пОРТа 
РЕН. . 

‚ Опрашивание порта в програмне 


‚БОР ЬВ. А, а8Н 

ТН А, (РЕН) 

19С А 

УВ 7, БООР 

ВЕТ 

Подирограмна зациклена до тех 

пор, пока с порта РЕН поступает 
число РЕН. Сделано это для того. 
чтобы спрайты на экране не мерпа- 
ди. 
‚ Вместо этого ‘фрагмента ножно 
вставить в программу другой, име- 
ющий ту же длину и не портяший 
никаких регистров, кроме аккуму- 
лятора: 
РУ5Н НЫ 
БО А, (НЫ 
ВСН 
ТЫС А 
5® #2. 100Р 
РОР_НЬ , 
ВЕТ 
Для тех же, кому важнее конеч- 
ный результат, ножно пореконендо- 
вать загрузить блок длиной 41986 
В КОПИРОВШИК СОРУ-СОРУ под адрес 
23296 и дать; 


ОР 


126; 25; 60; 32; 


РОКЕ 33621,229; 
| 225; 201 


251; 


кемпстон-дхойстик 


_ Аналогично ренонтируется и ТОР 
СОН. для этого блок 40100  загру- 
хается в СОРУ-СОРУ под адрес 
24625 и: 


РОКЕ 26642. 251: 118; 0; 0; 
0; 5.0 

РОКЕ 56160, 229; 126; 55; 60; за; 

251; 


Значевие такого совета ТРУДао 
переоценить и мы сердечно благо- 
дарим Владиспава Геннадьевича от 
имени всех читателей, ноторым по- 
могли его советы. Вполне ‘вознох- 
но, что с такой технологией удас- 
тся “отремонтировать” еще не одну 
программу. Ждём сообщений. 


Советы и секреты, 

Нам пишет ТНЕ САТ из г. Харь- 
кова. т 

Привет, ИНФОРКОМ! Посылаю вы- 
полненное мной в жанре “комвью- 
терная новелла” описание игры 
ЗАНОКАГ МАБЕТОВ (к сожалению, 
фФирну-изготовитедя < указать не 
могу - известно только, что взло- 
иана она была конавлой 5.5. САР- 
ТАТИ & НАНЗЕЕ) В 1989 году. 

Жанр игры определить повольно 
ТРУДНО - Я бы назвал это АБУЕН- 
ТОРЕ/АСТТОМ Игру отличает дина- 
НичностТЬ, прекрасно выполненная 
графика и интересный сюжет. Напе- 
чатайте, есаи можно...` - 

ФК: Печатаем, причем с огрон- 
ным удовольствием. Пробным камнем 
для "новеллы", как Вы знаете, яв- 
ляется вопрос ЗАХОЧЕТСЯ ИЛИ НЕТ 
ЧИТАТЕЛЮ СЫГРАТЬ. В ЭТУ ИГРУ?! 
Попробовали Вашу новелду на себе 
и так захотелось сыграть... В 
обмен. еще десяток подобных но- 
велл и у нас некому будет выпус- 
кать “2Х-РЕВЮ", все будут играть, 
играть и еме сто раз играть. 

Единственное, что успокаивает, 
так это то, что написать так, как 
это сделади Вы, очень непросто и 
вряд лисна нас в биихайвее время 
обрущится ЦЕЛЫЙ ДЕСЯТОК. 

Ны надеемся. что Вы простите 
небольшие комментарии от’ нас, 
вставленные после Вашей новеллы. 
Сами ведь понимаете. нам тоже хо- 
чется прислониться к хорошему де- 
зу, а то еше уволят по сокрашению 


штатов... (шутка). 
КОРР: И ешё в раздел "ФОРУМ". 
В игре “1МРАСТ" можно получить 


вечную хизнь, если в строке $0 
загрузчика убрать команду  БЕМ 
перед стоялим там РОКЕ (У неня 
версия игры. в которой после за- 
грузки первого блока, остановки и 
нажатия "ВЕЕАК“ на экране появля- 
ется надпись "Разкеа Бу В111у“. 
Вот и все. С большим уважени- 
ем. ТНЕ САТ. 
Р.5. Кто бы помог (если можно) 
достать програмны "ГОР ОР ТНЕ 
ВТНС5" и "5НАРОМ5 ОЕ НОкрОВ”"? 


310142 харьков 
а/я 1968, ТНЕ САТ. 


кикиикиуикикииииимимижикихииникик 
Нам пишет Шалыминов С.П. из 
Нижнего Новгорода; 


КОРР: кКочется ‘пополнить влав 
игры к программе А!1епз, опубин- 
кованный в Н 556 за этот год. 
Нохно видеть, что комнаты прову- 


нерованы от 1 до 255. но нигде на 
плане нет ` комнат с номерами 
249...25г, Попасть в них можно 


только из комнаты 248.  предвари- 
теаьно расстреляв там все коконы. 
План прининает вид: 

хх 

255 

254 

И ЕД 
И 253 
250 249 248 251 252 

24ат 
ИФК: Спасибо за ченное допол- 
ление. сейчас уже не установить, 
то ди в письмах авторов этн ком- 
наты были не разысканы (черновики 
не сохранились), то ли это мы при 
ваборе плана их пропустили. Ско- 
рее Второе, чен первое. Тем не 
менее, мы рады Вашему письму и 
если вина лежит на нас. 
счастьр, ведь благодаря 
ошибке мы имели честь познакони- 
ться с Вами. 
: „..Я это узнал только 
10Роб и ошибок. Долгое 
вреня я играл, 
памяти, пока ине устал. 
составил свой план и обнаружил 
этот парадокс с "пропавшими" ‘кон- 
натаии. Начал их искать, и вот 
:.. результат перед Вами. 
Я тоже очень люблю составлять 
карти к играм м составий их к 
ВоЫй 6004, ап рРаге, Ечи1тох, 
Соляг1вь4, Беафь 9135.5,  Безоте, 
на подходе карта к 54г1ще Рогсе 
Соъьга. Если кто-то нуждается в 


вих, ногу прислать, 


503163, Н. НОВГОРОД. 
ул. БРИНСКоГо, д.5, 
Шалыминову С. п. 

Еше. я люблю разыскивать РОКЕБ 
или проверять взятые ИЗ других 
источников. Вот несколько. найден- 
ных иди лично проверенных РОКЕЗ: 
З%ор 45е Ехргезз - 34467,0: 


к. 1, кв, 80 


34929,0: 35260, 0 

сигзе 63033,0; 64613,0 
Кепезаче 3 42204, 182; 42189, 182 
неро1из 32913, 0 

уъех 45211,0: 45368, 0 

ь. Н1пла а 36578, 0 

Боро ЕзЗСаре 54697,0: 58698.50: 

54699, 3 
В1оп1с 38241, 0: З42Т4. 0 


ине очень нравятся Вами публи- 
кации по ТЕ. Сан я пользуюсь 
версией Н128, переделав ее под 
дисковод. Вот ‘только никак не но- 
гу сделать отГРУЗКУ/ПОДГРУЗКУ для 
диска. Не могу понять, как тан 
это организовано. 

ИФК: Ножет быть кто-то даст 
четкие советы по этому поводу 
нашему увахаемону корреспонденту 
и ДРУГИМ Читателям? 

КОРР:... Я тоже раскрутил сло- 
варь в програмне и тохе знаю, что 
кода "ХХ" в нем нет, но я точно 
знаю, что есть названия планет, 
которые состоят не только из тех 
слогов, что есть в словаре, так 
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что рано преднолагать, “Ррак- 
ксла" не сушествует. 

ИФК: Это интересно! особенно 

если учесть информацию,  получен- 
ную от Абдрахманова Руслана (см, 
выше). 
_ КОРР: В этой версии почему-то 
не проходит безтопливный перелет 
со станции на станцию ‘а вот в 
версии Бё-Ве 5044 ‘у меня это по- 
лучалось. 

В целом я отношу версию Н128 к 
сложнын версиям. Пираты здесь, 
как правило, АЗР НК 11, ККА!Т, 
ЗТРЕМТНОЕЕ, реже - РУТОЫ, совсен 
редко - СОВВА НК 111. Ни разу не 
встретил ‘АББЕР. гег-ре-Ьапсе 


занимающегося 
боевыми действиями ради спортив- 
ного интереса. Ножете быть уве- 


рены, его рейтинг - МЛТЕ или 
близкий к нену. 
КОРР:... Полиция (УТРЕЮ) весь- 


на наневренна, на нее лучше не 
нападать. А станция - вообше свя- 
тыня! Стоит один раз по ней выс- 
грелить и по одному начнут выле- 
тать полицейские корабли, до 10 
штук. Как правило, это смертель- 
но, если не уйти в гипериро- 
странство. . 

Очень часто встречаются асте- 
роиды с отшельниками, причен по 
внешнему виду их не отличить от 
обычных. Если по нему выстрелить, 
начинает маневрировать и выпУу- 


скать корабли Ф КЕАТ и 
ЗТРЕМТНРЕЕ. 
Вообще, кажется, что это саная 


интересная версия игры из тея, 
что я видел. 

ИФК: Ны надеемся, что наши пи- 
лоты в поисках острых ошушений 
УЧТУТ это мнение. Спасибо ‘за Ваше 
письно. 
инииниииииикиииикиникиииииииииики 

Гаврилов Сергей Александрович 
из г. Костромы приводит проверен- 
ный им РОКЕ для программы РЕХ-1 

23624, 0: 3940г, 0: 40057, 0 
нииминиииниииикикнииикииииининиии 

Свои РОКЕЗ, найденные дично, 
Вам предлагает читатель из Крас- 
оярска Татаренко А. А. 

1. ЗРЕБСВООНО - 27811,00: 
361353, 0 - энергия или 

35101, 195: 35102,53: 35103, 206 

2. 0121 2. - 
29289,201 - неуязвиность 
3. 01221 3 - 
42981,Х - кол-во хизней 
53001.0 - беск. жизни 
4, 01279 & - 
296г3.0: 29624, 195 - 
беск. чизни 
5. 01722 5 - 51291,0 - беск. жизни' 
6. ЗТАК. ВО\Л.$ - 
47806,Х - кол-во хизней 
46218,0 - беск. жизни 7 
1. 5СОНВАШМ, - 49098.Х - жизни 
8. СОСОБАНА - 43855, 0: -48658,0 - 
беск. жизни 
9. ТОНСАТ - 31114,0 - беск. хизни 
31171, 201 - неуязвиность 
10. ТКАСЕБ - 50213.0 - время 
50613, 0 - энергия 


11. ТУТЗТЕЕ - 4281г,0: 
2490, 0 - энергия 


50649,0 - беск. жизни _ 


ФОРУМ 


42. БАЕК, РОЗТОВ с. 50дОТ,.0; 
50408,0. -беск, жизни 
13. ХЕНОЯ - 25148, 201 - жизни 
14. СОНОбЕЗТ ЧЕРВЕ 5ОЕТ) - 
62310, 0 - останавливает 
ь противников. = 
кииииикиикиииимянииихиииииикякии 
А зти РОКЕЗ пришли к нан из 
Белоруссии, их прислал наш чита- 
тель из г.Гомеля Владимир Хронов. 
сбоше1 Тесьлозо {4 '92 
Все РОКЕ даны для игр в раз- 
вернутом виде: 
РЕОБТ ВУТЕ 33989,0: 365600 
ОЕ ВЕАРЕ-3 43059, 195 
КЕТОН 45004, 0 
РАНАНА ОЕ 38635,60 
б00ру 46187, 0 
` САРТАТН. ТЕОЕНО 38310, 24: 
38363, 201 
7, РЕАКОНИ$ .64215,0 
8. ЗАУАСЕ 1 39846,0 
9. 
1 


вы 


ЕТУЕН МАБЕТОК 36761, 0 
0. СВОМ 56190,00 - Епега? 
56220. 0 - 11\ез 
11. УЕТГ 47894.00 - 11\е$ 
пнникииимикинииииикикиикникиккиких 
Семенов Алексей из ‘г. Балаково 
пично проверил следующие РОКЕЗ: 
ЕТЕРНАНТ АНТТС 35354, 255: 


35363,255 
ВАЛ, ВВЕАКЕВ 35840,00 
ВАМ, ВВЕАКЕЕ 2 38874,0: 

35938,0 

35729, 99 


КТНС КОНС 30033,0. - бессмертие 
30038,0 грязь к ногам 
не липнет; 
30053,24. огонь не’ жжет; 
30063. г4. бочки не сби- 
вают. 
30043, 24 
30048, 24 у 
АГРТН САНЕЗ остановить программу 
кнопкой ВКЕАК, уда- 
ЛИТЬ СТРОКУ 5620 и 
дать СОНТТНОЕ. 
РНОТО АРВОМ 56203, 0 
56364.0 время стоит 
56249, 0 
51165, О неогр. ошибки 
ТНРАСТ - пароли: 
ЕбС$, СНТР, ТЕАФ, 
САЗЕ, РАСЕ. Ч. В. 
ВВЕЛЕНЕСК 46090, © - жизни 
35013, Х - (0‹Х<200} 
-ономер комнаты. 
циниииииикииникиимиикиииииинининих. 
Наш читатель Шабалин М.Н. из 
г.УХТЫ вСскрыд “ЖУЧОК” В программе 
"КЕНЕСАБЕ” и готов ин поделиться, 
Этот "хучок” относится к тем, 
кто не мохет пройти четвертый 
уровень. игры (босса с пистоле- 
том) и заключается в том, что ко- 
гда в Вас стрельнет "босс", сразу 
нажинайте кнопку "РАШЗЕ" (если вы 
выбирали клавиатуру, то’ должны 
были ее назначить). После этого 
летяшая пуля исчезает и это 06- 
легчает прокохдение уровня. 
иникиикикииикиикякнииминииииииник 
У Алекса Кучкина из г. Петро- 
павловска-Канчатского для наших 
читателей заготовлено несколько 
РОКЕЗ и есть один вопрос. 


ТТСЕ, 


Па ЕСЬТРЗЕ 87193,0 - вода, 
41690,0 - здоровье. 
 РОБОСОР 39571,24 - энергия. 
К.О. Н.А.Г 40703,0 - бессмертие. 
НТНОА СОННАНПО 51763.0 - бессм. 
ТОРТЬЕЗ  53744,0 - энерг. 
47503, 0 - жизни. 


НАЗТЕК В.АЗТЕК 39988,0 - хизни, 


аня 


тео 


‘ма высвечивает надпись РГАУ.. и 


К сожалению, прочие; РОКЕЗ 
датьцне сногпи по. причине. ояераз- 
борчивости письма. 

Теперь вопрос. Алекс очень дю- 
бит авиаимитаторы, особенно. Ё-16, 
фирмы 101814а1 гпфегсертог. К со- 
залению, после поражения програм- 


чего-то дет. Есть подозрение, 
что в ‘ней нё все блоки. ‘Може’ 
Кто-то дать раскладку’ блоков этой 
ПРОГРАаммы? 
иниикниинииникинииуикиииииикикинии 
Изяшный буке? секретов прислал 
наш ‘юный ‘читатель ‘из’ г. Находка] ' 
ПринорскоГго“Края Наксим Кобяков. 
Сначала несколько РОКЕЗ: 


1. АРТЕЕ ВОВНЕВ - 31934, 0; 


31935,9: 31936:0 
2. РЕТСНТНАЕЕ. -,44051,0: 48455, 0 
3. БАЗТ РЕ. - 31605,0; 


; 40963,0 -.1. игрок: 
4. ЪЕБ 5ТОВН.- 37331,201 

5, Е1НС МЧАВ5 - .39411,0: 39534,0 
6. ЗТКЕЕТ ЕТСНТЕВ ‚- 42147, 195 
Т. ТУВЕЯ - 45217,0: 45368.0 

8. ОГУ 5 - 51291,0: 41815,0 


Все РОКЕЗ ‘лично ‘проверены 
Наксином. 
Кроме того, внинанию читателей 


предлагаются пароли для программы 
МЕСАНОУА: 

26719 -‘2-ая миссия; 

16640 - 3-я ниссия. 

Полезный "хучок" ‘из. программы 
НЕМ УОВЕ МАБРТОВ5: 

Если начать игру вдвоем ив 
первом бдоке убить первого игро- 
чтобы он больше не; появлялся, 
а вторЫН игроком ПРОЙТИ ЭТОТ блок 
до конца. то во втором блоке пер- 
ВЫЙ ИГРОК ПОЯВИТСЯ СНОВа, „Но, уже 
с 15-ю жизнями. 

Этот способ применим в. любом 
блоке. } 
ииккинникиккиихиинииимиикининкиии 

Г ПРОСЬбЫ © поношИ. 

Наш постоянный читатель из 
г. Талнах Красноярского края Федор 
Юхнович обрашается к экспертам- 
профессионалам. Он считает, что 
проработка програмн-имитаторов им 
удается лучше всего, пример тому 
работы Хонинича ‘и Жарова по про- 
грамме АСАБЕНУ. 

ИФК: Дорогие друзья! Ны еже- 
месячно получаем тысячи писем, в 
которых нан выражается ‘благодар- 
ность за то, что мы делаем. Мы 
ценим Ваше участие и рады этому, 
но наконец-то к нам пришло письмой’ 
с оценкой труда наших корреспон- 
дентов. Наверное, не очень спра- 
ведливо оставлять за кадрон тек, 
кто бескорыстно делится с Вами 
что знает и унеет. 

ПРИНЕЧАНИЕ: статьи наших ‘кор- 
респондентов ‘мы помечаен символом 
(С) (“копирайт”), свидетельствуя 
тен саным свое уважение к их ав 
торскому праву. Статьи, не ` поме- 
ченные этим символом и без указа- 
ния автора, принадлежат ”ИНФОРКО- 
НУ" и выполнены его сотрудиикани 
в порядке служебного задавия. 

КОРР: ... Помогите разобраться 
с ПРОоГранной-имитатором косничес- 
кого полета - программой ЕНТЕЕРЕТ 
(аналог ЕЁТТЕ). 

ИФК: Ны с этой программой не 
знакомы и тоже с интересом выслу- 
шали бы отзывы о. ней. 
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5.5.48, 


Эксперт Матвеев Ю. А. 
г, Носква. 


Вы когда-нибудь представляли 
себя себя в роли менеджера фут- 
больного клуба? Если нет, то по- 


У. 5, 14а, 
Программа “ТНЕ РООБЬЕ” являет- 


‘тели Футбольныя баталий,  имеювие 
в своем распоряжении "Спектрум" и 
ЭТУ ИГРУ, ПОолУЧАаТ ВОЗМОЖНОСТЬ ИС- 
пытать. свои способности в роли 

фут- 


в выиграть Кубок, то есть сделать 
"дубль", добившись двойного успе- 
жа. 

Поначалу Ван достается команда 
среднего уровня, имеющая в своем 
составе несколько. неплохих игРо- 
ков, на которых, собственно гово- 

держится все. Но по мере того 
используя выделенные Ван 
покупаете новых, более 
 олантивых футболистов и прово- 
дите  МУДРУЮ ПОЛИТИКУ В подборе 
состава на очередной матч. ‘Ваша 
команда начинает расти на глазах, 
‚В начале чемпионата. Вы присна- 
триваетесь к Футболистан, экспе- 
риментируете с составом, В конце 
концов ВЫ приходите к выводу, что 
с некоторыми игроками Вам не по 
ПУТИ. и С НИМИ придется расстать- 
ся. Первые попытки продать слабых 
футболистов в другие клубы будут 
неудачными. И это понятно. Кому 
нужен лишний балааст? Ведь казло- 


малую зарплату из бюдхета клуба. 
ногие менедехеры придерживаются 
принципа: “Мы не настолько бога- 
чтобы покупать дешеных игро- 
Возьмите и Вы этот ипривций 
ва вооружение. Не отчаивайтесь, 
не удается быстро продать 
вполне возможно. что 
его. купят. позяе, когда из-за 
‘травы ведущих игроков некоторые 
менеджеры будут вывухдень снизить 
свою требовательность. 
После загрузки. програнмы Вы 
сразу попадете в главное меню: 
НАТИ НЕНУ 
СТАЛ ВЕРОБТ (отчет но клубу) 


‚Вы можете использовать длой- 
стик, если в опции сонтрео. гаав- 
ного меню, произведете соответст- 
вующую настройку. Там же находят- 
ся опции сохранения (ЗАУЕ. САНЕ) 
и загрузки. (1ОАР САНЕ) отлохен- 
ной ИГРЫ: : 

После выбора управления Вы пе- 
реходите непосрежственио к игре. 

Итак. Вам преддагатся . возгла- 
вить  ФУТбольный ‘клуб ГЕТСЕЗТЕЮ 
СТТУ, который выступает в Первом 
дивизионе. ‹ Отношение к Ван со 
СТОРОНЫ дирекции Клуба. достаточ- 
но хорошее (06 этом ножно судить 
по строке НАНАСЕНЫНТ СУЕОТВИ.ТТЯ 
«кредит доверия> над главным  ме- 
ню). РУКОВОДСТВО клуба надеется, 
что Вы оправдаете высокое ’ дове- 
рие, которое Вам оказано, и при- 
ведете команду к золотым меда- 
лям. 


СТВ ВЕРОЕТ МЕНИУ 

Здесь есть следующие разделы: 

СУ ЗТАТЕЗТ1С$ (статистика 
клуба). 

СВО. РКЕРАКАТТОЕ (планирование 
посешаемости матчей). 

РТАНСЕ КЕРОКТ (Филансовый отчет) 

ТЯЛЛЕ КЕРОРТ (отчет во травнам 
ИГРОКОВ}. 

$СОЙТ БЕРОКТ (отчет наблюдателя). 

ВАНК АНГ ТОАНЗ (расчеты с бан- 
ком). 

СКОПЯР ТЫРЕОУЕНБИТ (развитие. ста- 
пиона). 

НАТН ВЕЩИ (возврат в главное не- 
НЮ). 


Раздеа СЛОВ 5ТАТТ$Т1С$: 

Выбрав этот раздел, вы снохете 
узнать о средней посешаености Ва- 
шего стадиова (АУЕВАСЕ: САТЕ), о 
количестве нест на стадионе (680- 
ЧНП САРАСТТУ), а также такие дан- 
ные, как номер Дивизиона, в кото- 
Рон Играет Ваша конанда. (1ЕАСУЕ 
ОГУТЗТОН), место, занинаеное ко- 
нандой в турнирной таблипе (1ЕА- 
СИЕ РОЗЕТТОН) и количество зрите- 
лей, 
нашыей игре (ТАЗТ НОМЕ САТЕ). Тут 
хе Ван предлагается еше одно под- 
меню: 


З@0АР БЕТАИ,5 (инфорналия во ко- 
манде). 

ЗТАРЕ БЕТА1Т.5 {Информация по пер- 
соналу). й 

ЗВЕНО (Возврат в предыдущее меню}. 


После выбора опиии 560АЮ Е- 
ТАП.5. Вам представится вознох- 
вость познакомиться с составом 
комаины, посмотреть статистику на 
кахдого игрока. Здесь приведены 
данные и о еженедельной зарплате 
игроков. В низу экрана еше одно 
неню: › 
5ЕЬ РЕАУЕР. {продать игрока). 
РЕТИТОЙТ (вывести данные на прин- 

тер). 

НЕНО (возврат в предыдущее меню). 

При хедании Вы мозете продать 
любого футболиста. — Установите 
КУРСОРНУЮ СТРОКУ на Фамилию игро- 
ка и выберите опанр ЗЕМ, РЪАЗЕР, 
При наличии заявок на покуйкУ 


побывавших на последней до- 


футболиста на. экране появится 
таблица с названиями клубов, за-\ 
ннтересовавшихся Вашим предложе- 
ниен. и суммами, ‘которые они 
предлагают за игрока. Чтобы отка- 
заться от сделки надо выйти из 
этого подменю. Для офориления 
сделки. 


нажать РЛЕЕ. С этого момента Фут- 
болист уже не играет в Ватей ко- 
манде, а деньги за него поступили 
на Вам счет в банке. 

Вы можете опеннть силу каждого 
игрока по зарплате (МАСЕ),  кото- 
Рая ену выплачивается. Но будьте 
оСторОЖиы! СУННа еженедельных вы- 
плат не всегда отражает уровень 
ИГРЫ ФУТбОЛИСТА. Это, ВОЗМОЖНО, 
связано с привилегированнын поло- 
хениен некоторых игроков.  Звези-| 
ный час у них уже’давно в прон- 
лон. Однако, за свой прехние за- 
слуги они ете имеют хорошую зар- 
плату, которая может быть гораздо 
выше, чем у нолодихг Впрочем, бы-| 
вают и другие ситуации. Нолодым, 
подающин надежду ‹ футболистам, 
руководство нлуба иногда также 
завышает зарплату. как бы аванси- 
руя их будушие успехи. Вы,  кста- 
ти, не занимаетесь этими вопроса- 
ни и все решения с зарплате лехат! 
на совести директора клуба. 

Чтобы верно оценить уровень 
Игры каждого отдельного игрока, 
Вы нанинаете независимых экспер- 
Тов - набаюзателей (5С09Т), кото- 
рые могут описать достоинства и 
отличительные характеристики 
любого интересующего Вас Футбо- 
листа. } 

Для начала войдите в подненю 
ЗТАЕР БЕТАИ.5, У Вас имеется один 
экперт. который трудится под Ва- 
шим ЧУТКИМ РУКОВОДСТВОМ С окладом 
В 450 фунтов стерлингов в неделю. 
Вы ножете нанять второго  экспер- 
та. Это будет. стоить еше 450° в 
неделю, В этон подменю преднага- 
ется за те хе деньги нанять и 
физиотерапевта {РИТЗТОТНЕВАРТСТ,, 
который будет необходим, как воз- 
пух. когца игроки начнут получать} 
травмы в матчах. Впрочем, 
обязательно нанимать терапевта и! 
второго эксперта, В ваших силах 
даже уволить и первого эксперта, | 
дабы сэкономить средства и побы- 
стрее ‘Вабрать КРУГЛУЮ СУМНУ В 
банке. Но делать этого ве реко-| 
мендуется из-за пробиен, ксторые 
вогут впоследствни возйикнуть. 


Раздел СВОУЮ. РВЕРАБАТТОН: й 

Здесь Ван сообщают о месте 
проведения следующей встречи. В 
тон случае, если Ваша команда иг-! 
рает дона, Ван предлагают ввести 
Ваш прогноз о количестве зрите- 
дей, которые придут на натч. Эти 
ПИФРЫ будут использованы при под-| 
готовке полиции к иатчу. которая! 
будет. обеспечивать безопасность 
на стадионе. Если Вы отибетесь в 
своен прогнозе и назовете зани- 
зенные цифры, то поаиция, ве го-| 
товая к большому количеству  зри- 
телей, не сможет поддерхать поря- 
док па стадоне и болельшики ногут 


вуют эксперты из Федерации Футбо- 
ва и в‘случае возниклих беспоряд- 
ков Вам клуб нохет быть оштраФо- 
ван на круглую сумму, если в 4$- 
дерации решат, что это произомно 
по Бащей вине. Брайне нехелатель- 
но так ошибаться несколько раз 
ПОДРЯД, Вы нохете даже потерять 
свое кресло. Поэтому будьте осно- 
трительны и перед кахлой домашней 


стадиона. ° завышенный 
прогноз коть и не влечет за собой 
таких мрачных последствий, но’ ьсе 
хе ваияет. па финансовое полохекие 
клуба, а значит и на кредит дозе- 
рия к Ван со стороны руководства. 


Раздел ЕТНАЕСЕ КЕРОКТ: 
Здесь Вы получите полную рас- 
кладку всех доходов и расколов 


(«плата за ‘входные 

билеты). 

ТЕАНЗРЕКЗ (плата ‘за нродаку/ноку- 
аку игроков}. 

РЕАУЕЕЗ МАСЕЗ (зарплата игроков). 

ТАРР. МАСЕС (заралата персонала». 

ГРАУЕ, АНО НОТЕТ (расходы на пе- 
реезды и гостиницы). 

ЕТНЕЗ АНЮ РАМАСЕЗ (штрафы и по- 
врехдения). 

РОЕТСЕ ЕХРЕНСЕЗ (оплата полиции). 

(аревдная плата за 


{расколы на 
расширение стадиона}. 


Раздел ТЕЛЖУ КЕРОКТ: 

В этом раздеде сообщается о 
‘травная, полученных футболистами. 
Если в Вашей команае все благопо- 
жучно, то выводится сообщение: НО 
ТИЛЖТЕ$ (травм нет). Если есть 
то сообщается Фа- 
милия Футболиста, вид травмы и 
количество недель, на которое иг- 
Рок выбывает из осяовного соста- 
ва. 

Ван предлагается решить: осво- 
бодить травнированиого футболиста 
61 тренировок ПОЛНОСТЬЮ или нет. 
В разделе есть подменю, в ко- 
тором определяется вид тренировки 


ТЕНТ УОВКОЮТ (легкая нагрузка). 
МЕДТОМ МОБКОЙТ (средняя нагрузка» 
НАЮО УОВЕОЙТ (тяжелая нагрузка). 
ИГРОКИ МОГУТ ПОЛУЧИТЬ слейую- 


ВЕОКЕН АКН (перелон руки). 
АМСЬЕ 1ВЖЕ {повреждена подыхка) 
ВЕОКЕЙ ГЕС (перелом ноги). 
НАБНЗТЕ1НС - растяжение сухохилий 
ВЕОКЕН. НОЗЕ - перелом носа. 

Существуют и другие виды 
травм, если Вы достаточно глубоко 
погрузитесь в эту ИГРУ, то Ван 
иридется иметь с ними дело. 

При легких видах трави игроки 
выбывают на небольвой срок, а при 
"яжелых травмах этот срок ножет 
достигать полугода. 


Раздел 5СОУТ БЕРОКТ: 
Этот раздел позволяет ознако- 


дюкатедей, которых Вы посылаете 
на очередные матчи с целью изуче- 
НИЙ УРОВНЯ ИГРЫ ФУТбОЛИСТОВ, ВЫ- 
ставлеивых на продашзу  дрУГиНи 
ЕдУбами. Вы, конечно, ножете рас- 
считывать только на свои ‘силы и 
обойтись без успуг экспертов, но 
в этом случае высока вероятность 
КУПИТЬ “кота в нешке". Для того, 
чтобы отправить эксперта на натч, 
выберите с помошью  курсорной 
СТРОКИ ОПНИЮ ЗЕНО ОН НТО, 
затен задайте дивизион, в который 
ваправляется эксперт, а потом вы- 
берите конавду и футболиста, ко- 
ЗоРОГО  саедует поскотреть. Экс- 
Перт прошается с Вани и со спова- 
ми; “Увидинся после матча” от- 
правляется выполнять. поручение. 
Прочитать последнее сообтение 
эксперта ножно. если выбрать оп- 
цию КЕАР ТА5Т РЕРОБТ. Аналогич- 
ные действия проводятся и со 
Вторым экспертом (если он есть). 
Рекомендуется в начале сезона, 
пока не начались переходы Футбо- 


зистов из клуба в клуб, оценить с 
поношью экспертов игроков своей 
команды. 


После очередного тура ченнио- 
Ната эксперт возврамается' с отче- 
том на Футболиста, которым Вы за- 
интересовались. Отчет состоит из 
пяти характеристик плюс оценка 
приблизительной цены за игрока. 
Эксперт описывает Футбописта, ис- 
пользуя спортивный сленг.  Сло- 
варь эксперта приведен в конце 
настоящего описания. 


Разкел ВАНХК АНП 104АИЗ: 
В этон разделе приводятся дан- 
ные по Вашему счету в баяке. 


‚ МЕЕКЬУ ТЕТЕВЕЗТ (процент по вкла- 


ду в неделю). 
МЕЕКЛ — ВЕРАУМЕКТ 
долган в неделю). 
СОЕВЕНТ ВАЗАНСЕ (сумма на счете). 
ОУТЗТАНОТИС 1О0АН5 (ввешний долг). 
Здесь яе Вы можете провести с 
банком Фивансовые операции: 
АРРХ РОК ТОАЯ (попросить кредит) 
МАКЕ РАКТ  КЕРАУНЕНТ5 (выплатить 
часть долга} 


(процент по 


Раздея СВООНР ТИРЕОУЕНЕЯТ: 

Вы можете расширить стадион 
своего клуба, увеличив количество 
зРИТельских мест, что в принципе 
ножет повысить доход от проданных 
билетов, если команда будет иг- 
рать успешно и посещаеность нат- 
чей будет расти, Таблица данных: 
РЫЕЗЕНТ ЗРЕСТАТОЮ САРАСЕТУ - 

(вмешаемость стадиона). 
НАХТМОМ БРЕСТАТОЕ — САРАСТТУ ы 

(наксинально возножное коли- 

чество мест). 

С057/1000 ЕХТВА — ЗРЕСТАТОЕ5 а 
{плата за каждую тысячу допол- 
нительных мест) 

И подменю: 

ТЯСВЕАЗЕ ЗРЕСТАТОВ САРАСТТУ - 
(уреличить число зрительских 
нест). 

СТУВ БЕРОЕТ НЕНО (выход). 


Расширять стадион Вам придет- 
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миться ‘с отчетами экспертов-наб-. 


ся не Скоро, ибо это ваечет за 

собой саишкон большие расходы. 

да и посешаеность натчей с Учас- 

тиек Вашей конанды в первое вреня 

невелика. 

ГЕАСУЕ  БЕТАИ,5 
Здесь Вам предлагается вся 

справочная информация по ченпио- 

нату. При выборе этой опции Вы 

оказываетесь в подменю: 

ТЕАСУЕ РТКТОВЕЗ (предстоямие нат- 
Чит. 

ЗЕАСУЕ РЕЗАГТЗ (результаты нат- 
чей). 

ТЕАСОЕ ТАВГЕЗ (турнирные таблицы) 

СЕЛ8 ЗТАТТЗТТС$ (статистика по 
кдубан). 

МАТИ ИБКО (возврат. в выместояшее 
меню). 


Раздел РА ЕТХТОРЕЗ: 

Здесь указываются пары команд, 
которые встречаются в, играх на 
Кубок. Первые встречи вачинаются 
на двадцать второй неделе ченпио- 
ната. Жеребъевка клубов. проводит- 
ся за несколько недель до старта 
игр на Кубок. 


СОНТТНУЕ. 

Эта опция включается, когда 
всенеобходимые приготовления. за- 
коичены и Вы переходите к расста- 
НовВКе ИГРОКОВ на поле на предсто- 
яший Ннатч. После того, как Вы 
расставите игроков и нажмете 
ЕТЕЕ, Вас спросят нужно ли выво- 
дить результаты матчей ва прий- 
тер. После Батего ответа на эк- 
ране появится таблида с результа- 
тани всех натчей тура. Понино 
счета в таблице указываются  со5- 
тавы конанд; а напротив Фамилий 
игроков, забивавыия в этой игре, 
пишется число забитых иячей. 

ЕСЛИ Вы неправильно спрогнози- 
ровали число зритешей, и силы по- 
лиции неё сногли обеспечить поря- 
док на стадионе, то в этом случае 
посие статистики игры с участием 
Ватей команды сообщается © имев- 
щих несто беспорядках. здесь зе 
приводичся заяваение полиции © 
том, что они были невёрно  инфор- 
нированы о количестве зрителей. 
Ддапее следует сообщение, что на 
матче) присутсвовал инспектор от 
федерадии футбола. 

По окончанию тура вопрос ‘о 
беспорядках на стадионе будет 
рассмотрен в Федерации Футбола и 
Вай клуб ногут оштрафовать. Ино- 
гда, правда, Федерация приходит к 
выводу, что в этон нет Вашей вины 
и оставаяет клуб в покое. 

Е десятой неделе ченпионата 
начинаются торги на бирже игро- 
ков, До этого приходят заявки на 
продажу того или иного игрока. 
Вот эдёсь Вам и потребуется по- 
ношь Ваших экспертов. Просмотрев 
такую заявку и выбрав подкодяшего 
игрока, Вы передаете все данные о 
нем своену эксперту. эксперт, по- 
смотрев этого футболиста, сообща- 
ет Ван его отличительные особен- 
ности и цену, за которую его нохж- 
но будет приобрести. понните; од- 
нако, что экснерт тоже не Бог и 
он никогда не сножет назвать Ван 


объявит за аего наксимальную це- 
иногда бывает и так, 


Не хотелось бы`раскрывать всех 
[секретов этой замечательной игры, 
но об одном сказать иохно. в ва- 

ей карьре менеджера будут взлеты 
Пока Вы не наберете 


более бедная и слабая 

команда. зато потом. когда рас- 

втся во всей красе Ваш тадант, 

е приглашений от прославлен- 

вых богатых клубов, известных 
Тогда Вы, 


Прилозение. 


СЛОВАРЬ ЭКСПЕРТОВ 


„ Характеристика каждого игрока 
складывается из пяти отдельных, 


Групп, Первую фразу эксперта надо 
искать в первой группе, вторую но 
ВТОРОЙ и Т.Д. ДЛЯ характеристики 


ним, выделены в отдельный раздел, 
состояший ИЗ ПЯТИ ГРУПИ. 

внимательный читатель обратит 

что абсолютное 

инство заявлений экспертов 

об игроках, имеют полохительную 


 СОМРОРТАНИЕ ОН ТНЕ ВА (спокойно 
$ действует < иячом). 
НЕ ЗАРЕЗТ РАШЕ ОР НАКО$ УН ТНЕ 
САНЕ (это надехная пара рук). 


УВВАН ОУРБТАЮТ 


Эксперт дурченков Алексей 


г, Челябинск 


Программа "ЗЕВАН ПР5ТАЕТ” не 
является такой же логической го- 
доволонкой, как, скажем, "5НЕР- 
оСЕ“, однако если Вы решите за- 
вяться ее прохохдениен, она до- 
ставит Вам немало приятных часов. 

Если у Вас нет ` пока опыта в 


Богом местечко, 


р: И 

СЕТ ВТО ОР ТНЕ БАМ, УЕ, (корозю 
выбивает мяч в поле). 

6000 АТ СЬЖАВТЯС Н15 ВЕБ (коро- 
шо действует на выходах). 

ОК ОМ СЬЕАРАНСЕ$ (неплохо забира- 
ет няч). 

АССУВАТЕ УТТН Н!5 КТСЕТНС 
выбивает мяч). 


(точно 


с 
СОТСЕ ТО ВЕАСТ {быстро реагирует) 
ЗВРЕЕВ РЕРТ.ЕХЕЗ (превосходная ре- 
акция). 
УЕЖУ АБЕРТ (всегда начеку). 
НОУЕЗ МЕШ., (хорошо перемещется). 


р 
АМАКЕ ОР ЭТТОАВТЛЮН$ (БОорОЮ  ЧУВ- 
ствует ситуацию). 
ОИСАНИУ РОЗТТТОЯ ЗЕЕЗЕ «невероят- 
вое чувство позиции), 


ОССАЗТОМАЬЯ СЕТЗ САШСНТ ТЕ ТЬО- 


НТЕР$ (иногда берет мяч интун- 
тивЕо}. 

РЕАОЗ ТИЕ САНЕ ЗОРЕНВЕУ 
ХОДНО ЧУВСТВУЕТ ЯГРУ). 


{превос- 


Е 

НЕ СОМ.Ь ВЕ А'5ВТР (возмохно, 
"верняк”}. 

НЕ МОЕ*Т СОМЕ СНЕАР - НЕ’5 6000 
(этого парня дешево не возь- 
мешь), 

МОЕТН ТООЕТЫб АТ 8055 (60сс, к 
нему стоит присмотреться}. 


это 


г. ПОЛЕВЫЕ ИГРОКИ 


А хе 

РОЕЗН”Т ПЕ, ОБ ТНЕ ВАМ, (ве 
мешкает с мячом). 

1005 СОНРОЕТАВЬЕ ОМ ТНЕ ВАМ, (на 
первый взгляд, спокойно дейст- 
вует с нячом). 

ВСЕ СОБТРОЫ (ЕОРОШИЙ КОНТРОЛЬ 
илча). 

УЕКУ СООШ СОНТРО АРООНО ТНЕ ВОХ 
«отлично контропирует няч на 
любон участке поля). 

РОЕЗН”Т РТ.АР ОБОЕХ РВЕЗЗУВЕ (от- 
лично действует в саохной си- 
туадии). 

ТИРВЕЗЗТУЕТ С00Б ОН ТНЕ ВАМ, 
{хладнокровен Е обработке 

мяча), 

БУРЕЮВ ВАБАНСЕ АНР СОИТВОГ ^^ (пре- 
восходяо удертивает и контРо- 
лирует мяч). 

НОТ АЕРАГ) ТО ТАКЕ ОН ОРРОНБЕНТЗ 
(смело идет ва плотную игру). 


В 
НОТ КРАТЕТ НЕАКТЕХ (смелый игрок). 
СОНРЕТЕТЕУЕ (УПОРНЫЙ). 
НУЗТЕКЗ ПЕРЕНОЕК МЕТ, 
обводит зашитийков}). 


(ХОРОШО 


общении с адвентюрными програнма- 
ни, но Вы ищете, с чего бы ва- 
чать - начките с програмны "ОБВАН 
ОРБТАЕТ"- и Вы не пожалеете о 
своем выборе, Течение игры очень 
спокойное. Ват герой погибнуть ве 
молет, самое страшное, что может 
Вас ожидать - временный арест в 
$Пз или хе принудительное лечение 
в муницинальном госпитале. Итак, 
если Бы реюились - начнем. 
Городок Скартхопрс - забытое 
где даже дети 
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НЕ’$ ОЕТЕВНТВЕР ТН ТНЕ ТАСЕГЕ 
(решитезен в скватках). 

ОТ5НЕБ ОПТ А ТОТ ОЕ 511СЕ (шре- 
секает проходы соперников}. 
ОРРОНЕНТЗ НАУЕ А ВАТТЬЕ \ТТН ТНТ8 
ТАЮ {этот парень доставаяет 

соперникам много хлопот). 


СНАЕНСЕ$ ЕУБЕТТИТИС ТИ ТНЕ ВОХ 
(укеет все на поде}. 


сок 

ОНЗЕБРТЗН (не передерхивает мяч). 

РТ$ТЕТВУТЕ$ ТНЕ ВАШ. МЕМ, (хорою 
распределяет нячи}. 

БРЕАУ5 В15 РАЗ5ЕЗ МЕ, (делает 
неплохие передачи). 

05ЕЗ ТНЕ ВАМ, МЕМ, (хорошо владе- 
ет мячом}. | 

СВЕАТ УТ5ТОН - №1$ РАЗЗЕЗ Ак 
С1.453  (отаично видит попе - 
его пасы великоделвы). 

Н15 РА551НС 15$ РОВЕ НАСТС (его 
передача - просто волшебство). 

Н1$ РАЗУТЕС 1$ ВБА, ОбАБТТУ (на- 
дезно играет в пас). } 

ЗЕТЗ УР Н{$ РЕШ.0У БОРА ЧЕМ, 
(хорошо питает мячами аинию’ 
атаки). 


о 

ТН:$ 1АФ’$ НУНСАВУ РОВ СОА {0с- 
ТРО нацелен на ворота). 

11$ БАБ Иа. 5СОВЕ А РЕМ (этот 
парень еше себя покажет). у 

ТОУЕЗ ТО 5НООТ СТУЕЕ НАБР А СНАН- 
СЕ (бъет пра любой возножнос- 
ти}. 

815 РЕН1$Н1С 15 БЕТНАЬ 
удар смертеаеи}, 

НАБ ТИЕ ОССАЗТОНА, РОТ АТ СОА 
(забивает время от времеви). 

НТЕНТГ 5СОВЕ А РЕМ (из него кохет 
быть толк). . 

АЕМАУЗ$ ТООКТНС ТО СЕТ ОН 5СОВЕ 
ЗНЕЕТ (он рвется забивать), 


(его! 


` ВОТ АРКАТО ТО 5НОСТ АТ СОМ. (бъет 


из любых полочений). 


‘тенперакент, 
вии стоит вонабаюдать). ‘ 
ТНт$ ЪАО В0$51 
присиотритесьсь к этому 


РОВ (возможно, 
эмете). 

81$ 6041.5 ЧИЛ, БЕРАУ Н!5$ РЕБЕ ГН 
ЗОБЕ (я уверен, он стоит своиЕЙ 
денег). » 

А ВЕА АЗЗЕТ - 50 БОУБТ АБОЙТ ТТ 
‘отличное приобретение, мохно 
не сомневаться). 

А БАТОВАГ.. ООТСЕ. 5НАБР. - (одарен-| 
НЫЙ, быстрый, ТОЧНЫЙ ИГРОК), 


дерхат за пазухой кнопочные нохи. 

Эдесь все изненевия сводятся к 
тону, что с годами на донах появ-| 
ляется новый саой краски. . Люди 
годами ждут свободного рабочего] 
места и зачастую умирают, } 
не доздавшись его. 


Попробуйте спастись и, 
Вам повезет. 


пальнейшев чтение этой статьи 


может сыть опасным для тех. кто 
продночитаст проходить игры без 
подсказок. 

Приведенные сведения в значи- 
тельной степени раскрывают тех- 
НИКУ ПРОХОЖДЕНИЯ ИГРЫ. 

‚ дач тех, кто захочет исполь- 
зовать подсказки тоаько `ири 
ОСТРОЙ необходимости, мы рРаз- 
били текст статьи на разделы, 
привязанные к конкретным эпи- 
зодан. Надеемся, что автор про- 
стит наи такое эчомательство, 
это сделано в интересах читате- 
дей. й 
Вот эти разлешы (ознаконьтесь 
с ними до чтения статьи и поль- 
зуйтесь именно тем, который Ван 
нужен в’данный момент): 

1. Дебют. 

г. Книжный магазин. 

3. Автобусная остановка. 

4, Телефонная будка, 

5. Банк. » 

6. Городской, парк, 

7. Заброшенный дом. 

8. Городская ратуща, 

9. дорога в аэропорт. 

10, В аэропорту. 
„ 11, Полезные советы. 
« 12 Нерешенкые проблемы, 


#и/ - чтение раздела безопасно. 


$, 

ВГРУ Вы начинаете в маленькой 
эютной комнате с цветком на окне. 
Рядом с Вами лежит пара брюк 
(ФУНСАВЕЕЗ), которые не мешало бы 
ваять (ТАБЕ), а потом и одеть 
{МЕАЕ), ’УЧИТЫВая в особенности 
то, что ‘если Бы будете ходить 
раздетым по улицам городка, то 
это вряд ли понравится нестной 
полиции. 

Спустившись на первый. этая. Вы 
скахетесь перед огронной` дверью. 


но из этого вряд ли 
что получится, Выход один - ис- 
кать ' ключ. Найдя ключ (А БАЮСЕ 
КЕТ), не поленитесь осмотреть и 
юстальные коннаты дома - в них Вы 
нохжете. обнаружить еше пару полез- 
вых предметов - ножницы (А РАТВ 
ЮЁ 5С15$5085) и банку пива (А САК 
стоящую в  холодильни- 

Прихватите все с со- 
ив путь Откройте дверь 
{(АГОСЕ 0ООЕ, ОРЕМ ООВ) и смело 
выходите на улицу (ОТ). 


а. 

Вы окахетесь на мрачной улице 
перед уныло стоящим здесь книжным 
магазином. Зайдя в него (14). вы 
не встретите там покупателей, да 
й ассортимент имеющейся литерату- 
ры не балует - на пояках стоит 
всего одна книга (В00Е). Взяв её и 
обследовав (БХАНТМЕ), Вы узнаете, 
что это книга по искусству пило- 
"тирования. Решив, ^ что ‘все-таки 


Теа зыя }-—— 


чем. ничего, двигайтесь 


3. 

Е автобусной остановка, 
дяжейся на нрачной улиле, вряд ди 
когда-либо подходил автобус, зато 
там лежит забытый одним из потев- 
циальных изссамиров зонтик (АН 
УИЗКЕГЬА). Надиись иа стенке гла- 
сит - “Хелаете приятно провести 
время - звоните 54321". Прихвати- 
те’зоитик и идите дальше. 

; На угау Вавего дона стоят. два 
нусорных бачка, покопавшись в 
которых Вы можете найти интерес- 
вое | письмо (А ЪЕТТЕЮ),  изУЧИВ 
которое, Вы узнаете, что это уве- 
донление из банка, присланное 
вместе с кредиткой карточкой (А 
СНЕООЕ САБО) и напоминанием. что 
для того; чтобы узнать Вам дичиый 
номер банковского счета, Вам нё- 
обходино ИЗВОВиИТЬ по номеру 
771712г. возьмите с собой карточку 
И КОоРОШЮ Запоините номер телефона 
банка, Ненухные ‘более предметы - 
письно и большой ключ от входной 
вери можно бросить здесь (ПЕОР) 
не опасаясь полиции - в конле 
концов на то она и свалка, чтоб 
ка НЕЙ НУСОРИТЬ, 


вазо- 


4. 
дойдя до телефонной будки 
(РНОЯЕ 80), смело  закодите 
ВНУТРЬ и звоните в банк (ЛА), 
Ирвятный голос поблагодарит Вас 
за звонок и вам сообщат номер 
банковского счета. позвоните 
54321, если’ желаете ‘развлечься 
(хотя напомню - Ваша цель сбежать 
из города, тратить время на раз- 
влечения просто неразунно). Ван 
тут хе сообщат, что время 3 часа 
45 минут и 30 секунд. Удиваены? А 
каких еше развлечений, Вы хдали в 
этом Богои забытон местечке? 


5 
Ну, а теперь в банк. На вид 
банк кажется закрытин, но не ‘пу- 
гайтесь - смело заходите в него 
{МЕЗТ). вставьте кредитную кар- 
точку в нащину (Т1ЫЗЕЕТ САКО). На 
дисплее васветилась надпись: "По- 
жалуйста, наберите номер Ватего 
банковского счета". После набора 
номера намина выплюнет Вам назад 
кредитную карточку и Ваши деньги, 
хотя их всего лишь - пятерка, 
Карточку ножете оставить здесь - 
она Вам больше не понадобится и, 
прихватив пятерку (ТАКЕ РТУЕВ), 

двигайтесь дальше, 


5. 

ПРОЙДЯ по проселочной ДОРОГЕ 
мино мертвых деревьев, Вы окахе- 
тесь около Скарткопрского парка; 
обойдя окрестности парка, Вы 
ножете полюбоваться на его досто- 
принечательности - могильный ка- 
мень на нопиле дхона Снита; Раз- 
рущенную перквушку. 

Нрачновато... Но, еше раз  ук- 
репившись в своем решении. бехать 
из этого города, ‘прихватите с 


ыы о 


` 


собой еду `(5ОВЕ. РОО) и кусочек 
сыра (ЗОНЕ СНЕЕЗЕ) - и прочь из 
парка выполнять свой влан побега. 

Пройдя по аллее Крикунов (маз- 
завной так, вероятно потому, что’ 
ее обдюбовайи пля своих сбориш 
Фанаты нестного футбольного кат- 
ба} до стаднона, Вы встретите 
Фаната мествых Футбовистов. успе- 
хан игроки Скартхопрской конанды 
своих болельщиков не балуют и из- 
за вчерашнего разгронного пораже- 
вия от “Ливерпуля” и теперь уже. 
твердого последнего места в, тур- 
нирной таблице настроение ‘у 
встретивмегося Вам Фаната преот- 
вратиое/ Желая`ва ком-нибудь сор- 
вать зло, он готов ‘убить Васи 
вцесто побега из города Ван ` при- 
делся валяться в  нунитипальном 
госнихале, Поэтому, ‘не теряя врея 
мени. отдайте ему прихватенное из 
дома виво (СТУЕ РАН ТАСЕК), °пРи- 
хватите валязщуюся у его ног мы- 
щеловку (А КАТ ТРАР) и уходите 
ПРОЧЬ из этого квартада, дав себе 
слово никогда больше ‘здесь не 
появляться. $ д 

Отойдя немного подальше, оста- 
вовитесь. и осмотрите все, что 
есть у Вас с собой (ТНУЕНТОВУ). В 
результате Ваших походений у Вас 
есть книга по. искусству пилотиро- 
вания сановетов,  мышедовка, пя- 
терка денег, ножницы, одетые на 
Вас брюки, зонтик, кусочек сыра и| 
ненного еды. Не густо... Особенно 
укручает безденежье. Начинать но- 


вУЮ хИЗНЬ С ПЯТеркой в кармане иё\` 


очень-то веселая перспектива. 'Во- 
лей-неволей вспоминаются рассказы 
старолилов © несметных сокрови- 
шах, спрятанных в подвале забро- 
шенного дома, которые охраняются 
полчишани голодных кРЫС, 


т. } 

немногие снельчаки пробовали 
пробраться ‘туда, ‚но никому это 
пока не удалось. Оценив свою  мы- 
шеловку и отметив заодно, Что. У 
Вас есть отличная приванка - сыр, 
Вы решаете рискпуть. Зайдя по до-| 
роге в нагазии, реклана ` которо 
призывно обешает рыбу ‘и чицсы, Вы 
ничего из обетанного тан не уви- 
дите, разве что красную селедку 
{А ХЕХ НЕЮВТНС), стоит которую 
только взять, как на Вас набро- 
сятся полчиша голодных ‘котов, 
кстати, второй перевод слова ВЕ 
НЕВВТНС с английского языка `- 
"ложная наводка“, 
сани`- брать или ше нет. 
тому хе хозяин нагазина - скучаю- 
щий меломан - Быпустит Вас из 
нагазина не раньше, чен‹Вы послу- 
шаете по радио старый номер Френ- 
ка Синатры (РАЗТЕН). 

Идя ро улиме Дождя без зонтика 
ножно простудиться и попасть в 
больницу, поэтому как только вый- 
дете на эту улицу,  поторопитесь 
открыть зонтик (ОРЕН ОНВВЕНА), 
Пробехав по мостику через канал 
(С8055 ВЕПЖЕЕ), ‘Вы ‘окажетесь у 
цели. Зархавевмая дверь ‹ преграж- 
дает Вам дорогу. Открыть ее удас- 
тся только ‘после того, ‘как Вы 
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одкрепите свой силы едой (ЕАТ 
Р0ОЮ). СпУСТИВШИСЬ ВНУТРЬ по Шат- 
кой приставной лестнице, Вы мо- 
ментально попадаете под атаку 
дюжины облезлых голодных крис. 
ныше- 
ВОР 
Крысы, завидя, как мыше- 
зовка сломала хребет саной зво- 
РОовОЙ ИЗ НИХ, решают убраться в 
свою нору. 

В. подвале Вы снохете найти 
картонный ящик (А САЮОВОАВР ВОК). 
Вот оно сокровише! Такой, павер- 
вое, будет и Ваша мысль. Что же, 
берите его и откройте ножницами 
{ОРЕН ВОХ УТТН 56155085). ВНУТРИ 
Вы увидите только пару ботинок, 
которые, неснотря на прошелшие 
века, отлично сохранились и вы- 
глядят как новые. Что х. возьмите 
их и выбирайтесь дона, 
< Остановившись полышать свежим 
воздухом у канала, 


летчика, Ну конечно 
зе} Из о Скарткопрса надо не убе- 
гать. отсюда надо улетать! Но вот 
проблема - ва аэродром пустят 
только при наличии официального 
пропуска, а сн хранится в ратуше, 
находящейся на Гражданской улице. 


8. 
Чинбвник, слухаший в ратуше; 
не захочет Бас пустить ВНУТРЬ. 
Нридется отправиться на поиски 
дальше. Дойдя ло западного конца 
Больничной улицы, Вы обнаружите 
(ЗОМЕ КЕ 
Взяв ее, Вы сножете бес- 
препятственно проникнуть в ратушу 
Красная папка не только 
у нас в стране яваяется атрибутон 
власти. зайля в ратушу, возьмите 
там пропуск на ‘аэродром (50МЕ 


(С) ТНЕ САТ, 1993 г.. Харьков. 


БИТВА УСАГИ. 


(по игре ^ЗАНОВАГ МАЕРТОК” ) 


Усаги бышо всего 15, когда его 
отец, Акира Тойимбо покончил с со- 
бой, сделав “сэппуку“ (1). день 
назад, когда ничто не предвешало 
молодой Усаги 
стоял вместе с нин во внутреннем 
дворике отцовского дона, почти- 
тельно склонившись перед гостен, 
олько Что приехавшим из Киото 
{2). На куртке гостя была энблема 
дона Нинаното (3), сан хе Усаги 
носить герб кома 
поклонился 


кивка головой. В один голос с от- 
цом он произнес: "Добро похало- 
вать!", - и отец жестом, пригласил 
гостя во внутренние покои. 

Говорили они недолго и через 
Час только пыль на Западной доро- 
ге напоминала о Том, что сегодня 
У них кто-нибудь бып. С Востока 
вадвигалась чёрная туча. ., 


ОЕРЕТСТАБ РАРЕЮ5). 


9. 

Теперь Ваш путь аехит в аэро- 
порт. Свернув с Навозной аллеи на 
улицу доздя и попав оттуда на 
СТРОЙКУ, оденьте ботинки, иначе 
Ваши ноги увязнУт в грязи и сани- 
тары тут ше улозат вас в больни- 
цу. 
Внимательно осмотрите пустые 
ТРУбЫ, валяюшиеся на стройке - в 
вих ВЫ найдете летный костюм 
(ЕХАНТНЕ РТРЕБ, РУС ЗИ). 
Пройдя по аварийному перёулку до 
входа в аэропорт, снело входите 
ВНУТРЬ. 

10. 

Отдайте дежурному офицеру про- 
пуск (СГ/Е ОРИСЕВ РАРЕЮЗ). Он 
потребует с Вас пятерку за вход. 
Ничего не поделаешь, ‘придется от- 
дать ему последние деньги, только 
тогда он пропустит Вас к самолету 
(СТУЕ ОРРТСЕЮ РТУЕЕВ) и вот нако- 
нец Вы у самолета. Смело забирай- 
тесь ВНУТРЬ (60 ТЫ РЬАВЕ), встав- 
аяйте ключ в замок зажигания (1#- 
ЗЕКТ 5ММД. КЕУ ГЯ РАНЕ). Ноторы 
самолета ожили, можно было бы и 
лететь. Но не спешите - управлять 
самолетом Вы не. унеете и Вам по- 
лет закончится весьна плачевно, 
если Вы не прочитаете книгу по 
искусству пилотирования  (РЕАБ 


ВООК). Прочитали? Ну а теперь в 
путь. Вздетайте - и Вы победнаи 
(ТАКЕ ОРР). 


11. 

й в заключение несколько сове- 
тов: 

не кодите по улицам раздетым, 
иначе полиция арестует Вас за 
оскорбление общественной нравст- 
венности. 

Не изучайте брошенные на уаи- 


КОНПЬЮТЕРНАЯ НОВЕЛЛА | 


Была ухе почти ночь, когда 
старый Акира Тойинбо позван сына 
к себе. когда усаги вошел, отеп 
сидея на циновке в белом кимоно. 
Его седая голова была низко опу- 
мена, Первые слова, которые он 
произнес, были: "На все воля не- 
ба, сын ной...” Выдержав паузу, 
он сказал: "Вчера самураи Тайра 
напали на храм, где твоя мать 
укрылась от бренности этого мира, 
Она умерла вместе с другими нона- 
ХИНЯНИ С  УЛЫбКкОЙй ПОД’ мечон этих 
собак...". Усаги вскочил. Но 
Акира повелительно вскинул руку, 
приказывая ему сесть, Его гааза 
на ниг блеснули. Усаги медленно 
опустился на циновки. Отев тихим 
голосом продолжал; “Я стар, сын 
ной... К тому ще я не могу нару- 
шить клятву. данную нною Буцде. 
больше не убивать ны одного чело- 
века. Но я был и остаюсь самураен 
и поэтону сегодня покину этот 
мир, Ты - ной единственный сын, 
единственная надехда созхравить 
честь сеньи. Отонсти за свою 
мать. 


Ное завешание ты найдешь в  терью снова вместе, 


цах нашины - Вас арестурт за бес- 
цельное вреняпрепровозление. 

Не бросайте ненужные - предметы 
на улище, иначе будете арестовани 
за загрязнение окружающей среды, 
` .Не берите красный шарф - Фут- 
больные Фанаты сильзо изобьют Вас! 
за это и санитары отправят в} 
больвилу (по-видимому, зто атри- 
бут боледьмиков команды  соперни- 
ков). у 

для того, чтобы выбраться из! 
больнипы, найците белый халат и 
оденьте его, иначе лечащий врач 
задержит Вас прямо у вкода и вер- 
нет на больничную койку. й 

для того’ чтобы выбраться из 
полицейского участка, подойдите к 
сержанту и подавайте команду ЧАТУ 
до тех пор, пока не зазвонит те-\ 
лефон и Вы не будете автонатичес- 
ки выброшены из участка. 


12. 

Теперь о пробленах: 

В програнме имеются предметы, 
которые не удалось нигие исполь- 
зовать: : 

Около полицейского участка 
лежит старая юшляца (АН 01. НАТ). 

Заизлнее уличы дождя, на сто- 
Янке ГРУЗОВИКОВ МОЖНО’ БЗЯТЬ НоЛО- 
ко (50НЕ НИХ). Его можно выпить 
(ФЕТЧЕ НИК). но что это дает, 
установить не удалось. 

Севернее выхода из госпиталя 
находится ° здакие, называеное 
"большой оФФис" (А ТАВСЕ ОРРТСЕ 
50Ск}. Попасть в кего так и не 
удалось. 

Программа реагирует на конайду 
ЗСОВЕ. Наивысший результат, кото-} 
РоГо удавалось достичь - 18 из гг 
возможных. Где взять еше 4 недо- 
стаюшщих до полной побены балаа - 
не ясно. | 

Ну вот, наверное, и все. 


этой шкатулке, " - отец указаа в! 
левый угой комнаты. “Мухайся, сын 
мой, и пусть не дрогнет твоя рука! 
ни сейчас, ни после". - и Акира! 
обнажил свой короткий меч для 
сэппуку. Усаги. встав по левую! 
сторону от отиа, медаенно вынул! 
из ножен и занес свою катану (4), 
готовясь облегчить страдания от- 
ца. Перед тем. как вонзить корот-| 
кий меч себе в живот, дкира в! 
посиедний раз взглянул ва сына. | 
Глаза Усаги затунанялись, его 
собствевный меч сверкяул в этон 
туване, как нолвия. обрывая жизнь} 
самого дорогого для него чедове-р 
ка. 


Всю ночь  Усаги не 


глаз. обливаясь слезами, “Про-й 
шальная песня” (5) его отца гла-| 
сила: 


В ясном небе 
растворяется 
Ясной молнии базск. .. : 
Нихе рукой Акиры было написа- 
но: 
"Сын ной! ь 
Сейчас, когда; ны с твоей ма-\ 


долг. Свято чти кодекс чести *Бу- 
йсидо". не обижай и завишай сла- 
| Придет вреня.и тирания Тайра 
падет. Нам гость сообщил нне, что 
'светлейший князь Еритоно Нинаното 
вскоре выступит против Тайра. Я 
после того, как 
Потомстишь за мать. встал под его 
знанена. И последнее: убийцу тво- 
|ей матери зовут Кавасаки Тайра. 

| Да пребудет Будда с тобой!" 

Усаги вышел из дома рано ут- 
В его кошельке было всего 
три .ре (5). Первым. кого он 
встретил, был седой крестьянин, 
идуший с поля. Усаги был: далек от 
тех столичных шеголей, которые 
|при Виде крестьян в лучшен случае 
брезгливо моршились, а в кудшем 
|проверяли на них остроту Фамиль- 
иного меча. отец учил Усаги ува- 
"У кахлого своя карма 
(7)".- говорил ‘он. Усаги слегка 
склонил Голову. Крестьянин низко 
поклонился. = Усаги протянул ему 


один. ре. "Спасибо, добрый саму- 
рай, “ - сказал крестьянин и снова 
низко поклонился. Усаги пошел 
дальше. по пыльной дороге, Где-то 


птам, за лесом, за двумя городами, 
Ив, горая- была усадьба Кавасаки 
|тайра... 

Вдруг Что-то заставило Усаги 
Инапрячься. Его руки мгновенно. из- 
| влекли из ножен катану. Меч и че- 
‘ловек слились в одно целое. В 
‘следующую секунду с дерева с про- 
тяжнык криком. вонахнув мечом, 
спрыгнул человек в черной наске. 
|Но у самой зеили его встретил 
пмолнменосный росчерк меча Усаги. 
Усаги медленно стер с меча 
кровь и осторожно вяожия его в 
ножны. Он и раньше кое-что слышал 
|о людях. закрывающих свои лица. 
их звали "нинизя”. суеверные кре- 
Истьяне верили, что они знаются с 
нечистой сили, ногут внезапно по- 
являться, исчезать и сразаться 
|как звери, неистово махая нечом и 
йнетая звездочки - *сюрикены". 
крестьянин, которого’ Усаги вскоре 
встретил, в ответ на. вопрос © 
ПНиндЗя посмотрел на него с ужа- 
сом: “,...Да, да, господин. мы 
слышали о них и раньше. Люди по- 
говаривают, что если свернуть с 
дороги налево по ‘тропинке перед 
ручьем, то можно забрести в пеше- 
|ру;, где. у них логово... Люди от- 
туда не возврашаются. Не ходите 
туда, благородный господин. Если 
ух Вам нухно попасть в город, 
видите прямо, через лес...” 

Встреченный Усаги самурай в 
шлеме, похожем на волчью голову, 
после того, как Усаги приветство- 
|Йвал его поклоном, сообтил: "Ах, 
ниндзя? Вон там в кустах лежат 
трупы двоих. Эти бестии  прикину- 
лись крестьянами и напали на меня 
сзади..." 

В городе Усаги решил пополнить 
свои силы и свернул на постоялый 
Пивор. У входа его встретил плуто- 
ватый крестьянин и предложил 
пазартную игру. Усаги из  любопыт- 
уства протянул ему монету. Снача- 
ла он выиграл, а потон проиграл. 
Молодой самурай решил не искутать 


й : № } | 
впечется лишь о тебе. Выполни свой называет катану длинным  нечом. 


судьбу. так как нухво было еще 
заплатить хозяйке за еду, 

У выхода его поджидал какой-то 
самурай, который явно хватил лиш- 
него: "Поединок до первой крови, 
санурай!!!" - заявил он. ‹ Усаги 
пытался отстранить незнакомца, но 
тот назвал его трусом и Усаги 
пришлось все-таки извлечь меч из 
ножен, но он не котел убивать со- 
перника и лишь слегка ранил его. 
Чужой санурай сразу же  протрез- 


вел. И, пробормотав извинения, 
свешно удалился... ) 
Наконец, после долгого пути, 


он был У ворот усадьбы Кавасаки 
Тайра. Стахники, узнали герб на 
куртке Усаги и кинулись на него. 
Усаги вспомнил.о5 отце и матери и 
это удесятирило его Ярость. .. 

Что было дальше, он помнит 
плохо... Кажьтся, сражаясь против 
самого Кавасаки Тайра, он видел 
призрак своего отца из-за спин 
нападающих. .. 

№. * # 


ПРИМЕЧАНИЕ. АВТОРА: 


{1} - СЭППУКУ (В. народе называе- 


мое харакири) - обряд риту- 
ального самоубийства самура- 
ев. 

(2) Тайра, Нинамото, Ходзе - са- 


нУрайские дома в Феодальной 
Японии. В Х!{ веке всныхнула 
затяжная кровопролитная война 
за власть между донами Тайра 
и Нинаното. дом ходзе высту- 
пил на стороне Иинанмото. 

(3) Киото - резиденция японских 
императоров. 

(4) Катана - длинный меч, исполь- 
зуемый санураями в бою, в от- 
личие от короткого. использу- 
еного, ‚в основном, для сэппу- 
КУ. 

(5) Прощальная песня - стихотво- 
рение (хокку) на тему приро- 
ды. слагаемое санураями перед 
смертью. В прошальной песне 
отца Усаги обыгрывается его 
имя - Акира (“ясный”). 

(5) ЕРИМОТОо Нинаното - глава дона 
Нинаното, ставший, впоследст- 
вии сегуном - военным прави- 
телен Японии. 

(7) ре - золотая монета. 

{8) Карна - закон причинно-след- 
ственных связей, по которому 
человек обязательно получает 
воздаяние за добрые или злые 
дела. Ключевое понятие в буд- 
дийской Философии. 

Юз и * 


ПРИМЕЧАНИЕ “ИНФОРКОНА" : 


Так получилось. что эта новел- 
ла пришла от увахаеного автора в 
то время, когда мы готовили пер- 
вый выпуск нового злектронного 
хурнала “РС-РЕВЮ” и работали над 
статьей "Средневековое оружие в 
программе  Н1СНТ в МАС! 111”, 
исследуя сопутствующую  литерату- 
РУ. Обзор этой литературы позво- 
ляет сделать пару небольших до- 
бавлений, 

1. Автор не впоане справедливо 


конечно. хе он длиннее, чем упомя- 
нутый ритуальный неч для сэппуку, |. 
который немного больше кинжала, 
но все же это не длинный, неч, его 
принято считать коротким. 
Дело в том, что во стандартный 
боевой комплект богатого самурая 
входило два неча - вакидзаши, и 
катана. Вакидзаши - длинный меч, 
которын можно действовать как 
одной, так и двумя руками, а ка- 
тана - более короткий, вспонога- 
тельный неч для левой руки. Ко- 
нечнс, при отсутствии вакидзаши 
катана становится основным мечом!’ 
и может считаться относительно 
длинным. Кстати, именно не очень 
большие размеры катаны ’ способст- 
вовали тому, что это оружие по- 
заимствовали у самураев бойцы 
ниндзя, т. к, его ножно быао. пере- 
носить тайно, укрывая в ‘складках 
одехды, а при ношении за свиной 
оно не стесняло быстрых и  ловких 
движений ночных диверсантов. 


г. События, описанные в новел- 
ле, инеют реальные исторические: 
корни. Они относятся ‚к периоду 
феодальных войн. 12 века, когда 
власть императоров была заменена 
военным сегунатом. К сожалению, 
князя Еритоно Нинаното (1147 - 
1199) не принято считать светлой 
личностью. Дедо в том, что власть 
дома Тайра сверг Есипунз Минамото 
(1159 - 1189}, а ЕРИТОМОо пришел к 
власти, коварно загубив своего 
нладшего брата. 

Впрочем, согласно легенде, он 
пояучил по заслугам. Еритомо по- 


гиб, упав с лошади, когда ему! 
привиделся призрак его убитого 
брата, Предполагают, что РОЛЬ 


"призрака" сыграл один из хоровю 
подготовленных ниндзя. отомстив- 
ший правителю за подлость. 
* к * 

Для справки: програмна НТСНТ 

& МАСТС 111, известная также под 
названием Т5ЬЕ5 ОР ТЕЮВА выпушена 
коннанией Нем \ог14 Сошри1тё и 
относится к жанру ВРС - вое 
Р1ау1пв башез - ролевые игры. К 
сожалению, для "“Спектруна" этот 
жанр налодоступен. Пожалуй, имен- 
но в этом жанре, а также в инита- 
торах ТЕМ имеет преинушество над 
“Спектрумом”. Во всех прочих иг- 
рах наши читатели могут чувство- 
вать себя на равных с владельцами 
ТВИ-совместимых нашин, а во мно- 
гих случаях дахе имеют ощутимое 
преимущество за счет большей ин- 
теллектуальности “синклеровския” 
игр. Влрочем, те, кто заинтере- 
суются этин вопросом. подробнее, 
сногут в ближайшее время стать 
читателями ”РС-РЕВЮ", если хотя 
бы на время найдут подход к ТВИ- 
совместиной нашине), а сейчас 
такая возножность есть уже ив 
самых отдаленных пунктах. 
Ны рассчитываем, что наша 
стратегия распространения "РС-РЕ- 
ВЮ" сможет доводить выпуски этого 
хурнала до каждой ТВИ-совместиной 
нашины в СНГ в течение 5-6 меся- 
пев после выхода очередного номе- 
ра. 
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ИНФОРКОН-ПРЕСС 


Дорогие 


Ны продолжаем рекламную компанию ло продвилению 
нового электронного журнала ”РС-РЕВЮ". К сожалению, у 
нас не получается, ‘как было объявлено, осветить в 
этом выпуске итоги ТЕНЛЕРА. объявленного в НН 7-8, 
дело’ в том. что’ этот Выпуск 2Х-РЕВЮ передается в ти- 
пографию 10 воября 1995 г.; а ‘итоги ТЕНАБРА будут 
подводиться только 15 декабря. Такая необичная для 
вас поспешность с ‚ выпускон данвого нонера связана с 
ем, что мы кардинально. улучтаен качество и Формат 
издания 2Х-РЕБО-94 (каждый, номер - 96 стуаниц формата 
45, цветная обложка, выподненная одним из. известаей- 
ших РОССИЙСКИХ КУДОЖНИКОв И ИР.) и ПОТОНУ ДОЛЖНЫ 
иметь солидный резерв ‘времеви на подготовку и печать 
первого номера. будущего года. Кстати, нногие наши 
читатели сейчас не выписывают РЕВЮ-94, полагая, что в 
конце года будет. вылущея годовой сборник. Это отибка. 
При новом оформлении и объеме хх-РЕНЮ-9л мы не сможен 
издать годовой сборник при всем своен’желании. 

”) „Тем ие менее, все Участники ТЕНДЕРа получат‘от 
вас персональное уведомление об его итогах, Публично 
хе его результаты мы обнарокуем в первом выпуске 6у- 
душего года. 


пока же мы заканчиваем подготовку первого выпус- 
ка и уже можем оценить его себестойность. исходя‘ из 
вее сейчас ножно предполохить. что по всей видимости 
цена отсечки будет не’`нихе 25 тысяч рублей. Таким об- 
разом. стоимость лицензии на право распространения 
одного номера РС-РЕВЮ составит не менее 25 тысяч руб- 
ей как для юридических. так и ‘для физических пил. 
При приобретении аидевзии сразу на несколько. нонёров, 
навринер на все 12 | выпусков будущего гола, конечно 
будут действовать скидки, 


‚У читателей 7х-РЕБЮ есть несколько ‹ возножностей 
приобретения РС-РЕБЮ (для личного пользования или для 
участия в его распространении) от очень дорогих ло 
практически бесплатных, 

1. Вы хотите читать РС-РЕБЮ, но не хотите 
участвовать в его распространении. 


1.1. Вы сможете обратиться в своем городе к на- 
шену дистрибутору и скопировать 7 него очерецной но- 
нер за назкаченвую ин плату. Мы не нохем определять 
Которую наши дистрибуторы назначат за копи- 
но ножен прекположить, что рынок 
выведет их на уровень от 2-х до 7 поочентов. {в зави- 
симости от количества клиентов) от той суммы, которую 
юни сами заплатили за лицензию. Плюс, конечно,  стои- 
ность дискеты (дискет). 

Это доступный и 
свежих выпусков хурнала. 


оперативный метод получения 


1.2. Если в ‘Вашем городе нет нашего дистрибуто- 
Бы можете обратиться в любой компьютерный салон 
й в аюбую Фирну, занимающуюся торговлей коипьютера- 

ни иди программными продуктами в своем городе и пред- 
пожить ин связаться с нами. Может быть, имо придется 
предварительно изучить потенциальный спрос. Если зая- 
вок будет хотя бы весколько десятков, они наверное 
согласятся включиться в наму дистрибуторскую сеть, им 
это будет интересно, необременительно, а главное - 
перспективно. 910 дело, которое будет развиваться и 
кто начнет его раньше, тот пойдет дальше, 


ра, 


1.3: Вы можете вообще ‘ничего не делать, а терне- 
хнво хиать, когда номер РС-РЕВЮ сам придет к Вам. в 
руки через друзей или по компьютерным сетям. Посколь- 
ку выпуски будут распространяться без зашиты от копви- 
рования, этот, номент наступит через несколько месядев 
(ориентировочно 5-6). Это практически бесплатный, но 
и самый длинный путь. 


ПРЕДСТАВЛЯЕТ 


Друзья! 


1.4. Ограниченное количество дискет каяного но- 
мера мы будем продавать в подарочном (коллекдионном} 
исполнении в красочных альбомах через дорогие ком-1 
пьртерные саловы, киижные магазины и музыкальные нма- 
газины г. Носквы по престижно высоких ценан. поступать 
туда эти номера ‘будут не ранее, чем через полтора ие-й 
сяца после рассылки настеркопий дистрибуторам, 

Очевидно, для Вас это самый неудобный. дорогой и! 
нооперативный с1осо5 получения журвала, но'он необко- 
ции для подкерхки наркетинговых усилих нашёхк  дистри- 
буторов в их регионах. я 


2; Вы готовы подключиться к распростра- 
нению РС-РЕВЮ, 


2.1. В этом случае пля обладания свежим выпуском 
Вам придется предварительно перечислить нам уставов-1 
леняую цену за настордиск и за лицензию иа копарова-1 
ние; 


2.2 далее Вы ножете дедать все, что хотите: Бы 
нохоте копировать хурнал для всек желающих на дискету 
заказчика за назначенную Вами плату. Вами координаты | 
войдут в снисок официально зарегистрированных дистри- 
буторов и К Вам будут обращаться читатели. 

Вн модете распространять этот хурнал и на своих 
дискетах, используя ‘аля’ этого торговые вознохности 
ДРУГИХ ФИРН. | 

Вы ножете заниматься этим в порядке предирини-| 
вателуской деятельности без образования юридического) 
лица, что предусмотрено действующим  законодательст- 
вом, р 

Вы можете специально для этого зарегистрировать 
Фирму или ‘использовать уже. инекяуюся и заключить с 
нами договор. 


2.3. Не исключено, что Бы захотите стать гене- 
ральным дистрибутором в своем городе ‘области, рес-1 
пубике) и заключить с нами эксклюзивный договор, 


в. своен региопе, 

Это будет возможно, но не всегда. Ны пойден на! 
такой договор только в. тон случае, если Вы в своем! 
регионе будете первым. Разорвать уже  споживымеся| 
связи с партнерами мы конечно хе не сможем. И, 
разумеется. такая Генеральная лицензия будет стоить 
дороже, это будет зависеть от разнера региона. гене- 
Ральная лицензия на Эстонию будет стоить дороже, счем! 
на один город Нарву. 

Для Носквы и Носковской области Генеральная ли-| 
мензия на эксклюзивное распространение не продается; 
но ‘обычные линензии продаются обычным порядком. 


Вы с Вами находимся у истоков огронного дела: В 
настоящее время в России и СНГ установлено свыше трех 
нилаконов ТВИ-совнестимых конпьртеров, но специалисты 
считают, ‘что пока это капля в норе. И до кахдогой 
конньютера Вы должны добраться. Не исключено, что Вы 
находитесь у истоков дела, в. которое в ближайшие годы 
будут вовлечены сотни кидлионов рублей и девяносто} 
процентов из вих - Ваши. так что решайтесь! да, пер-} 
вое вреня может быть трудно. ножет быть придется по- 
бегать, покрутиться, кого-то убедить. кого-то органи- 
зовать, во успех прикодит только к подготовленным 


людям. Если у Вас есть вера в свои силы, Вы пойдете} 
дальше вместе с нами, | 
Со всеми вопросами, прелложениями, ‹ похеланияни, 
обрашайтесь по адресу: 
121019, Носква, Г-19, а/я 15, А/О “ИНФОРКОН-ПРЕСС” 
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СОЛЕРЕННИЕ 
(СПЕКТРУМ В ВКОЛЕ В с 147 Д. Киселев, К вопросу о стан- | 
нь ии: 65 89. 495 127.001 “ТУРБО-930“, й дартизации. „ни... с 2... .1988 
| “Денинград”. Ааа С.Крувинский, Зрессу+@строло- | 
ИС .Николс “Дельта- и р И 01 
ПРИМЕНЕНИЕ АССЕУБЛЕРА длЯ создо- “Пентагон“....... О 151, Не й. Г Йленсеев. ИНАИ! Тве бое с } 
| НИЯ БЫСТРОРАБОТАЮИХ ПРОГРАМИ ОЕАТН 915Н 3... ..151 Вох. Новые возможности..,.,.,,255) 
| 1. Вывод на экран......,...... |: “ВЕКТОР”... . | 
|2. Команды РЕОТ, ОВАЯ, СТВСЕЕ .48 Вопросы совмести ь ВОЗВРАВАЯСВ К НАНЕЧАТАННОМУ 
ла Ве 55 УНОВТ СТАОШТ.......... ......286 й.й.Ефремов. Опыт работы с 
| 4. Случайные числа............97 Советы и секрети. у Вефа-Ваз! с 1,8. 4. а,. к 
|5, Обслуживание клавиатуры... .99 ЕЕ о ь ‚25? В.Пыльцов. Сортировка русифи- | 
| 6. Музыкальные и звуковые э$- ВЕОВЕИТ с, ..257  цированных символьных строк... 116} 
окна А м 580405 & З0ВСЕКУ. И | 
|7. Движени ‚ПРОФЕССИОНАЛЬНЫЙ ПОДХОД о А 
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Ио. И А у | ТЕ МАТ ина НН. 
3. Принтё В. 8. Збитнев. " Приженение стати- Й. Комиссаров. Нестандартная 
10, Перевод БЕЙСИК-програкмы ческого генератора случайных чи- ЕКА .:,;,. 244 
в машинные коды...........-.,- О о Ан .. Р.Кузнецов, д. "Мальтов, | 
| В.й. Збитнев. Компьвтер и Исправленнуе ошибки П39.......246 
Михайленко В.С. ,Турович @.К. А" О 195 й 
ЗАЩИТА ПРОГРАМЫ. ............... 13 , СОВЕТЫ ЭКСПЕРТОВ 


Процедоры в манинных кодах, 
еализующие загрузку програми 
магнитофона........ я 13 
Стандартные процедуры записи 
информации на магнитнуя ленту. .16 
Методы защиты от копирования 
хагнитную ленту....... аи 18 


р 
{- 


Михайленко В.С. ,Турович Й.К, 


|МЕТОДЫ БИЛЛА ГИЛБЕРТИ..........64 

Алексеев Й,Г. 

ИСЕИОЕТИ П- 003, с -ььн,-ы,0Е 
Карта памати 039........ и: 
Формат записи на диск....... 23 
Выполнение команд ТВ--005 

з мавинного кода...,. А 24 
Приемы зациты от копиро- 
ванияа,....... А ИИ 


|ПЕРЕПИСКИА С ЧИТАТЕЛЯМИ СРОВИМ» 
Е резидентной проце- 
|дурой. . 28 
| расчет резонансных характерис- 
И АЗВЕАЕА Е 30 
|| Нестандартная загрузка......31 
Компрессия и декомпрессия...59 
ЕЫТЕ., .104,102,111.114,146,253 
253 


108,256 
И о т 
тАвкток. . ы 


ШАПЕНЬКИЕ ХИТРОСТИ 
Програчна “Теневой контур"..35 
стилизованные врифты........ 46 
АР ЗИА Кри, Кол кокы 

ЯЗЫКИ ПРОГРАММИРОВАНИЯ 

Ом Гобо...69,90,134,180,222 

.6 


. Что такое 10Г0...... 9 
| Первые наги. 70 
3. Переменные. ......... „.29 
4. Слова и списки........... 34 
3. Повторяажиеся операции. .134 
8. Черепавья графика....... 156 
7. Н снова об обработке 

Е СОА А] 
8. Некоторые математические 
онерациик ния 185 


3. Ввод и вывод информации. 222 


10. Если что-то не получа- 
И Я Г 
СДЕПАИТЕ САМИ 
АРАТОВИ ЗЕЕ0$, цех... ‚09 


СИЗН РЬОН... 
ВОСК ВОЗТЕК. . 
1 у 


ль 
АВУ.ВОТЬО.ЗУЗТЕМ...... 
ЧИТАТЕПЬ-ЧИТАТЕЙЮ 
й. Бессонов. Проснотр защицен- 
ных програмы......,........., 
К.В. Свиридов. Какие 'компьвтеры 
и ВбавИ, ее 49 
Н.М.Стинов. Распахнутне двери 
#21 


или открытый занавес.......... 
Аналог “Моского Боя”..,..,.160 


210.247 
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ВНИМАНИЮ ПЮБИТЕДЕЙ ПЕРСОНАЛЬНОГО | 
КОМПЬЮТЕРА “7Х-ЗРЕСТКОМ“ 
и совместимых 


В 1993 году “ИНФОРКОМ" выпустил следующие книги: 


. "ТЖ-РЕВЮ-91“, выпуски 1-12, 264 с. - Полный годовой комплект "2Х-РЕВЮ", сведенный в 


единый том. 


. "1 РЕВЮ-92“, выпуски 1-12, 264 с. - Полный годовой комплект “7Х-РЕВЮ”, сведенный в 
единый, тои. 


. "ТХ-РЕВЮ-93", выпуски 1-12, 272 с. - Полный годовой комплект "7Х-РЕВШ", сведенный в 
единый том. 2 
. “Персональный компьютер “7Х-бресёгиа“. Программирование в иаяинных кодах и’на языке 


АССЕМБИЕРа, 273 с. Второе издание известной нашей книги, ранее распространявшейся в 
трах томах, 


. “Персональнай компьвтер "2Х-бресфгиа"”. Элементарная графика, 208 с. Первый ток 


четырехтохного сериала, посвященного реализации графических вознозностей компьятера, 


$ “Персональный компьютер “1Х-Зресёгии". Прикладная графика, 208-с, Второй том 


четырехтомного сериала, ‘посвященного реализации графических возможностей компьютера. 


. Клайв Пригмор, Пол Фрив. "30 часов БЕЙСИКа для начинающих", - пер, с англ,, редакция, 


адаптация “ИНФОРКОМа”. 


В 1394 году “ИНФОРКОМ" выпускает следующие книги: 


. “Персональный компьютер "2Х-Зресёгии". Динамическая графика, 208 с. Третий том 


четарехтомного сериала, посвященного реализации графических возможностей компьютера. 


. "Персональный компьютер “2Х-бресёгие“. Дизайн Ваших программ, 208 с. Заключительный том 


четырехтонного сериала, посвященного реализации графических возможностей компьютера, 


. “Нерсональный компьютер "1х бресьгиа", Языки. программирования", 208 с. Описание 


“синклеровских“ версий языков программирования БЕТА-БЕЙСИК, МЕГА-БЕЙСИК, ПАЗЕР-БЕЙСИК, 
ФОРТ, ПАСКАЛЬ, СИНКИЕР- ЛОГО. 


. “Периферия своими руками”, 192 с. - сборник схем и описаний для доработки и расширения 


возмовностей Вашего компьютера. 


. “БЕЙСИК для опытного пользователя“, 208 с. - книга рассчитана на читателей, закончивших 


работу с пособием “30 часов БЕЙСИКа для начинающих". 


. “Работа с ПЗУ", 208 с. - на конкретных примерах рассмотрены возмохности использования 


процедур ПЗУ‘ ипри написании собственных програми в кавинных кодах. 


‚ "Игровые программы своими руками“, 208 с. - сборник увлекательных игровых программ для 


самостоятельного набора и отладки, 
“Игровые программы своижи руками - 2", 208 с. 


“Игровые программы своими руками - 3", 208 с, 


По всем вопросам приобретения указанной литературы по почте, а также по вопросам оптовых 
поставок обращаться письменно с вловением заполненного конверта с обратным адресок 
или лично на наш опорный пункт в г. Москве. 


121019, Москва, Г-19, а/я 16, "ИНФОРКОМ" 
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ВНИМАНИЮ. ИЮБИТЕЙЕЙ ПЕРСОНАЛЬНОГО 
КОМПЬЙТЕРА “2Х-5РЕСТВИМ“ 
иосовместимых 


| Вы можете приобрести литературу, выпускаемии: "ИНФОРКОМом" 9 наших дистрибьюторов в следующих 
попорных пунктах: 


г. Москва, -ул. Новый @рбат, д.2...19-е ‚отделение связи. !-ый. зтая операционного. зала, Здесь Вы 
| также можете. подписаться на. "2Х-РЕВЮ-- 34“. 


| г. Москва, радиорынок в Митино, проезд до ст. метро Тувинская или поездом до платформы 
|Трикотахная (Рижское направление). Суббота, воскресенье 3 - 14. Киоск № 3-37. 


г, БЕЙГОРОД, магазин “РАДИОТОВАРЫ", ул. Пенина, 32, 


г. БЕЙГОРОД, Октябрьская 84, кв. 103, студия “КОЖПЬЮТЕР”, 


.‚ ВИАДИВОСТОК, Океанский пр-кт, 140, магазин "ПАНОРАМА". Проезд трамваем до ост. Некрасовская. 
‚ ВОРОНЕХ, студия компьитерных игр 5АН-ЗАН. Магазин - салон, "ЭЛЕКТРОНИКА", тел. 14-00-73. 
. ДНЕПРОПЕТРОВСК, ул. Певченко, 34 ‚фирма: “ЭКОС". 
ЕКАТЕРИНБУРГ , магазин "СПЕКТРУМ”", Главный проспект, 99. 
‚ ИЖЕВСК, радиорынок. "Козий Парк“. 
. КЕМЕРОВО, магазин “ТЕХНИЧЕСКАЯ КНИГА“, ул. Весенняя, 24. 
у КЕМЕРОВО. магазин “ОРБИТА”, пр. ПЙенина,- 133, 
. КИРОВ, “Дом Науки и Техники”, магазин-салон "МАРС". ул. Производственная, 27. 
. КРАСНОЯРСК, радморынок, проезд до ост. Затон, субб., воскр. 

НАБЕРЕЕНЫЕ ЧЕЙНЫ, Татарстан. Новый Город, салон-магазин "ПРИНТЕР", 
й нижний НОВГОРОД, НМА. "Ф- ППС", иагазин "ФОТОПЕБИТЕЙЬ", ул. Горького, 16. 
. ОРЕНБУРГ, магазин “ВОЕННАЯ КНИГА“, ул. Советская. 
. ПРОКОПЬЕВСК, Кемеровской обл. Тырган, магазин “ОДЕБДА", фирма “РОНЗТ". 
. РЫБИНСК, ца. Гогола, 1, ТТЦ "ГНОМ". 
. ХАБЕРОВСК, ул. Запарина, 65, магазин “ФИЛАТЕЛИЯ". 
г. ЧЕБОКСАРЫ, магазин "ЭКСПРЕСС", НИК фирма "НОВА", уя. Привокзальная, д, 6. 


. ЯРОСЛАВЛЬ, магазин “РАДИО-СПОРТ-ТУРИЗЫ", Пенинградский проспект. 
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ВНЕМИНИЮ — ПЮБИТЕДЕЙ НЕРСОНАЯБНОГО 
КОБПЬЮТЕРЯ "2Х- ЗРЕСТВУИ" 
и совместимых 


ИНФОРКОМ ^ ПРЕДЛАГАЕТ 
комплекс программ и описание новейзей операционной ‘системы 15 105. 
Поставка производится пс договору с фирмой “СйОТ“ на дискетах 360 К. 


!. Описание системы 15-1005. - Книга содершит полное` описание работы с. базовым комплектом 
и прикладныюи программами, Книга изцается фирмой “СЛОТ” при техническом и оинансовок 
содействии “ИНФОРКОМа”. 


2. Базовый комплект 15 005; 
- Операционная система, файловая оболочка: 
текстовый редактор; 
- програкки и утилиты 005; 
работа с дисками ТК 00$ и 5 005; 
упаковаики; 
программы печати тестовых и экранных файлов; 
резидентные задачи; * 
драйверы клавиатуры, монитора, приктера, виртуального диска, 


+ 


+ 


3.4. МУЗЫКАЛЬНЫЙ РЕДЁКТОР - программа предназначена для работы с ЙУ-8910/2: и операционной 
системой 15 005. С ее помощью Вы приобретете стерео/моно эвуковое сопрововдение при 
работе всех 15 005-совместиных программ, - 

ПРОГРАМЫй СОЗДАНИЯ РЕКЛАМНЫХ РОЛИКОВ (ЗНОЯ> = пакет програмы слушит для создания и 
показа на мониторе рекламы, а такие другой информации в непрерывном рашиме демонстрации, 
06ё програмын поставляются на ‚одной дискете. 


5. записная КНИЕКА - пакет аналогичен записной книжке с разбивкой информации по буквам и 
по числам в кавдом месяце. Предусмотрены широкие возмовности поиска. 


6. ДЕПОВОЯ КИПЕНДАРЬ - програмиа. необходима для тех, кто хочет планировать свои 
ежедневные дела или вести дневниковые записи в объеше до 615 знаков в’ течение 
нескольких лет. } 


7. ФИНАНСЫ БЕЗ ПРОБЛЕМ - пакет автоматизирует бухгалтерский учет; сводя его к 
вводу и редактированию совершаемих операций в естественной, понятной форме, 
Все отореКиЯ проводки выполняются автоматически, Всегда готов оборотный 
баланс 


8. МАТЕРИАЛЬНЫЕ ЦЕННОСТИ - пакет предназначен для учета мат.ценностей, 8 процессе 
работы ведутся автоматически акти учета и списания по месяцаи. 


`9. СКЛЮД - пакет предназначен для учета постопающих товаров, деталей и т.п, 
10. МАГАЗИН - все виды учета и отчетности магазина. 


#1. КАРТОТЕКА - пакет предназначея кля создания и ведения набольмих картотек с 
инрокими вознояностями поиска, редактирования и просмотра, 


ПРИМЕЧАНИЕ: Готовится к изданию книга “15-005, руководство программиста”, я из 
печати ожидается в феврале-марте 1934 г, 


ВНимАНЫЕ ДВБЫТЕНЕЙ КОМПЬВТЕРНЫХ НГР 
для В-совместкиих кочпьютеров 


1 ИКВИОНЕРНОЕ ОБЩЕСТВО ЗАКРЫТОГО ТИПА “ИНФОРКОК ПРЕСС“ 
"начиная с 01,01.34г. приступило к зыпуску еземесячного электронного журнала “Ро-ДЕУТЕН”. 
К 01.02.94 г. подготовлено и випущено два випуска объенон по 2,5 Мегабайт каздай. 


В состав выпусков входят: 
авторские обзоры игровых програни с илаюстрацияки; 


аналятические статьи, посясвениые иссиедованию известних и вирокораспространенних 
програни, 


перецисна с читателяци: ответь ‘на вопросы, помощь и консультации, обмен имениаыи и 
нифорнацией: - 


обзоры запубеяних полиграфических н электронных сурнаялов, посвящениих тенатике 
игрового. програниного обеспечения; 


ивтервье с видный производителоми програминого обеспечения как в России, так и 
за рубелок; обсучдение технологических м маркетинговых проблен; 


авторские конпьвтерние новелян, написанные по нотивам известних игровых програкы; 


иСровые эти Сотгразенные нодули состояния нэвестних игровых програми), 
предоставляющие читателям зозновность уваекательного исследования в поисках ревения; 


В качестве задач блыпайнего времени “РС-ВЕОТЕН" видит помощь отечественнни , 
промзваднтелан программного обеспечения з налашивании эффектирного маркетинга их продукции 
и становлении в России цивилизованного рынка игровых программ. 


"ИНФОРКОК-П2ЕСС” приглашает к участие над выпуском РС-ВЕУТЕЯ самодеятельннх авторов, 
"Принимаются авторские материалы по пебой тематике, никаких требований к офорилениа статей 
‚ий абзоров на существует, Если Вана статья написана грамотно и интересно, нами редактори 
Гоформят и подготозат зе к издания самы. Опубликованные авторские статьи опзачиваятся в 
"разкере до 1.0 $ 95 за 2 килобайта исходного текста (почтовым переводом в рублах по курсу 
УЫВБ}. Свои предлонения и проекты направляйте по следуючим каналам: 


почта - 121019, Москва, Г-13, а/я 16, 
факс - (095) 356-16-31 
Е_Иа!! - розфвазвег 8 {герге58.и5К.50 


Контактный телефок ДИЯ АВТОРОВ - (095) 956-16-31. 


Еаинствеаныий снособ распространения 20-ВЕУТЕН - через региональных дистрибьзторов. 
‚"ИНФОРКОМ- ПРЕСС" роэничнуе продазу випусков ишзрвала КЕ ПРОИЗВОДИТ. Стать дистрибъяаторами, 
1получить незациценнуя копие хуонаяа и лицензия на неограниченное тиразированне одного 
выпуска могот все челавчие, оплативеие стоимость данной лицензин. Оплата приннхается в 
лабой форме. Цистрибуция шурнала предельно проста х выполняется путем неограниченного 
‘копирования на одну дискоту 5.25 НО или на три дискеты 5.25 00. 


Заявку о зелании стать дистрибъюторон вы можете направить по почте, факсу, 
электронной почте или сообщить по телефону, 


Контактаимя телефон дла ДИСТРИБЬЮТОРОВ - (695) 452-31-03 (по вторникам с {0 до 17), 


Рб-ВЕЗТЕН — это Ваче > издание! 


«ИНФОРКОМ» 


АХ - РЕВЮ 
_ 1998 


Выпуск 1 — 12 


Москва 1993 


